mycnn.ConnectionString = "driver={SQL Server};server=8C-1;database=学生管理数据库;uid=sa"
mycnn.CursorLocation = adUseServer
mycnn.Open
If mycnn.State = adStateOpen Then
MsgBox "ok"
End If
Set mycmd.ActiveConnection = mycnn
'调用存储过程
.......
程序在客户机上运行时出错,说“SA登陆失败,未与信任的SQL SERVER连接相关联”
mycnn.CursorLocation = adUseServer
mycnn.Open
If mycnn.State = adStateOpen Then
MsgBox "ok"
End If
Set mycmd.ActiveConnection = mycnn
'调用存储过程
.......
程序在客户机上运行时出错,说“SA登陆失败,未与信任的SQL SERVER连接相关联”
若不能,就是SQL服务端的问题了(认证方式?权限?服务未启动?)
sql server方式:"Provider=SQLOLEDB.1;Password="密碼";Persist Security Info=True;User ID=" &用戶名 & ";Initial Catalog="&數據庫 &" ;Data Source=" & 主機名"
windos方式:Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog="&數據庫 &" ;Data Source=" & 主機名"