SQL中的存储过程

       机房收费系统的重构中使用了三层，将对数据库的操作放到了D层中，面向对象的思想对D层进行了进一步的抽象抽象出来SQLHlper，但还是避免不了像机房收费系统中类似“注册”这样的功能要同时向多张数据表中增加记录。在机房收费系统中实现“注册”功能时，要同时向卡表、学生信息表、充值记录表三张表增加记录，就算是通过外观层将B层的这三个增加记录的方法组合调用，我们也不能保证在增加记录的过程中不出错，导致在卡表中增加了新的记录而在其他的表中由于错误没有增加记录，为了解决这个问题在重构中就使用了SQL的存储过程。以下以学生注册功能为例，学习存储过程的使用。

       首先要在数据库中写入存储过程

       然后开始对存储过程进行编写

Public Function EnrollNewCard1(entityCard As Entity.Model.CardEntity, entiryStu As Entity.Model.StudentInfoEntity) As Boolean Implements IDAL.IEnrollNewCard.EnrollNewCard
'如下为增加的参数
Dim paras As SqlParameter() = {
New SqlParameter("@cardID", entityCard.cardID),                                                                                New SqlParameter("@studentName", entiryStu.studentName),
New SqlParameter("@studentSex", entiryStu.studentSex),
New SqlParameter("@studentClass", entiryStu.studentClass),
New SqlParameter("@studentGrade", entiryStu.studentGrade),
New SqlParameter("@studentAbout", entiryStu.studentAbout),
New SqlParameter("@studentMajor", entiryStu.studentMajor),
New SqlParameter("@stuEnrollDay", entiryStu.stuEnrollDay),
New SqlParameter("@stuEnrollTime", entiryStu.stuEnrollTime),
New SqlParameter("@state", entityCard.state)}
    Dim strProc As String = "EnrollNewCard"  '该字符串为存储过程的名字
    Dim result As Integer
result = SQLDBHlper.ExecuteProcedure(strProc, paras)  '调用SQLHlper中的执行存储过程的方法

    If result = 0 Then   '如果返回的结果是“0”说明添加失败
        Return False
    Else
       Return True
    End If
End Function

       这样在U层的窗体输好要注册的信息时，只需要通过B层调用D层的该方法即可，不用调用多了D层的方法分别向数据库的表中增加记录。

小结

       在准备自考的过程中存储过程只是了解到了而且看的云里雾里，现在是真正的用到了，理解就容易多了，编写好的SQL存储过程和程序结合，不仅能够减少程序的代码还能简化代码的逻辑。

       现在越来越明白为什么米老师会说学的东西掌握80%就可以了，剩余的不是不要了，而是在以后的学习别的知识或实践的过程中会有进一步的体会。