VB.NET版机房重构之存储过程+事务实现注册

前端之家收集整理的这篇文章主要介绍了VB.NET版机房重构之存储过程+事务实现注册前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

这次机房收费系统采用三层的思想,每一条线中参数和返回值在层与层之间传递实现一个操作,思路很清晰,不过有的业务涉及到多条sql语句,比如充值的时候除了增加充值记录还要去更新卡表中的卡内余额,当然如果我们写两条线没有问题,存储过程便可以解决这个问题,它是实现一定功能的语句组成的程序段,封装了几步操作的sql语句,然后定义sql语句时直接用存储过程代替,太厉害了。

首先,选择使用的数据库可编程性存储过程新建存储过程,首先编辑存储过程名称,然后是sql语句中使用到的参数及类型,在begin下面编写使用到的sql语句,在这里我使用的存储过程+事务,就多了几条语句,其实也很简单,事务开始语句begin transaction,结束时有两种,一个是rollback(没有成功提交),一个是commit(提交事务)。

-- =============================================
-- Author:		李立平
-- Create date: 2014-09-14
-- Description:	存储过程+事务实现学生注册,涉及到T_Card,T_Student,T_Recharge三张表
-- =============================================

ALTER procedure [dbo].[PROC_Register]
@cardNo char(10),@presentCash numeric(10,0),@loginDate date,@loginTime time(0),@type char(10),@UserID char(10),@status char(10),@studentNo char(10),@studentName char(10),@sex char(10),@department char(10),@grade char(10),@class char(10),@addMoney numeric(10,@date DATE,@time time(0),@checkStatus char(10)
AS
BEGIN
declare @Err1 int,@Err2 int,@Err3 int
begin transaction
INSERT into T_Card (cardNo,presentCash,loginDate,loginTime,type,UserID,status )VALUES(@cardNo,@presentCash,@loginDate,@loginTime,@type,@UserID,'使用')
set @Err1=@@Error  
INSERT into T_Student(studentNo,cardNo,studentName,sex,department,grade,class) VALUES(@studentNo,@cardNo,@studentName,@sex,@department,@grade,@class )
set @Err2=@@Error  
INSERT into T_Recharge (cardNo,addMoney,date,time,checkStatus ) values(@cardNo,@addMoney,@date,@time,'未结帐')
set @Err3=@@Error  
 
if @Err1 =0 and @Err2 =0 and @Err3 =0
	COMMIT TRANSACTION
ELSE
	ROLLBACK TRANSACTION
END

然后编辑完成后要执行,出现命令已成功完成后才完整保存。然后使用的时候直接用存储过程代替sql语句,命令类型改为存储过程即可,和其他的使用不同的也就在D层的代码上,其他层代码和原来一样。

Imports System.Data.sqlClient
Imports ChargeEntity
'/*********************
'类名称:RegisterDAL
'功能:
'命名空间:Charge.DAL
'作者:李立平
'小组:
'时间:2014/8/28 20:08:25
'版本号:v2.0.0

'**********************/
Public Class RegisterDAL : Implements ChargeIDAL.IRegister
    ''' <summary>
    ''' 注册
    ''' </summary>
    ''' <param name="enCard1"></param>
    ''' <param name="enStudent"></param>
    ''' <param name="enRecharge"></param>
    ''' <returns>受影响行数</returns>
    ''' <remarks></remarks>
    Public Function Register(ByVal enCard1 As ChargeEntity.CardEntity,enStudent As ChargeEntity.StudentEntity,enRecharge As ChargeEntity.RechargeEntity) As Integer Implements ChargeIDAL.IRegister.Register
        Dim cmdText As String = "PROC_Register"  'sql语句
        Dim cmdType As String = CommandType.StoredProcedure  '命令类型
        Dim Parameter As sqlParameter()
        '传参
        Parameter = {New sqlParameter("@cardNo",enCard1.cardNo),New sqlParameter("@presentCash",enCard1.presentCash),New sqlParameter("@loginDate",Now),New sqlParameter("@loginTime",New sqlParameter("@type",enCard1.type),New sqlParameter("@UserID",enCard1.UserID),New sqlParameter("@status",enCard1.status),New sqlParameter("@studentNo",enStudent.studentNo),New sqlParameter("@studentName",enStudent.studentName),New sqlParameter("@sex",enStudent.sex),New sqlParameter("@department",enStudent.department),New sqlParameter("@grade",enStudent.grade),New sqlParameter("@class",enStudent.class),New sqlParameter("@addMoney",enRecharge.addMoney),New sqlParameter("@date",New sqlParameter("@time",New sqlParameter("@checkStatus",enRecharge.checkStatus)}

        Dim sqlHelper As New sqlHelper
        Dim res As Integer

        res = sqlHelper.ExecuteNoQuery(cmdText,cmdType,Parameter) '调用sqlHelper类ExecuteNoQuery方法
        Return res '返回受影响的行数

    End Function
End Class

一、好处

首先,存储过程封装了一组语句,让整个业务的实现具有打包思想,简单清晰。

二、存储过程与事务

区别1、存储过程是完成一定功能可重复调用的程序,可以理解成函数,就是一种工具,编译时一步步执行。2、事务也是一系列的对数据库的操作,但它强调一致性,这些操作要么全做,要么不做,它是不容分割的整体。比如你取款时取款机的操作,取款和更新账户余额就是一致的,不能说取完钱因为没电或系统崩溃而不更新卡上余额,岂不乱套了?

联系事务可能是一个或几个存储过程,存储过程可以包含多个事务。在机房注册涉及到3张表,学生表,卡表和充值表,这些操作就具有一致性,存储过程+注册还是很好解决注册的问题!机房中的充值、退卡、上下机、结账或者说不能一步就能解决的问题都可以使用存储过程+事务,真的很实用!

原文链接:https://www.f2er.com/vb/257790.html

猜你在找的VB相关文章