1 在VBE界面中工具—引用
勾选MicrosoftActiveX Data Objects x.x Library
2 连接代码
Sub test()
Dim
conn As New ADODB.Connection
’ Conn为自定义名称可换
conn.Open
"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\data\Adata.accdb"
‘这里使用SQL对数据进行操作 D:\data\Adata.accdb 为文件名
’ 常用 CONN.OPEN CONN. EXECUTE CONN..CLOSE
conn.Close
End
Sub
