用vba如何连接网上的sql数据库

代码如下：有问题，发百度消息给我。
在Microsoft visual basic中，工具－引用 Microsoft ActiveX Data Objects 2选一个高版本的
Dim conn As New ADODBConnection
connStr = "Driver={SQL Server};DataBase=test;Server=(local);UID=sa;PWD=123"
connOpen connStr '连接数据库
Dim rs As New Recordset
sql = "select from a" '查看表a
rsOpen sql, conn, 3, 3
Do While Not rsEOF '循环表a的内容
MsgBox (rs("field1")) '显示表中field1字段内容
rsMoveNext
Loop
'connStr = "Driver={SQL Server};DataBase=test;Server=(local);UID=sa;PWD=123"
'test是数据库名
'(local)是服务器名或IP地址，可以：19216811，可以是：wwwsinacomcn
'sa是数据库用户
'123是数据库用户密码

以上就是关于用vba如何连接网上的sql数据库全部的内容，包括:用vba如何连接网上的sql数据库、、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！