在连接SQL服务器时我用登录对话框添入服务器的名称:‘ Public sqlString, DSN, SERV, UID, PWD As String ‘变量声明
Public adoCn As ADODB.Connection ‘定义连接对象
Public adoRS As ADODB.Recordset ‘定义ADO的记录集对象
Public Function connectDB()
Set adoCn = New ADODB.Connection
‘SQL连接字符窜
sqlString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;" &_
"User ID=" & UID & ";Initial Catalog=" & DSN & ";Data Source=" & SERV
adoCn.ConnectionString = sqlString
adoCn.ConnectionTimeout = 100
adoCn.Open ‘打开连接
Set adoRS = New ADODB.Recordset END FUNCTION 登录时调用CALL CONNECTDB() 然后在对话框中输入服务器名,给sqlString 可是当我在本机上安装数据库运行程序时没有问题,可当服务器是装在局域网的另外一台机子上,把我的数据库也装在那个服务器里,然后在登录时输入服务器名却怎么也连接不上,不知是怎么回事?我的数据库也没有指定用户名和密码 我用的是SQL SERVER2000,是不是和SQL的安装有关?