信息安全管理体系认证:关于vbs与sql的联接问题

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 16:06:05
我有一个SQL数据库。服务器名为:SERVER,数据库名为mmis,有一个表merch有二个字段AA和BB,我怎样才能用VBA 把它导入Excel 工作表中,请说的详细些.如:怎样使用ADO引用,怎样联接数库?

我知道本地连接,远程连接的话自己试试
Dim con As New ADODB.Connection
Dim rst_gcl As New ADODB.Recordset
Dim rst_qm As New ADODB.Recordset
con.CursorLocation = adUseClient
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & 数据库路径 & ";Persist Security Info=False"
con.Open
set rst_gcl=con.execute("select * from merch")
sheet1.range("A1")=rst_gcl.fields("AA")
sheet1.cells(2,1)=rst_gcl.fields("BB")