首页 > 代码库 > SqlHelper——数据库小助手

SqlHelper——数据库小助手


SqlHelper事实上就是一个类。

    早就听说过“SqlHelper”这个名词。也查过相关的资料。但还是一头雾水。当真的去实践去用它时,就会发现事实上它没那么神奇。

    当敲第一个窗口的时候。功能实现了,我们就会认为非常高兴。大功告成了。但是当敲完第二个窗口、第三个窗口的时候,慢慢的就開始认为代码反复的太多了。越敲就越认为心虚。尽管设计模式学的不怎么样,但是最起码让我有了这个意识去想怎么让代码更少一些。让彼此之间的耦合度尽量降低。

在三层中,要数D层的代码相似度最高了,总结来说,也就是连接数据库。增删改查的功能。那么。我们全然能够把这部分共同的东西拿出来放在一起。这样既能降低了代码量,也非常好的做到了封装。

SqlHelper这个类里,有几个方法

   在sqlhelper中,最重要的无非是那几个增删改查的方法了。

查了非常多博客,类中的方法也有非常多种,包含ExecuteNonQuery、ExecuteReader、ExecuteDataSet、ExecuteScalar、ExecuteXmlReader等。但我们并不会都用到。有的方法了解一下就好了。方法能够划分的细。但假设分的太细。就会弄的太复杂了。

我习惯把方法分的少一些。

技术分享

