Hi Flemse

Have you referenced the library?? If Not.

To use ADO objects in an application add a reference
to the ADO component. From the VBA window select
Tools/References< check the box
"Microsoft ActiveX Data Objects 2.x Library"

Good Luck
TK



"Flemse" wrote:

I am trying to load data from Excel to MySQL. In PHP everything works fine , but in VB I get error 8000ffff,
"Catastrophic failure".

Sub XLtoMYSQL()
Dim ConnectMySQL As String
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
Set conn = CreateObject("ADODB.Connection")
ConnectMySQL = _
"DRIVER={Mysql ODBC 3.51 Driver};" & _
"SERVER=myISPIP;DATABASE=myDatabase;" & _
"UID=myUsername;PWD=myPassword"
conn.Open ConnectMySQL
End Sub

I spent all day trying to figure this out.
Any ideas?

Flemming