编写Excel VBA工具,连接并 *** 作Mysql 数据库。
系统环境:
OS:Win7 64位 英文版
Office 2010 32位 英文版
1、VBA连接MySql前的准备
Tools--->References---->引用
勾选Microsoft ActiveX Data Objects 28 Librarys 和Microsoft ActiveX Data Objects Recordset 28 Librarys
2、安装Mysql ODBC连接服务
下载连接:https://devmysqlcom/downloads/connector/odbc
注意:这里使用32位的版本
下载上图中Windows(x86,32-bit),Zip Archive版本,在测试中,使用64位的版本无法连接到Mysql
把下载上述文件拷贝放到资源管理器里,放到合适位置,解压,点击里面的installbat批处理文件。
从“控制面板”--->“管理工具”---->ODBC,打开以后,从这个里面无法看到Mysql的驱动,实际上使用的是下面32位的ODBC驱动
C:\Windows\SysWOW64\文件夹下的odbcca32exe
3连接示例
Sub TestConnectTodb() Dim conn As ADODBConnection Dim rs As ADODBRecordset Set conn = New ADODBConnection Set rs = New ADODBRecordset connConnectionString = "Driver={MySQL ODBC 53 Unicode Driver};Server=localhost;Port=3306;Database=db_hptms;Uid=root;Pwd=123456;OPTION=3;" connOpen rsOpen "select fdEmpNo,fdEmpName from tbUser", conn With ThisWorkbookWorksheets("MySqlData") Visible = True Range("a1:b1")Value = Array("EmpNo", "EmpName") Range("A2")CopyFromRecordset rs Activate End With rsClose: Set rs = Nothing connClose: Set conn = Nothing MsgBox "处理完毕", vbOKOnly, "提示信息"End Sub
上述示例经过测试,可以正常连接到Mysql数据库,这里注意使用的ODBC连接的版本是32位,在测试中,使用64位的,始终无法正常打开连接。
以上就是关于WPS 表格如何连接MySQL 数据库全部的内容,包括:WPS 表格如何连接MySQL 数据库、、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)