重构版机房收费系统之分层、接口、数据库连接、反射+工厂（vb.net）

分层

        分层是为了减少层与层之间的依赖，添加程序的可读性，让整个系统结构清晰明白。还可大大减少维护成本，可是分层也有一定的缺点，有些能够直接訪问数据库的层，却要通过负责訪问数据库的层进行訪问。这样，在訪问数据库过程中就多出一个环节，添加了系统的开销，有时候要在表示层添加某个功能。为了减少耦合，就不得不自上而下，在每一层里面添加这个功能所需的服务类，这样就添加了开发成本

        分层越多越好吗？答案是否定的，引用一句话“我们也要     时刻谨记：不能盲目分层，不应分层而分层不应模式而模式。

这是非常重要的。不然仅仅能添加开发的负担（在今后的实践中更好的体会）。”应该是说要依据实际的情况进行分层，毕竟不是绝对的，由于有些系统不分层比分层有点很多其它一些。

主要的分层主要用的是三层架构：

       表示层（UI）

       主要用于与用户的交互，负责传达用户的指令以及数据给BLL层。并把用户须要的数据显示出来，通俗的讲就是用户能见到的界面，如窗口程序。

       业务逻辑层（BLL）

       对数据的逻辑处理。比方把訪问数据库得到的数据，转换成用户向看到的数据，并提交给表示层进行显示。

       数据訪问层（DAL）

       对数据库进行訪问，提供增删改查等操作。

以下是我的包图，每一个包就是一个层，当中添加了实体层（Model）、接口层（IDAL）和工厂层（Factory）

实体层（Model）

实际上就是相应的数据库里面的每一张表。一个表就建一个类。一个类里面的属性则是相应表里面的字段，比方表BaseData_Info

在实体层中，就能够这样建立一个类：

Public Class BaseDataEntity
    Inherits Entity


    Private FixedUserHalfHourCost As Single      '固定用户半小时花费
    Public Property FixdUserHalfHourCost_ As Single
        Get
            Return FixedUserHalfHourCost
        End Get
        Set(value As Single)
            FixedUserHalfHourCost = value
        End Set
    End Property

    Private CasualUserAnHourCost As Single   '暂时用户一小时花费
    Public Property CasualUserAnHourCost_ As Single
        Get
            Return CasualUserAnHourCost

        End Get
        Set(value As Single)
            CasualUserAnHourCost = value
        End Set
    End Property

    Private IncreasingUnitTime As Single    '单位递增时间
    Public Property IncreasingUnitTime_ As Single
        Get
            Return IncreasingUnitTime
        End Get
        Set(value As Single)
            IncreasingUnitTime = value
        End Set
    End Property


    Private AtleastOnlineTime As Single      '最少在线时间
    Public Property AtleastOnlineTime_ As Single
        Get
            Return AtleastOnlineTime
        End Get
        Set(value As Single)
            AtleastOnlineTime = value
        End Set
    End Property

    Private ReadyTime As Single     '准备时间
    Public Property ReadyTime_ As Single
        Get
            Return ReadyTime
        End Get
        Set(value As Single)
            ReadyTime = value
        End Set
    End Property

    Private AtleastMoney As Single      '最少金额
    Public Property AtleastMoney_ As Single
        Get
            Return AtleastMoney
        End Get
        Set(value As Single)
            AtleastMoney = value
        End Set
    End Property

End Class

         有什么用呢？当你须要注冊一个用户时候，你得从表示层（UI）把数据传递给用于訪问数据库的数据訪问层（DAL），可是。你不可能把用户注冊的信息：学号。姓名，卡号，注冊日期，注冊时间，班级。。

。。。。等等把參数传递给函数。进行添加行操作吧？

’你该不会真的这么传值吧？被吓到了
    AddUser(StudentID,StudentName,CardID,RegisterDate,RegisterTime,Class。。。。。。)
    ’而假设你把这些数据封装成一个类。如上述，你仅仅须要传递一个类即可了
    AddUser(UserInfo)

数据库连接

对于数据库的訪问，基本上什么语言都离不开这么几步:

1.      连接数据库

2.      运行sql语句

3.      返回sql语句的运行结构

​

       以下是一个简单的数据库訪问样例：

ImportsSystem.Data.SqlClient   ’引用sqlclient
Public Class SelectDAL
    Public Overloads Function SelectInfo(ByVal Table As String)     '查询整张表
        Dim DataS As New DataSet
        Try
            Dim SelectStr As String = "select * from " & Table     '查询语句
            Dim ConnectStr As String ="Data Source=server名/server地址;Initial Catalog=数据库名; UserID=sa;Password=123"'数据库连接字符串
            Dim DBConnection As New SqlConnection(ConnectStr) '初始化数据库连接对象

            DBConnection.Open() '连接数据库
            'Dim DBCmd As New SqlCommand(SelectStr,DBConnection)    '运行查询语句
            Dim Adapter As New SqlDataAdapter(SelectStr,DBConnection)  '把查询结果保存到缓存中

            Adapter.Fill(DataS, Table)      '把缓存中的表以Table为名保存到DataSet中


        Catch ex As Exception
            Throw New ArgumentOutOfRangeException(""& ex.Message)       
