加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

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

发布时间:2020-12-17 00:13:02 所属栏目:大数据 来源:网络整理
导读:在敲写七层登陆过程中,接触了存储过程的概念,但当时还没使用。在正式的重构过程中,一点点添加,将存储过程也添加到了重构中。才正式了解了存储过程。 首先 【存储过程的概念】 存储过程Procedure是一组为了完成特定功能的SQL语句集合,经编译后存储在数据

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

首先

【存储过程的概念】

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

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

【存储过程的使用】

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

右键—新建存储过程

CREATE PROCEDURE <存储过程名称> 
	-- Add the parameters for the stored procedure here
	<@Param1,sysname,@p1> <Datatype_For_Param1,int> = <Default_Value_For_Param1,0>,<@Param2,@p2> <Datatype_For_Param2,int> = <Default_Value_For_Param2,0>
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,@p1>,@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,Addmoney,Date,Time,@Studentno,@Date,@Time,@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",New SqlParameter("@Date",recharge.Dater),New SqlParameter("@Time",recharge.Timer)
                                          }

        Dim strSql = "<span style="color:#FF0000;">pro_Register</span>"

        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、 存储过程可被作为一种安全机制来充分利用

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

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读