在机房收费系统中的结账部分,要求选中操作员然后点击结账按钮后,将该操作员办理的注册、充值、退卡业务的状态改为已结账。注册、充值和退卡分别记录在三张表中,如果按照传统的办法,需要在DAL层写三个函数,分别update每张表的isCheck为true,且不说写多
在机房收费系统中的“结账”部分,要求选中操作员然后点击“结账”按钮后,将该操作员办理的注册、充值、退卡业务的状态改为“已结账”。注册、充值和退卡分别记录在三张表中,如果按照传统的办法,需要在DAL层写三个函数,分别update每张表的isCheck为“true”,且不说写多少代码,费多少力气,这样还降低了系统的运行速度,容易出错。
在个人版机房收费系统重构中,我们不是像以前那样只要功能实现即可,而是变“懒”了,对重复的工作Say No,在这里就引入了存储过程来解决这个问题。存储过程是使用SQL语句和流程控制语句编写的模块,经编译和优化后存储在数据库服务器端的数据库中,使用时调用即可。
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通过以上对比,发现其实存储过程的使用很简单,只需更改 CommandType 为StoredProcedure,不用小心翼翼地写SQL语句,而是换成写好的存储过程的名称。
相对于直接使用SQL语句,在应用程序中直接调用存储过程有以下好处:减轻了程序编写的工作量,降低了网络通信量。调用一个行数不多的存储过程与直接调用SQL语句的网络通信量可能不会有很大的差别,可是如果存储过程包含上百行SQL语句,那么其性能绝对比一条一条的调用SQL语句要高得多。由于在存储过程创建的时候,数据库已经对其进行了一次解析和优化。存储过程一旦执行,在内存中就会保留一份这个存储过程,这样下次再执行同样的存储过程时,可以从内存中直接调用,从而提高了执行速度。同时增强了SQL的功能和灵活性,间接实现安全控制功能。
这是第一次使用存储过程,今后还会不断地学习和运用。迈出了第一步,前边的路就好走了。