Public Class sqlHelper
    ‘‘‘ <summary>
    ‘‘‘ 有參数的增、删、改操作
    ‘‘‘ </summary>
    ‘‘‘ <param name="cmdText"></param>
    ‘‘‘ <param name="cmdType"></param>
    ‘‘‘ <param name="paras"></param>
    ‘‘‘ <returns></returns>
    ‘‘‘ <remarks></remarks>
    Public Function ExecuteNoQuery(cmdText As String, cmdType As CommandType, paras As SqlParameter()) As Integer
        Dim ConnStr As String = System.Configuration.ConfigurationManager.AppSettings("ConnStr")
        Dim conn As SqlConnection = New SqlConnection(ConnStr)
        ‘定义一个命令对象
        Dim cmd As New SqlCommand
        cmd = New SqlCommand(cmdText, conn)   ‘budong
        cmd.CommandType = cmdType
        cmd.Parameters.AddRange(paras)
        Dim res As Integer  ‘定义一个变量用户存放返回结果
     
        Try
            ‘打开数据库
            If conn.State = ConnectionState.Closed Then

                conn.Open()
            End If

            res = cmd.ExecuteNonQuery()
        Catch ex As Exception
            MsgBox(ex.Message, "数据库操作")
        Finally
            ‘关闭数据库
            If conn.State = ConnectionState.Open Then
                conn.Close()
            End If
        End Try
        Return res ‘返回受影响的行数
    End Function

    ‘‘‘ <summary>
    ‘‘‘ 无參数的增、删、改操作
    ‘‘‘ </summary>
    ‘‘‘ <param name="cmdText"></param>
    ‘‘‘ <param name="cmdType"></param>
    ‘‘‘ <returns></returns>
    ‘‘‘ <remarks></remarks>
    Public Shared Function ExecuteNoQuery(cmdText As String, cmdType As CommandType) As Integer
        Dim ConnStr As String = System.Configuration.ConfigurationManager.AppSettings("ConnStr")
        Dim conn As SqlConnection = New SqlConnection(ConnStr)

        Dim cmd As New SqlCommand  ‘定义一个命令对象
        cmd.CommandType = cmdType

        cmd = New SqlCommand(cmdText, conn)
        Dim res As Integer  ‘定义一个变量用户存放返回结果
        ‘cmd.Parameters.AddRange(paras)     该方法没有參数,不用加入
        Try
            ‘打开数据库
            If conn.State = ConnectionState.Closed Then

                conn.Open()
            End If

            res = cmd.ExecuteNonQuery()
        Catch ex As Exception
            MsgBox(ex.Message, "数据库操作")
        Finally
            ‘关闭数据库
            If conn.State = ConnectionState.Open Then
                conn.Close()
            End If
        End Try
        ‘返回受影响的行数
        Return res
    End Function


    ‘‘‘ <summary>
    ‘‘‘ 有參数的查询操作
    ‘‘‘ </summary>
    ‘‘‘ <param name="cmdTxt"></param>
    ‘‘‘ <param name="cmdType"></param>
    ‘‘‘ <param name="paras"></param>
    ‘‘‘ <returns></returns>
    ‘‘‘ <remarks></remarks>
    Public Function GetDataTable(ByVal cmdTxt As String, ByVal cmdType As CommandType, ByVal paras As SqlParameter()) As DataTable
        Dim strConnStr As String = System.Configuration.ConfigurationManager.AppSettings("ConnStr")
        ‘定义一个数据库连接对象  
        Dim conn As SqlConnection = New SqlConnection(strConnStr)
        ‘定义一个命令对象  
        Dim cmd As New SqlCommand
        Dim adataset As DataSet
        ‘定义一个适配器对象  
        Dim adaptor As SqlDataAdapter
        cmd = New SqlCommand(cmdTxt, conn)
        adaptor = New SqlDataAdapter(cmd)
        adataset = New DataSet
        cmd.CommandType = cmdType
        cmd.Parameters.AddRange(paras)
        Try
            ‘打开数据库连接  
            If conn.State = ConnectionState.Closed Then
                conn.Open()

            End If
            ‘填充数据集  
            adaptor.Fill(adataset)
            Return adataset.Tables(0)
        Catch ex As Exception
            MsgBox(ex.Message)
        Finally
            ‘关闭数据库连接  
            If conn.State = ConnectionState.Open Then
                conn.Close()

            End If
        End Try


    End Function

    ‘‘‘ <summary>
    ‘‘‘ 无參数的查询操作
    ‘‘‘ </summary>
    ‘‘‘ <param name="cmdTxt"></param>
    ‘‘‘ <param name="cmdType"></param>
    ‘‘‘ <returns></returns>
    ‘‘‘ <remarks></remarks>
    Public Function GetDataTable(ByVal cmdTxt As String, ByVal cmdType As CommandType) As DataTable
        Dim strConnStr As String = System.Configuration.ConfigurationManager.AppSettings("ConnStr")
        ‘定义一个数据库连接对象  
        Dim conn As SqlConnection = New SqlConnection(strConnStr)
        ‘定义一个命令对象 
        Dim cmd As New SqlCommand
        Dim adataset As DataSet
        ‘定义一个适配器对象  
        Dim adaptor As SqlDataAdapter
        cmd = New SqlCommand(cmdTxt, conn)
        adaptor = New SqlDataAdapter(cmd)
        adataset = New DataSet
        cmd.CommandType = cmdType
        ‘cmd.Parameters.AddRange(paras)  没有參数,无需加入
        Try
            ‘打开数据库连接  
            If conn.State = ConnectionState.Closed Then
                conn.Open()

            End If
            ‘填充数据集  
            adaptor.Fill(adataset)
            Return adataset.Tables(0)
        Catch ex As Exception
            MsgBox(ex.Message, , "数据库操作")
        Finally
            ‘关闭数据库连接  
            If conn.State = ConnectionState.Open Then
                conn.Close()

            End If
        End Try


    End Function
 
End Class


类有了。那怎么用呢?

    有了參数,不就能够调用了。

    CmdTxt就是sql语句。

    CommandType有三个属性:StoredProcedure(存储过程)。TableDirect(表)。text(SQL文本命令,较经常使用)。

    SqlParameter属性:在写sql语句的时候我们会定义变量,SqlParameter就是用来给数据库中定义的变量传值用的。

比如:

Dim paras As SqlParameter() = {New SqlParameter("@cardno", student.cardno)}
@cardno是变量。student.cardno是实体的值。


注意:Add与AddRange的差别

Add:将指定的对象加入到……中,AddRange:向……末尾,加入数组

Add该方法每次仅仅能加入一个SqlParameter。

AddRange可加入多个SqlParameter。在群里操作时,使用AddRange代替Add。

    这样。我们的SqlHelper小助手就能够帮助完好我们的代码了。遇到一个问题,不用恐惧,先把它简单化。等我们对它有了一定的理解后再去看它复杂的地方。当我们能够灵活的使用ExecuteNonQuery、ExecuteReader、ExecuteDataSet的方法后。其它的内容也就不会难倒我们了。



SqlHelper——数据库小助手