[Fehler] Vb6 MYSQL Connection

[raian]

Gut...hier erstmal der Code:

Private Sub Form_Load()
MsgBox "Willkommen bei Wakeup Maike, dem etwas anderen Chatsystem "
' Connection-String festlegen
Dim oConn As New ADODB.Connection
Dim sConn As String
Dim sServer As String
Dim sUserName As String
Dim sPassword As String
Dim sDBName As String
' Server Hostname (oder IP)
sServer = "mysql.lima-city.de"
' Benutzerdaten
sUserName = "USER26252"
sPassword = "*******"
' Datenbank-Name
sDBName = "DB1116949315"
sConn = "Provider=MSDASQLriver=MySQL;" & _"Server=" & sServer & "atabase=" & sDBName
' Connection öffnen
oConn.Open sConn, sUserName, sPassword
End Sub

Private Sub inp1_Change()
lbl4.Caption = inp1.Text
End Sub

Private Sub but1_Click()
MsgBox "Diese Anwendung ist momentan leider nicht verfügbar!"
End Sub



Nun...wie schreibt man denn einen Setup?^^" Aber da kann man ja im Notfall auch diese SetupManager nehmen, soweit ich weiß. So wie es da steht kommt die fehlermeldung mit der Datenquelle die nciht gefunden wird und das kein Standarttreiber zur verfügung steht...


edit: ich hättes mir zwar nicht zugetraut, aber ich habs hingekriegt

Ich musste nur bei sConn einen Eintrag mehr machen der den Treiber angibt!

sConn = "Provider=MSDASQL.1RIVER={MySQL Connector/ODBC v5};Server=" & sServer & "atabase=" & sDBName