机房收费系统（个人重构）——存储过程

时间：2022-12-20 15:42:23

     （本篇博客的真正目的不在知识的共享，而是记录当时问题的遗漏，以及此时关于这些问题的想法。）

    存储过程：

一组为完成特定功能的sql语句集，用户通过制定存储过程的名字并给出参数（若该存储过程带有参数）来执行它。

知名其意，sql语句集：一系列的sql语句组成的集合，也就是说，当我们有一系列的sql语句要写时（即对多张表操作时）就可以考虑存储过程了，然后直接调用存储过程名字即可。但是我下面列举的实例并不属于这种情况，而是在D层设计到逻辑判断时，我选择了存储过程，一方面了解存储过程的使用，另一方面认识一下它。

组合查询，机房一大难点，第一次做系统时，选择的是拼接字符串，来写sql语句，这次如果照旧，就有些浑水摸鱼的感觉了，所以，组合查询我调入了模板模式，存储过程，抽出这些相同窗体的共同部分写成实体，通过的实体的传递，调用同一个存储过程，避免D层大量的代码。

先看D层代码（起初不加入存储过程）：

Public Function selectInfo(enGroupQuery As GroupQueryEntity) As Object Implements IgroupQuery.selectInfo
        Dim sql As String
        Dim table As DataTable
        Dim sqlParams As SqlParameter() = {New SqlParameter("@fileds1", enGroupQuery.Fileds1),
                                        New SqlParameter("@fileds2", enGroupQuery.Fileds2),
                                        New SqlParameter("@fileds3", enGroupQuery.Fileds3),
                                        New SqlParameter("@Operater1", enGroupQuery.Operater1),
                                        New SqlParameter("@operater2", enGroupQuery.Operater2),
                                        New SqlParameter("@operater3", enGroupQuery.Operater3),
                                        New SqlParameter("@context1", enGroupQuery.Context1),
                                        New SqlParameter("@context2", enGroupQuery.Context2),
                                        New SqlParameter("@context3", enGroupQuery.Context3),
                                        New SqlParameter("@relation1", enGroupQuery.Relation1),
                                        New SqlParameter("@relation2", enGroupQuery.Relation2),
                                        New SqlParameter("@gettable", enGroupQuery.Table)}

        sql = "select * from " & enGroupQuery.Table & " where "
        If Trim(enGroupQuery.Relation1) = "" Then '只有一组查询条件
            sql = sql & enGroupQuery.Fileds1 & enGroupQuery.Operater1 & "'" & enGroupQuery.Context1 & "'"
        Else
            If Trim(enGroupQuery.Relation2) = "" Then '有两组查询条件
                sql = sql & enGroupQuery.Fileds1 & enGroupQuery.Operater1 & "'" & enGroupQuery.Context1 & "'" & enGroupQuery.Relation1 & " " & enGroupQuery.Fileds2 & enGroupQuery.Operater2 & "'" & enGroupQuery.Context2 & "'"
            Else '有三组查询条件
                sql = sql = sql & enGroupQuery.Fileds1 & enGroupQuery.Operater1 & "'" & enGroupQuery.Context1 & "'" & enGroupQuery.Relation1 & " " & enGroupQuery.Fileds2 & enGroupQuery.Operater2 & "'" & enGroupQuery.Context2 & "'" & enGroupQuery.Relation2 & " " & enGroupQuery.Fileds3 & enGroupQuery.Operater3 & "'" & enGroupQuery.Context3 & "'"
            End If
        End If

        table = sqlhelper.GetDataTable(sql, CommandType.Text, sqlParams)
        Return table

    End Function
问题就是：存在大量的逻辑判断，事实上是不允许的，所以，加入存储过程：（之后的D层）： 

Public Function selectInfo(enGroupQuery As GroupQueryEntity) As Object Implements IgroupQuery.selectInfo
        Dim sql As String = "GROUPCHECK_INFO" '存储过程的名字，直接调用就行。
        Dim table As DataTable
        Dim sqlParams As SqlParameter() = {New SqlParameter("@fileds1", enGroupQuery.Fileds1),
                                        New SqlParameter("@fileds2", enGroupQuery.Fileds2),
                                        New SqlParameter("@fileds3", enGroupQuery.Fileds3),
                                        New SqlParameter("@Operater1", enGroupQuery.Operater1),
                                        New SqlParameter("@operater2", enGroupQuery.Operater2),
                                        New SqlParameter("@operater3", enGroupQuery.Operater3),
                                        New SqlParameter("@context1", enGroupQuery.Context1),
                                        New SqlParameter("@context2", enGroupQuery.Context2),
                                        New SqlParameter("@context3", enGroupQuery.Context3),
                                        New SqlParameter("@relation1", enGroupQuery.Relation1),
                                        New SqlParameter("@relation2", enGroupQuery.Relation2),
                                        New SqlParameter("@gettable", enGroupQuery.Table)}

        table = sqlhelper.GetDataTable(sql, CommandType.StoredProcedure, sqlParams)
        Return table

    End Function
End Class
至于存储过程的过程，我是根据数据库系统原理里的创建存储过程写的。 

-- =============================================
-- Author:<贾丽敏>
-- Create date: <2015-3-21>
-- Description:<组合查询存储过程>
-- =============================================
ALTER PROCEDURE [dbo].[GROUPCHECK_INFO]

-- Add the parameters for the stored procedure here

@Operater1 varchar(20),
@operater2 varchar(20),
@operater3 varchar(20),
@context1 varchar(20),
@context2 varchar(20),
@context3 varchar(20),
@relation1 varchar(20),
@relation2 varchar(20),
@fileds1 varchar(20),
@fileds2 varchar(20),
@fileds3 varchar(20),
@gettable  VARCHAR(20)


AS
declare @strSQL varchar(2000)
BEGIN
--CHAR(32)表示空格，CHAR(39)表示单引号
SET @strSQL ='select * from ' + @gettable + ' where ' +CHAR(32)+@fileds1 + @Operater1 + CHAR(39)+ @context1 +CHAR(39)
if (@relation1 != NULL)
BEGIN
SET @strSQL =@strSQL +CHAR(32)+@relation1 +CHAR(32)+@fileds2 + @operater2 +CHAR(39)+ @context2 +CHAR(39)
if (@relation2 != null)
BEGIN
SET @strSQL =@strSQL +CHAR(32)+@relation2 + CHAR(32)+@fileds3 + @operater3 +CHAR(39)+ @context3 + CHAR(39)
END
END
EXECUTE(@strSQL)
END
自己这次存储过程的引入，只是实现逻辑运算的搬移工作。

遗漏问题：

1·在没有引入存储过程之前，D层代码中：我是利用实体字段在写sql语句的，其实应该用参数来代替的，可是这里又设计到sql语句字符串拼接的格式问题，对比于之前的vb版本的系统，修改过多次，没有实现。求解。

2·在引入存储过程后，创建的过程中，又引入“引号”不完整问题，查阅过相关资料后也还是不清楚到底该怎么用，这也是遗留的一个问题：一个引号时，表示所辖内容；三个引号时，第一个表示字符串前引号，第二个是转义字符，第三个表示引号（字符内容），可是这里并没有涉及到转义字符，所以，这点还是有些迷糊，挂起来！






标签：

相关文章