Dim conn As New MySql.Data.MySqlClient.MySqlConnection
Dim connString as String

connString = "server=127.0.0.1;uid=root;pwd=miapass;database=test;"

Try
  conn.ConnectionString = connString 
  conn.Open()

Catch ex As MySql.Data.MySqlClient.MySqlException
    Select Case ex.Number
        Case 0
            Response.Write("Impossibile connettersi al Server")
        Case 1045
            Response.Write("Nome utente/password invalidi.Riprovare")
	Case else
	    Response.Write("Si  verificato l'errore " & ex.Message)
    End Select
End Try



