首页 / MYSQL / Excel VBA：写入mysql数据库

Excel VBA：写入mysql数据库

内容导读

互联网集市收集整理的这篇技术教程文章主要介绍了Excel VBA：写入mysql数据库，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含903字，纯文字阅读大概需要2分钟。

内容图文

我想在Excel中编写一个写入mysql数据库的宏.有人可以请我开始这个吗？

解决方法:

您可以使用连接字符串和ADO连接到MySQL：

''http://support.microsoft.com/kb/246335
Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")

strCon = "Driver={MySQL ODBC 3.51 Driver};Server=localhost;Database=MyDB;" _
& "User=root;Password=pw;Option=3;"

cn.Open strCon

您还可以使用Jet驱动程序将DSN连接到Excel：

Dim cn As ADODB.Connection

''Not the best way to get the name, just convenient for notes
strFile = Workbooks(1).FullName
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFile _
    & ";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";"

Set cn = CreateObject("ADODB.Connection")

''For this to work, you must create a DSN and use the name in place of 
''DSNName
strSQL = "INSERT INTO [ODBC;DSN=DSNName;].NameOfMySQLTable " _
& "Select AnyField As NameOfMySQLField FROM [Sheet1$];"

cn.Execute strSQL

内容总结

以上是互联网集市为您收集整理的Excel VBA：写入mysql数据库全部内容，希望文章能够帮你解决Excel VBA：写入mysql数据库所遇到的程序开发问题。 如果觉得互联网集市技术教程内容还不错，欢迎将互联网集市网站推荐给程序员好友。

内容备注

版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 gblab@vip.qq.com 举报，一经查实，本站将立刻删除。

内容手机端

扫描二维码推送至手机访问。

本文链接：https://qyyshop.com/info/889520.html

来源：【匿名】