18-10-18, 01:43 AM
كود :
Dim Connexion As String = ("Server=" & ServerNameSql & "; Database=" & DataBaseNameSql & "; Uid=" & UserNameSql & ";Pwd=" & PasswordSql & "")
Dim conn As MySqlConnection = New MySqlConnection
conn.ConnectionString = Connexion
conn.Open()