[VB6][Mysql] Probplema di connessione

[iscka]

 
Dim dbConn As adodb.Connection
Dim dbRec As adodb.Recordset
    Set dbConn = New adodb.Connection
    Set dbRec = New adodb.Recordset
    
    dbConn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
           & "SERVER=localhost;" _
           & "DATABASE=*****;" _
           & "DNS=myODBCbridge;" _
           & "UID=****;" _
           & "PWD=****;" _
           & "OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384
           
    dbRec.Open "select * from progressivo", dbConn, adOpenDynamic, adLockOptimistic
    dbRec.MoveNext

Ciao,

sto facendo il porting di una applicazione da Access a Mysql.... sapreste dirmi cosa ce che non va il questa connessione a DB? mi da errore quando apreo il recorset...


Grazie 1000!

[iscka]

code:--------------------------------------------------------------------------------
Dim dbConn As adodb.Connection
Dim dbRec As adodb.Recordset
Set dbConn = New adodb.Connection
Set dbRec = New adodb.Recordset

dbConn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
& "SERVER=localhost;" _
& "DATABASE=*****;" _
& "DNS=myODBCbridge;" _
& "UID=****;" _
& "PWD=****;" _
& "OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384

dbRec.Open "select * from progressivo", dbConn, adOpenDynamic, adLockOptimistic
dbRec.MoveNext
--------------------------------------------------------------------------------


Ciao,

sto facendo il porting di una applicazione da Access a Mysql.... sapreste dirmi cosa ce che non va il questa connessione a DB? mi da errore quando apreo il recorset...


Grazie 1000!

Il DSN ovviamente è registrato sul'utente della macchina che uso...

[michelepi]

conn1.Open "DSN=nometuodsn;database=nometuodb;uid=root;"

prova così per la stringa di connessione