一、背景
机房收费系统也敲了一段时间了,其中也遇到了很多问题,开始师父叫我先敲三层,后面再逐步添加存储过程、泛型、七层和设计模式等内容。开始觉得能敲三层就很不错了,但是敲了将近10个窗体的时候,觉得只敲三层太没意思了,而且每涉及到多表操作的时候,我都要敲一个过程,每一层里我都要写多一个过程,于是就想到了存储过层,觉得不能就这么简单没意思的罗列代码。
下面以注册为例,先看看我没有加存储过程的D层代码
<span style="font-family:KaiTi_GB2312;font-size:24px;"> Public Function FillStudent(ByVal student As Model.studentEntity) As Model.studentEntity
Dim conn As New SqlConnection '创建连接对象
Dim cmd As New SqlCommand '创建命令对象
conn = New SqlConnection(Dtutil.connstring()) '连接数据库
cmd.Connection = conn '初始化
cmd.CommandText = "Insert INTO Students(studentNO,studentName,sex,class,grade,cardNo ,department,static ,money,type,userID,checks,RegisterDate,RegisterTime)values(@studentNO,@studentName,@sex,@class,@grade,@cardNo,@checks,@Department,@static,@money,@type,@userNo,@RegisterDate,@RegisterTime)"
cmd.Parameters.Add(New SqlParameter("@studentNO", student.studentNo))
cmd.Parameters.Add(New SqlParameter("@studentName", student.studentName))
cmd.Parameters.Add(New SqlParameter("@sex", student.Sex))
cmd.Parameters.Add(New SqlParameter("@class", student.ClassNo))
cmd.Parameters.Add(New SqlParameter("@grade", student.Grade))
cmd.Parameters.Add(New SqlParameter("@CardNO", student.CardNo))
cmd.Parameters.Add(New SqlParameter("@Department", student.Department))
cmd.Parameters.Add(New SqlParameter("@static", student.StaticCard))
cmd.Parameters.Add(New SqlParameter("@money", student.Money))
cmd.Parameters.Add(New SqlParameter("@type", student.Type))
cmd.Parameters.Add(New SqlParameter("@userNO", student.UserNo))
cmd.Parameters.Add(New SqlParameter("@checks", "未结账"))
student.RegisterDate = Format(Now, "yyyy/MM/dd")
student.RegisterTime = Format(Now, "HH:mm:ss")
cmd.Parameters.Add(New SqlParameter("@RegisterDate", student.RegisterDate))
cmd.Parameters.Add(New SqlParameter("@RegisterTime", student.RegisterTime))
conn.Open()
num = cmd.ExecuteNonQuery() '执行插入命令
conn.Close()
Return students
End Function</span>
这也只是一部分代码,因为注册还涉及到充值表,于是,我还有一段基本上一样的代码。所以总觉得自己真的像个码农,不懂得思考,机械式的敲着重复的代码。但是我又不了解存储过程,我也不知道怎么用。于是翻了一下《数据库系统原理》。
二、存储过程
1、了解
存储过程是存放咱服务器上的预先的编译好的SQL语句。存储过程的优点主要有提供了安全机制、改进执行性能、减少了网络流量和增强了代码的重用性。了解到存储过程有这么多优点,看来我是必须要学会用它了。
它的基本语法规则是:
<span style="font-family:KaiTi_GB2312;font-size:24px;">CREATE PROCEDURE PROC_NAME
@[参数名] [类型],@[参数名] [类型]……
AS
BEGIN
[过程体].........
END</span>
2、使用
接下来依旧是以注册为例,看看在机房收费系统同中如何使用存储过程。
1)新建存储过程
2)在SQL server中编译代码
<span style="font-family:KaiTi_GB2312;font-size:24px;">CREATE PROCEDURE PROC_Register
--定义参数
@Cardno varchar(6),@money decimal(5,1),@userID varchar(60) ,@dates date ,@times time ,@checks nvarchar(20) ,@comment nvarchar(20),
@studentName nvarchar(10) ,@studentNO varchar(18),@type nvarchar(10),@static nvarchar(50),@RegisterDate date,@RegisterTime time,
@sex varchar(6) ,@class nvarchar(20),@grade nvarchar(20),@department nvarchar(30),@addmoney decimal(5,1)
as
--
begin
--对表进行操作
insert into Students (studentNO ,studentName ,sex,class, grade, cardNo ,department,static ,money,type,userID,checks,RegisterDate,RegisterTime)values(@studentNo,@studentName ,@sex ,@class ,@grade ,@Cardno ,@department ,@static ,@money ,@type ,@userID ,@checks ,@RegisterDate ,@RegisterTime )
insert into Recharge (cardNo ,addmoney ,money ,dates ,times ,userID ,comment ,checks )values(@Cardno ,@addmoney ,@money ,@dates ,@times,@userID ,@comment ,@checks )
end
</span>
代码编译完成后对其进行执行,执行成功后数据库中遍生成了存储过程。
3)vb.net中机房收费系统中D层代码的编写
<span style="font-family:KaiTi_GB2312;font-size:24px;">Imports System.Data
Imports System.Data.SqlClient
Imports System.Configuration
Public Class RegisterDAL : Implements IDAL.IRegister
Public Function Insert(ByVal student As Model.studentEntity, ByVal card As Model.RechargeEntity) As Boolean Implements IDAL.IRegister.Insert
'定义SqlHelper实例
Dim cmdType As CommandType = CommandType.StoredProcedure '定义数据库命令类型
Dim cmdText As String = "Proc_Register" '数据库执行字符串
Dim parameters As SqlParameter() '定义参数数组,负责向存储过程中的变量传值
'为参数数组中的参数一一赋值
parameters = {New SqlParameter("@studentNO", student.studentNo),
New SqlParameter("@studentName", student.studentName),
New SqlParameter("@sex", student.Sex),
New SqlParameter("@class", student.ClassNo),
New SqlParameter("@grade", student.Grade),
New SqlParameter("@Cardno", student.CardNo),
New SqlParameter("@money", student.Money),
New SqlParameter("@type", student.Type),
New SqlParameter("@RegisterDate", student.RegisterDate),
New SqlParameter("@RegisterTime", student.RegisterTime),
New SqlParameter("@addmoney", student.Money),
New SqlParameter("@dates", student.RegisterDate),
New SqlParameter("@times", student.RegisterTime),
New SqlParameter("@department", student.Department),
New SqlParameter("@static", "使用"),
New SqlParameter("@checks", "未结账"),
New SqlParameter("@comment", "注册"),
New SqlParameter("@userID", student.UserNo)}
Return SqlHelper.ExecuteNoQuery(cmdText, CommandType.StoredProcedure, parameters)
End Function
End Class
</span>
这样看上去D层代码就比之前的少了很多。
三、小结
存储过程的使用,也让接触了很多新的我不懂或不太了解的内容,所以在学着使用存储过程的过程中我也学会了接口的使用,进一步了解了sqlhelper这部分内容,也学会了配置文件的使用,而且到现在我也遇到了其他问题,如外观模式和泛型等。
路漫漫其修远兮,吾将上下而求索!