当前位置: 代码迷 >> VB Dotnet >> vb.net怎么给mysql数据库创建删除用户
  详细解决方案

vb.net怎么给mysql数据库创建删除用户

热度:102   发布时间:2016-04-25 02:02:48.0
vb.net如何给mysql数据库创建删除用户
vb.net如何给mysql数据库创建删除用户,同时分配权限。谢谢
------解决思路----------------------
用.Net Connector

去这里下载
http://dev.mysql.com/downloads/connector/net/
------解决思路----------------------
具体使用可以看看这篇文章
Connect C# to MySQL
http://www.codeproject.com/Articles/43438/Connect-C-to-MySQL
------解决思路----------------------
Public Function UserLogin(ByVal UserInput As String, ByVal UserP As String)
        Dim QueryPara As String
        Dim myReader As SqlDataReader


        QueryUsers = "Select * from UserMgt"
        Try

            If Not (ISConnect) Then Call ConnectSQL()
            sqlcmd = New SqlCommand(QueryUsers, sqlconn)
            myReader = sqlcmd.ExecuteReader '(CommandBehavior.CloseConnection)

            If myReader.HasRows Then
                Do While myReader.Read()
                    If UserInput = myReader("UserName") Then
                        If UserP = Trim(myReader("Password")) Then
                            UserName = myReader("UserName")
                            UserPrior = myReader("Prior")
                            myReader.Close()
                            sqlcmd.Dispose()
                            DisconSQL()
                            frmUser.Dispose()
                            Return Nothing
                            Exit Function
                        Else
                            MsgBox("Wrong UserName or  Password! Please try again!", vbOKOnly)
                            Exit Do
                        End If

                    End If
                Loop
            Else
                MsgBox("Database Error!", vbOKOnly, "Error!")
                sqlcmd.Dispose()
                DisconSQL()
                End
            End If

        Catch ex As Exception
            MsgBox(ex.Message)
            sqlcmd.Dispose()
            Call DisconSQL()
            Return Nothing
            Exit Function
        End Try
        myReader.Close()
        sqlcmd.Dispose()
        DisconSQL()
        Return Nothing
    End Function
  相关解决方案