Error 3170: Could not find installable ISAM (1 Viewer)

[doulostheou]

I've done a bit of research into this and I do not like at all some of the posts I am finding regarding unregistered dlls. However, it seems the error can also be produced by an error in the connection string. Can someone look at this and let me know if I am doing something wrong?

    strConnect = "DRIVER={MySQL ODBC 3.51 Driver};" & _
        "Server=MYSERVERPATH;" & _
        "Port=3306;" & _
        "Option=16384;" & _
        "Stmt=;" & _
        "Database=DBNAME;" & _
        "Uid=USERID;" & _
        "Pwd=PASSWORD"

     DoCmd.TransferDatabase acLink, "ODBC Database", strConnect, acTable, "lkupCategories", "lnklkupCategories"

Thanks in advance.

 

[Zigzag]

Try checking it here....

http://www.carlprothman.net/Default.aspx?tabid=90#ODBCDriverForMySQL

 

[doulostheou]

The code on the site you provided works; however, it doesn't necessarily solve my problem. I am trying to synchronize data between a Microsoft Access Database and a MySQL database. So I want to create a link to the MySQL table, run Update and Append queries as needed (I use a join between the two tables to determine what updates and inserts are needed), and then delete the link.

I would be happy to use ADO as the solution, but I don't know of any way to involve tables from both the local access database and the remote MySQL database using this method. Any suggestions are appreciated.

As a point of interest, the connection string I wrote works just fine when used with ADO. It is only a problem when I try to link to the MySQL table using VBA (I can create links manually without a problem).

 

[doulostheou]

I found it! http://forums.mysql.com/read.php?65,237988,238115#msg-238115

Here is my revised code for creating the link:

 strConnect = "DRIVER={MySQL ODBC 3.51 Driver};" & _
        "Server=MYSERVERPATH;" & _
        "Port=3306;" & _
        "Option=16384;" & _
        "Stmt=;" & _
        "Database=DBNAME;" & _
        "Uid=USERID;" & _
        "Pwd=PASSWORD"

 Set db = CurrentDb
 Set tdfLink = db.CreateTableDef("lnklkupCategories")
 tdfLink.SourceTableName = "lkupCategories"
 tdfLink.Connect = "ODBC;" & strConnect
 db.TableDefs.Append tdfLink