vb.net机房收费系统重构——存储过程的使用

在敲写七层登陆过程中，接触了存储过程的概念，但当时还没使用。在正式的重构过程中，一点点添加，将存储过程也添加到了重构中。才正式了解了存储过程。

首先

【存储过程的概念】

存储过程procedure是一组为了完成特定功能的sql语句集合，经编译后存储在中，用户通过指定存储过程的名称并给出参数来执行。

存储过程中可以包含逻辑控制语句和数据操纵语句，它可以接受参数、输出参数、返回单个或多个结果集以及返回值。

【存储过程的使用】

首先，打开数据库——存储过程

右键—新建存储过程

 

create procedure <存储过程名称> 
	-- add the parameters for the stored procedure here
	<@param1, sysname, @p1>  = , 
	<@param2, sysname, @p2>  = 
as
begin
	-- set nocount on added to prevent extra result sets from
	-- interfering with select statements.
	set nocount on;

    -- insert statements for procedure here
	select <@param1, sysname, @p1>, <@param2, sysname, @p2>
end
go

 

例如在机房收费中注册新用户的存储过程

 

create procedure [dbo].[pro_register]
	-- add the parameters for the stored procedure here
	@cardno char(12),
	@studentno char(12),
	@studentname char(12),
	@sex char(12),
	@department char(12),
	@grade char(12),
	@class char(12),
	@explain varchar(50),
	@ischeck char(12),
	@type char(12),
	@cash numeric(18,1),
	@date date,
	@time time(0),
	@userid char(12),
	@status char(12)
	
as
begin

	insert into t_student(cardno,studentname,studentno,sex,department,grade,class,cash,explain,ischeck,userid,type,status)values(@cardno ,@studentname,'12',@sex,@department,@grade,@class,@cash,@explain,@ischeck,@userid,@type,@status)
	
	insert into t_recharge(cardno,studentno,addmoney,date,time,userid,status)values(@cardno,@studentno,@cash,@date,@time,@userid,@status)

end

 

 

存储过程名称为：pro_register

调用时在d层

 

public function selectstudent(byval student as entity.studententity, byval recharge as entity.rechargeentity) as boolean implements idal.istudent.selectstudent

        dim sqlparams as sqlparameter() = {new sqlparameter("@cardno", student.cardno),
                                           new sqlparameter("@studentname", student.studentname),
                                           new sqlparameter("@studentno", student.studentno),
                                           new sqlparameter("@sex", student.sex),
                                           new sqlparameter("@department", student.department),
                                           new sqlparameter("@grade", student.status),
                                           new sqlparameter("@class", student.clas),
                                           new sqlparameter("@cash", student.cash),
                                           new sqlparameter("@explain", student.explain),
                                           new sqlparameter("@ischeck", "未结账"),
                                           new sqlparameter("@userid", student.userid),
                                           new sqlparameter("@type", student.type),
                                           new sqlparameter("@status", student.status),
                                           new sqlparameter("@date", recharge.dater),
                                           new sqlparameter("@time", recharge.timer)
                                          }

        dim strsql = "pro_register"

        dim helper as new sqlhelper
        dim dt as new integer



        dt = helper.exeadddelupdate("pro_register", commandtype.storedprocedure, sqlparams)

        if dt > 0 then
            return true
        else
            return false
        end if

 

【存储过程的优点】

存储过程允许标准式

1、存储过程允许标准式组件编程

存储过程创建后可以在程序中被多次调用执行，而不必重新编写该存储过程的sql语句。而且数据库专业人员可以随时对存储过程进行修改，但对应用程序源代码却毫无影响，从而极大的提高了程序的可移植性。

2、 存储过程能够实现较快的执行速度

如果某一操作包含大量的t-sql语句代码，分别被多次执行，那么存储过程要比批处理的执行速度快得多。因为存储过程是预编译的，在首次运行一个存储过程时，查询优化器对其进行分析、优化，并给出最终被存在系统表中的存储计划。而批处理的t-sql语句每次运行都需要预编译和优化，所以速度就要慢一些。

在机房收费系统中，由于数据量和用户都比较小，可能体会不到批处理和存储过程的区别。当用户较多数据量较大时，此方法的优点较为明显。

3、 存储过程减轻网络流量

对于同一个针对数据库对象的操作，如果这一操作所涉及到的t-sql语句被组织成一存储过程，那么当在客户机上调用该存储过程时，网络中传递的只是该调用语句，否则将会是多条sql语句。从而减轻了网络流量，降低了网络负载。

此优点也是当数据量较大时可以明显体会出存储过程的优势。

4、 存储过程可被作为一种安全机制来充分利用

系统管理员可以对执行的某一个存储过程进行权限限制，从而能够实现对某些数据访问的限制，避免非授权用户对数据的访问，保证数据的安全。