ADO+ACCESS/MySQL/MSSQL 增修改删 示例

opiona

ADO+ACCESS/MySQL/MSSQL 增修改删 示例

这只是简单示例, 界面丑陋  很多细节 没有进行说明  请自行脑补!!!
MySQL/MSSQL  数据库请自行创建
并在参数表写好参数值

另外: 将Excel大量内容添加到MySQL/MSSQL  速度回很慢  解决方法是使用插件  
见439楼: https://club.excelhome.net/thread-859194-1-1.html
十万，百万行数据保存到数据库，耗时几秒--几十秒




操作ACCESS完整实例.rar (78.44 KB, 下载次数: 505)

2022-8-3 22:12 上传

点击文件名下载附件

   

1. Rem 连接Access   请注意: WPS只能使用 JET4.0   WPS不支持ACE12.0  
   
2. Rem Str_coon ="provider=Microsoft.JET.OLEDB.4.0;data source=" & ThisWorkbook.Path & "\Info.mdb"
   
3. Rem Str_coon ="Provider=Microsoft.Ace.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "\Info.mdb"
   
4. Rem Str_coon ="provider=Microsoft.jet.OLEDB.4.0;data source=" & ThisWorkbook.Path & "\DB.mdb;Jet OLEDB:Database Password=52330067"     '//连接Access2003
   
5. Rem Str_coon ="Provider=Microsoft.Ace.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "\数据库名.accdb;Jet OLEDB:Database Password=52330067"    '//连接Access2007-2010
   
6. Rem Str_coon ="provider=Microsoft.JET.OLEDB.4.0;data source=192.168.1.103\共享文件夹名\Info.mdb"        '//连接Access2003
   
7. Rem Str_coon ="Provider=Microsoft.Ace.OLEDB.12.0;Data Source=192.168.1.103\共享文件夹名\Info.mdb"      '//连接Access2007-2010

复制代码

ExcelVBA操作MySQL完整实例.rar (64.07 KB, 下载次数: 347)

2022-8-3 22:11 上传

点击文件名下载附件

1. 
   
2. Rem 连接MySQL，先安装mysql-connector-odbc-5.3.4，在控制面板-系统与安全--管理工具--数据源（ODBC)--用户DSN--添加：MySql ODBC 3.51 Driver
   
3. '服务器名；端口；数据库名；用户名；密码；OPTION=3;
   
4. Rem Str_coon ="Driver={MySql ODBC 5.3 Unicode Driver};Server=localhost;Port=3306;DB=test;UID=用户名;PWD=密码;OPTION=3;"       '//本地MySQL
   
5. Rem Str_coon ="Driver={MySql ODBC 5.3 Unicode Driver};Server=myqcloud.com;Port=7139;DB=test;UID=用户名;PWD=密码;OPTION=3;"    '//外网MySQL  没有:WWW   192.168.1.05   没有:\\

复制代码

SQL Server的附件做了更新: 增加另一种批量修改的方法 操作SQL_Server完整实例B.rar (73.8 KB, 下载次数: 306)

2022-8-22 18:09 上传

点击文件名下载附件

1. Rem 连接SQL_Server数据库：
   
2. Rem Str_coon ="Provider=SQLOLEDB;Data Source=FANGWEI;Integrated Security=SSPI;Initial Catalog=XieXin;Persist Security Info=false"
   
3. //SQLServer  本地链接,windows验证，不用密码和用户名
   
4. 
   
5. Rem Str_coon ="Provider=SQLOLEDB;User ID=sa;Password =1001;Data Source=FANGWEI\SQL2005数据"          '//SQLServer2005 本地链接
   
6. Rem Str_coon ="Provider=SQLOLEDB.1;Data Source=FANGWEI\SQLEXPRESS;Initial Catalog=CPECC_Temp;Uid=SA;PWD=1234;Persist Security Info=false"       '//SQLServer 2008本地链接
   
7. Rem Data Source=FANGWEI\SQLEXPRESS  '//计算机登陆名/服务器名称，链接本地服务器，就是本机的
   
8. Rem Initial Catalog=CPECC_Temp      '//数据库名称
   
9. Rem Uid=SA 用户名
   
10. Rem PWD=1234 '/密码
    
11. 
    
12. Rem Str_coon = "Provider=SQLOLEDB;Server=192.168.1.103;Database=XieXin;Uid=sa;Pwd=1005;"       '//SQLServer2005局域网， 广域网链接   192.168.1.05   没有:\\
    
13. Rem Server=192.168.1.103;  '//服务器所载电脑IP，链接局域网服务器这样写。
    
14. Rem Database=XieXin;  '//数据库名
    
15. Rem Uid=SA 用户名
    
16. Rem PWD=1005 '/密码
    

复制代码

补充内容 (2023-8-10 20:14):
ADO将百万行Excel数据快速上传到MSSQL或MySQL数据库中 仅需几十秒
单开了一个帖子: https://club.excelhome.net/thread-1666858-1-1.html

天道酬勤y

mysql版,点单条或者批量添加这个id号添加不了呢?

opiona

天道酬勤y 发表于 2022-8-4 08:03
mysql版,点单条或者批量添加这个id号添加不了呢?

ID是自动编号的主键  不能添加  是自动生成啊

aecn

感谢总结分享

jz_l

感谢分享。

天道酬勤y

opiona 发表于 2022-8-4 10:21
ID是自动编号的主键  不能添加  是自动生成啊

是数据库里面设置主键自增吗，我好像设置不了

opiona

我的数据库 ID是自动编号, 所以添加和修改时, 内容是不包含ID的

gwjkkkkk

谢谢楼主分享。。。

乐轻入梦

我真的感谢大师的分享

asdfwgd

先MARK，后面再看 。   ADO+ACCESS/MySQL/MSSQL 增修改删 示例   “要插入的值”组成字符串