Description:
When I used the version of MyODBC 3.51.09, the following code works perfectly.
Dim cnn as New ADODB.Connection
Dim rs as New ADODB.Recordset
Dim sSQL as String
cnn.open "Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=C:\DBXtraXP\LinkDB.mdb;Uid=admin;Pwd="
sSQL="SELECT * FROM (`ODBC;DRIVER={MySQL ODBC 3.51 ;" & _
"SERVER=MySQL_Server;Port=3306;Option=16384;Stmt=;" & _
"DATABASE=MySQL_DB;UID=MySQL_User;" & _
"PWD=MySQL_Pwd`.`MySQL_Tabla`" & _
"LEFT JOIN [ODBC;DRIVER=SQL Server;" & _
"SERVER=SQL_Server;UID=SQL_User;PWD=SQL_Pwd;" & _
"DATABASE=SQL_DB].[SQL_Tabla]" & _
" ON `MySQL_Tabla`.`ID`=[SQL_Tabla].[ID])"
rs.Open sSQL,cnn,adOpenStatic,adLockReadOnly
Now with the version of MyODBC 3.51.11 it does not work.
How I can solve it?
bernardino.jaramillo@gmail.com
How to repeat:
When I used the version of MyODBC 3.51.09, the following code works perfectly.
Dim cnn as New ADODB.Connection
Dim rs as New ADODB.Recordset
Dim sSQL as String
cnn.open "Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=C:\DBXtraXP\LinkDB.mdb;Uid=admin;Pwd="
sSQL="SELECT * FROM (`ODBC;DRIVER={MySQL ODBC 3.51 ;" & _
"SERVER=MySQL_Server;Port=3306;Option=16384;Stmt=;" & _
"DATABASE=MySQL_DB;UID=MySQL_User;" & _
"PWD=MySQL_Pwd`.`MySQL_Tabla`" & _
"LEFT JOIN [ODBC;DRIVER=SQL Server;" & _
"SERVER=SQL_Server;UID=SQL_User;PWD=SQL_Pwd;" & _
"DATABASE=SQL_DB].[SQL_Tabla]" & _
" ON `MySQL_Tabla`.`ID`=[SQL_Tabla].[ID])"
rs.Open sSQL,cnn,adOpenStatic,adLockReadOnly
Now with the version of MyODBC 3.51.11 it does not work.