CnStr = "Provider=SQLOLEDB;Data Source=" & DbIp & ";DATABASE=" & DbName & ";UID=" & DbUser & ";pwd=" & DbPw
DbIp ip地址
DATABASE 数据库名字
DbUser 用户名
DbPw 密码
Dim conn As New ADODB.Connection
CnStr = "Provider=SQLOLEDB;Data Source=192.168.29.21;DATABASE=dsy;UID=sa;pwd=abc"
Conn.Open cnstr
Sql = "select * from 表名" 'SQL查询语句
Set rs = New ADODB.Recordset '新建一个记录集实例
rs.Open Sql, conn, 1, 3 '后面的3是确定读写权限的
不应该叫做“远程”
你的这个叫做基于WEB的软件。