代码利用ADO组件可以方便地对各种数据进行连接和访问。ADO组件中的Connection对象可以实现对数据库的连接,并可以快速实现SQL语句的执行,然后再用VBA将SQL查询的结果输出到Excel表格中。
打开VBE窗口,选择菜单“工具”一“引用”,勾选MicrosoftActiveXDataObjects2.8Library,并单击“确定”按钮。
利用ADO连接数据库ADO的全称是ActiveXDataObject,是一个用于存取数据源的COM组件,用以快速实现各种数据库的连接、读取、写入。在ADO组件中有一个Connection对象,利用Connection对象的Open方法可以实现数据库的连接。
1.打开Access程序,新建一个Access数据库。
2.创建一个ODBC连接,
点击【外部数据】-->【ODBC数据库】---->【通过链接表链接到数据源】。
,可以选择“复制表”或“链接表”。链接表的好处是mysql数据源更新,Access链接数据表跟着更新,Access可以作为mysql数据库的界面。
3.在d出的界面,点击选项卡【机器数据源】---->【新建】,
会d出警示对话框,点击【确定】即可。
4.在d出的界面,点击【用户数据源】,点击【下一步】,
在d出的见面,选中【MySQL ODBC 5.2 Unicode Driver】,
点击【完成】。
5.这个步骤最为关键,是具体的数据链接源。
Data source name:kdata(这是将这个连接命名,读者可以自己随便命名),
TCP/IP server:localhost(本地数据库一般都是localhost),
Port:3306(本地数据库一般都是3306这个接口)。
User:
Password:
(这个是localhost里设定的用户名和密码,很多本地数据库的通用用户名为root,密码为空。图中演示的是笔者自己设定的用户名和密码)。
Database:(可以先点击右侧的【test】按钮,测试一下,如果上面设置的都是有效的,则可以选择希望连接的mysql数据库了)。
----------------
本地数据库设置这个地方,如果不清楚,建议安装一下开源的xampp软件,自动安装mysql,php等,通过localhost可以创建数据库,导入导出,增加用户,设置用户名和密码等。
6.选中刚才建立的数据源,点击【确定】。
在d出的界面中,选中需要链接的多个数据表——1个数据库包含多张数据表,可以导入个别数据表或者所有数据表。
这样就完成了数据的链接了。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)