End Try

        Return DataS

End Function

        当中连接数据库要用到的对象是SqlConnection。运行查询语句以及返回结果用的是SqlDataAdapter对象。

       数据库的连接有非常多种方式，如本地、远程等。

仅仅要參考參考数据库连接字符串，根据自身情况进行选择使用就能够达到目的。

反射+工厂、接口

          对于反射，一開始我非常的茫然，在设计模式里面敲了样例之后。查了非常多资料。也不知道怎么应用到收费系统中。确实笨到家了。

只是，后来看到了高人的博客。才会了。

看下图：

          假如说你有BLL和DAL2个层，你希望在BLL里面的一个类A使用DAL里面的BalanceDAL类，你能够通过引用DAL从而达到目的，可是，据说为了降低BLL与DAL的耦合性。所以在BLL和DAL之间加了个接口层叫IDAL。

例如以下图

          可以看到框中的是上面DAL里面BalanceDAL的接口。这个接口里面包括了详细类（BalanceDAL）的全部方法。所以我们仅仅要调用接口。就相当于调用了详细类（BalanceDAL），可是，前提是你必须把接口和详细类接通。就好比电视机和遥控器，遥控器是电视机接口，要想遥控器能控制接口。电视机里面应该要有一个可以接收并处理红外线新号的装置，当你使用遥控器的时候。遥控器跟电视机是联通的，他们之间通过了红外线联通。

其实，接口与详细类之间的关系，仅仅是两者之间创建了一条管道。接口中没有详细的功能，但却有那个详细类使用的一个方法（就像遥控器上的按键），假设遥控器跟电视机之间没有联通，那么你按一下遥控器，是不会实现开机或者调频等功能的。所以，要使用接口，必须让接口与详细实现的类进行联通，这里有两步走。第一步是引用，第二步是创建实例。看下图：

        在DAL的引用里把IDAL打上勾即可了也就相当于在这两个层之间架起了桥梁。接下来。我们让DAL来实现这个接口，也就是在DAL里面创建详细类之后。写上keyword+你要实现的接口，然后回车。它就会自己主动列出你在接口里写的方法，然后再方法里。你去详细的实现吧。

        然后，我们须要在桥梁上面加管道，加了管道，就是把接口的方法和详细类的方法连接起来。使得我在BLL层里面调用接口的方法。就相当于调用了详细类的方法，可是我BLL并不知道详细类究竟是怎么实现的，据说。这就是减少了BLL层与DAL层之间的耦合，由于我仅仅关心接口IDAL即可了。例如以下代码，看BLL里是怎样使用接口

Imports System.Reflection           ’反射的引用
Public ClassBalanceBLL
    FunctionBalanceQuery(ByVal CardID AsString)
        IfCardID = "" Then
            ThrowNewArgumentOutOfRangeException("","请输入卡号：")
        EndIf

        DimIBalance As IDAL.IBalance    '剩余金额接口
       IBalance = CType(Assembly.Load("DAL").CreateInstance("DAL.BalanceDAL"),IDAL.IBalance)   '得到剩余金额类
        DimDS As NewDataSet
        Try

           DS = IBalance.SelectBalanceInfo(CardID) '查询并返回数据集结果
            IfDS.Tables(0).Rows.Count < 1 Then
               Throw NewArgumentOutOfRangeException("","没有这个卡号的剩余金额记录")
            EndIf
        Catchex As Exception
            ThrowNewArgumentOutOfRangeException("",ex.Message)
        EndTry
        ReturnDS
    EndFunction

        这里，我们首先引用了反射，然后创建接口（IBalance），再然后就是通过反射。把DAL层里的BalanceDAL详细类的实例反射过来给接口。这样，我们就相当于在接口和详细类之间连接了管道，然后我们就能够使用详细类的方法了：IBalance.SelectBalanceInfo(CardID)'查询并返回数据集结果

        后来发现。把DAL层里面的类反射到BLL层里面。也就相当于在BLL层里面生产了DAL层的类，然后反射得到详细类的那些代码。我便抽象出了一个层，名曰Factory层。仅仅要BLL引用工厂，便能够通过工厂返回详细类了。

这也就是反射+工厂的应用吧。

        好像写的有点长。本来还有重载、配置文件、异常处理、存储过程等比較有用点的技术要写的。算了，放到下一篇吧。希望对大家有帮助。

        虽说面向对象比較复杂。可是整体的感觉，它就是把非常多复杂的东西分类、分块、分层、分......然后用线把他们窜起来，你不必全然的记住全部的分块，但你能够顺着那些图纸毫不保留的了解到细节。仅仅要去习惯这种思维方式。相信也不太难的。