2 messages in com.mysql.lists.win32Re: Linking MYSQL with ACCESS2000| From | Sent On | Attachments |
|---|---|---|
| Joerg Musch | 23 Aug 2002 09:42 | |
| Zhivko Zhelezov | 21 Sep 2002 03:47 |
| Subject: | Re: Linking MYSQL with ACCESS2000![]() |
|---|---|
| From: | Zhivko Zhelezov (zhi...@alcomet-plc.com) |
| Date: | 09/21/2002 03:47:03 AM |
| List: | com.mysql.lists.win32 |
Hello Joerg,
Friday, August 23, 2002, 7:42:31 PM, you wrote:
JM> Hi, JM> I am in need of some help. JM> I try to link manually a mysql-table (dynamicly) to Access2000, JM> without using the DSN; but with no success ... JM> These ae the lines of code i used to :
JM> Public Sub lnkTABLE_MYSQL_2_ACCESS()
JM> Dim adoCn As ADODB.Connection JM> Dim adoCat As New ADOX.Catalog JM> Dim adoTbl As New ADOX.Table
JM> Set adoCat.ActiveConnection = CurrentProject.Connection JM> Set adoTbl.ParentCatalog = adoCat
JM> adoTbl.Name = "NewACCESSTABLE" JM> adoTbl.Properties("Jet OLEDB:Link Datasource") = "??" set this to <your database name>, the one where "MySQL_TABLE" is.
JM> adoTbl.Properties("Jet OLEDB:Link Provider String") = "??"
eg. "ODBC;DSN=<your DNS name>;DATABASE=<your DB
name>;UID=xxx;PWD=xxx;SERVER=127.0.0.1;PORT=3306;OPTION=16387;"
Don't forget to install MyODBC and set up DNS with <your DSN name>
JM> adoTbl.Properties("Jet OLEDB:Remote Table Name") = "MySQL_TABLE" "MySQL_TABLE" should exist in <your database name> database!
JM> adoTbl.Properties("Jet OLEDB:Create Link") = True JM> adoCat.Tables.Append adoTbl JM> End Sub
JM> I got two differnet failure messages : JM> - no installable ISAM found JM> - no fields i table (or so ..)
JM> I hope you are able to help me ...
JM> Lots of Thanks JM> Joerg Musch
HTH, Zhivko
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
"We are what we repeatedly do. Excellence, therefore, is not an act but a
habit."
mailto:zhi...@alcomet-plc.com




