VBA ADO从MySQL表向Access表插入数据
提问于 2017-03-31 19:32:47
我想通过Access VBA ADO将来自MySQL服务器的信息添加到Access表
Dim cnn As ADODB.Connection
cnn.Open "WP1"
CurrentDb.Execute ("delete * from wp_postmeta1;")
cnn.Execute ("INSERT INTO wp_postmeta1 ( meta_id, post_id, meta_key, meta_value ) in '" & CurrentProject.Connection & "' " & _
"SELECT wp_postmeta.meta_id, wp_postmeta.post_id, wp_postmeta.meta_key, wp_postmeta.meta_value " & _
"FROM wp_postmeta;")
回答 1
Stack Overflow用户
发布于 2020-05-09 18:18:31
我通过添加连接字符串解决了这个问题：
Dim cnn As New ADODB.Connection
cnn.ConnectionString = "DRIVER={MySQL ODBC 8.0 ANSI Driver};Server=localhost;port=3306;Database=dbo;User=root;pwd=XXXX;Option=3"
cnn.Open
Do While cnn.State <> 1
DoEvents
If cnn.State = 0 Then Exit Sub
Loop页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/43148370
复制相关文章
腾讯云开发者
