sub 绑定()
dim conn as object
set conn=createobject("adodb.connection")
end sub
数据库的打开
connection.open connectionstring,userid,password,options
例如:
Sub Mycnn()Dim cnn As Object'定义变量 Set cnn = CreateObject("adodb.connection")'后期绑定ADOcnn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties='Excel 12.0;HDR=yes;IMEX=0';Data Source=" & ThisWorkbook.FullName
'建立链接cnn.Close'关闭链接Set cnn = Nothing'释放内存
本文介绍了使用VBA进行数据库连接的基本方法,包括通过后期绑定创建ADO连接对象,并提供了具体的代码示例,如使用Microsoft.ACE.OLEDB.12.0提供者连接Excel文件。
4858

被折叠的 条评论
为什么被折叠?



