在机房收费系统中的“结账”部分,要求选中操作员然后点击“结账”button后,将该操作员办理的注冊、充值、退卡业务的状态改为“已结账”。注冊、充值和退卡分别记录在三张表中,假设依照传统的办法,须要在DAL层写三个函数,分别update每张表的isCheck为“true”,且不说写多少代码,费多少力气,这样还减少了系统的执行速度,easy出错。
在个人版机房收费系统重构中,我们不是像曾经那样仅仅要功能实现就可以,而是变“懒”了,对反复的工作Say No,在这里就引入了存储过程来解决问题。存储过程是使用SQL语句和流程控制语句编写的模块,经编译和优化后存储在数据库server端的数据库中,使用时调用就可以。
1.存储过程的创建:
选择要使用存储过程下的“可编程性”,点开“+”号选择"存储过程",右击在快捷菜单中选择"新建存储过程",然后显示出例如以下的界面。咋一看有好多代码,事实上就是个模板,我们仅仅需填写一下。
注意:要在參数后注明数据类型,和数据库中对应的字段类型保持一致。
2.使用存储过程的D层代码:
'结账后将该用户操作的业务[充值,退卡,注冊卡]isCheck改为true Public Function UpdateIsCheck(ecard As Card) As Boolean Implements ICheckOut.UpdateIsCheck Dim sqlHelper As New SqlHelper.sqlHelper '实例化sqlHelper类 Dim cmdType As <strong>CommandType</strong> = CommandType.StoredProcedure '定义命令类型,存储过程 <strong>Dim cmdText As String = "PROC_CheckOut" </strong> '数据库运行字符串 '传參 Dim params As SqlParameter() params = {New SqlParameter("@ischeck", ecard.ProisCheck), New SqlParameter("@userID", ecard.ProuserID)} Return sqlHelper<strong>.ExecuteNoQuery(cmdText, cmdType, params)</strong> End Function
3.使用SQL语句的代码:
Public Function ModifyPwd(euser As User) As Integer Implements IPwd.ModifyPwd Dim strSQL As String = "update T_User set userPwd =@pwd where userID=@userID" Dim params() As SqlParameter = {New SqlParameter("@pwd", euser.ProuserPwd), New SqlParameter("@userID", euser.ProuserID)} Dim helper As New SqlHelper.sqlHelper Dim result = helper.ExecuteNoQuery(strSQL, CommandType.Text, params) Return result End Function
通过以上对照,发现事实上存储过程的使用非常easy,仅仅需更改 CommandType 为StoredProcedure,不用小心翼翼地写SQL语句,而是换成写好的存储过程的名称。
相对于直接使用SQL语句,在应用程序中直接调用存储过程有下面优点:减轻了程序编写的工作量,减少了网络通信量。调用一个行数不多的存储过程与直接调用SQL语句的网络通信量可能不会有非常大的区别,但是假设存储过程包括上百行SQL语句,那么其性能绝对照一条一条的调用SQL语句要高得多。因为在存储过程创建的时候,数据库已经对其进行了一次解析和优化。存储过程一旦运行,在内存中就会保留一份这个存储过程,这样下次再运行相同的存储过程时,能够从内存中直接调用,从而提高了运行速度。同一时候增强了SQL的功能和灵活性,间接实现安全控制功能。
这是第一次使用存储过程,今后还会不断地学习和运用。迈出了第一步,前边的路就好走了。