vb.net调用存储过程简单示例

最新推荐文章于 2021-02-04 23:21:26 发布

转载最新推荐文章于 2021-02-04 23:21:26 发布 · 147 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/konimeter/archive/2011/09/18/2180008.html

本文介绍了一个用于验证客户端状态的私有函数。该函数通过调用存储过程读取数据库中客户端的状态信息，若不存在则创建新的记录。

    Private Function validateClient(ByVal guid As String) As Integer
        Dim result As Integer = 0
        Try
            '读client
            Dim client As SqlDataReader
            Dim connStr As String = ConfigurationManager.ConnectionStrings("wz").ConnectionString
            Dim conn As New SqlConnection(connStr)
            Dim cmd As New SqlCommand("redlim_client_getdetailbyguid", conn)
            cmd.CommandType = CommandType.StoredProcedure
            With cmd.Parameters
                .Add(New SqlClient.SqlParameter("@clientguid", guid))
            End With
            conn.Open()
            client = cmd.ExecuteReader
            If Not client Is Nothing AndAlso client.HasRows Then
                client.Read()
                result = Integer.Parse(client("redlimClientState")) '获取client的状态
                client.Close()
            Else
                '无client，新建client
                client.Close()
                cmd = New SqlCommand("redlim_client_create", conn)
                cmd.CommandType = CommandType.StoredProcedure
                With cmd.Parameters
                    .Add(New SqlClient.SqlParameter("@clientguid", guid))
                End With
                cmd.ExecuteNonQuery()

            End If
        Catch ex As Exception

        End Try
        Return result
    End Function

转载于:https://www.cnblogs.com/konimeter/archive/2011/09/18/2180008.html