0

VB.Net 2010 で MySQL データベースに接続しようとしています。ここでの問題は、サーバーを変更する前に同じコードが適切に機能していたことです。これはコードです:

    Private Function Validar_Acceso(ByVal sUsuario As String, ByVal sContrasena As String, ByRef sResultado As String) As Boolean
    Dim bRetorno As Boolean
    Dim query As String = "SELECT * FROM Usuario WHERE usuario LIKE '" & sUsuario & "'"
    Dim MySqlConn As New MySqlConnection("Server=; Uid=; Pwd=; Database=RepMasivos; Port=3306;")

    Try
        MySqlConn.Open() 'HERE IS THE System.OverflowException

        Dim dbCommand As MySqlCommand = MySqlConn.CreateCommand()
        dbCommand.CommandText = query
        Dim dbReader As MySqlDataReader = dbCommand.ExecuteReader()
        If dbReader.Read() Then

            If dbReader("password") = getMD5Hash(sContrasena) Then
                sResultado = dbReader("usuario")
                bRetorno = True
            End If
        End If

    Catch ex As Exception
        sResultado = ex.Message
    Finally
        If MySqlConn IsNot Nothing Then
            MySqlConn.Close()
        End If
    End Try
    Return bRetorno

End Function

リターン エラーは次のとおりです。

ありがとう!

4

0 に答える 0