VBA连接SQL sever 2008及 access 2007以上的版本

时　间:2016-05-07 17:45:44
作　者:月皓星隐   ID：39720  城市：自贡
摘　要:vba连接sql server2008和 access 2007版
正　文:

因为sql server2008和之前的版本不同，特别是2000版的代码根本不能用于访问2008。因此总结了以下代码：

1.访问 sql server 2008

dim cnn as  ADODB.connection
set cnn = new connection
cnn.Provider = "SQL server native client 10.0"
cnn.Open "Server=127.0.0.1;Uid=sa;Pwd=1;Database=合纵连锁管理"  

2.在access中访问access数据库，代码如下：
dim cnn as new ADODB.connection
cnn.provider="Microsoft.Jet.OLEDB.4.0"     '访问2003版的用这个驱动
cnn.provider="Microsoft.ACE.OLEDB.12.0"  '访问2007版以上的用这个驱动
cnn.open ";Data Source=C:\test.mdb;Jet OLEDB:Database Password="