[PYTANIE] Mysql do vb.NET

[cody3223]

Witam

Mam nie uporządkowany kod:

Dim connect As New MySqlConnection Public Sub ConnectMySQL(ByVal ip As String, ByVal login As String, ByVal password As String, ByVal port As String) connect.ConnectionString = ("Server=" & ip & "; user id=" _ & login & "; password=" _ & password & "; port=" _
& port & "; database=mysql;") Try connect.Open() Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub

 

a chciałbym do tego dać / aby to tak wyglądało:

 

zmienna server
zmienna baza
zmienna login
zmienna haslo

tutaj ten kod na logowanie do mysql
​if(ApplicationQuit)then
 Mysql.connection.close
end if

 

 

i fajnie gdyby mi ktoś podał w jakiej "funkcji" czy czymś to zrobić = coś w rodzaju OnEnable

 

[WellyPL]

Nie prosimy o gotowce...

Proszę o close...

[cody3223]

To nie jest Gotowiec! to kawałek kodu! i nie cały!

[Gość]

Nie prosimy o gotowce...

Proszę o close...

Nie baw się w moderatora.

Dim connect As New MySqlConnection 
Dim serwer As String = "localhost"
Dim user As String = "loginDoMysql"
Dim haslo As String = "hasloDoMysql"
Dim port As Integer = 666 
Public Sub ConnectMySQL() 
connect.ConnectionString = ("Server=" & serwer & "; user id=" _ & user & "; password=" _ & haslo & "; port=" & port & "; database=mysql;") 
Try
 connect.Open() 
Catch ex As Exception 
MessageBox.Show(ex.Message) 
End Try 
End Sub