Probleme mit Verbindung von VBA zu MYSQL

[Kajetan]

Hi Leute,

ich hab ein Problem beim Zugriff mit ADO von Excel aus auf eine MySQL-DB. Ich greife auf folgende Weise zu:

Public Sub fillExcelSheetWithMySQLData(strServer As String, strUser As String, strPW As String, _

strDBName As String)

Dim strConn As String

Dim myConn As ADODB.Connection

Dim myRec As ADor.Recordset

Dim r As Integer

Dim c As Integer

Set myConn = New ADODB.Connection

myConn.ConnectionString = _

"Provider=MSDASQL;Driver=MySQL;" & _

"Server=" & CStr(strServer) & ";UID=" & CStr(strUser) & _

";PWD=" & CStr(strPW) & ";database=" & CStr(strDBName) & _

";Option=16386"

myConn.Open

Set myRec = myConn.Execute("select * from mitarbeiter")

For r = 1 To myRec.RecordCount

For c = 0 To myRec.Fields.Count - 1

Tabelle1.Cells(r, c).Value = myRec.Fields®.Value

Next c

Next r

myConn.Close

End Sub

Es handelt sich um kein Treiberproblem(MyODBC 3.51 wurde installiert und der Datenquellenmanager greift selbst problemlos zu) auch das Passwort usw. stimmt.

Muss ich vielleicht in phpMyAdmin noch was einstellen oder könnte die Firewall Probleme machen? (Zugriff erfolgt über localhost)

Wer weiss was?

Fehlermeldung: Microsoft [ODBC Treibermanager] der Datenquellenname wurde nicht gefunden und es wurde kein Standardtreiber angegeben.

mfg

Kajetan