一个vb连sqlserver的问题

Question

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cm As New ADODB.Command
cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=zqh1;Initial Catalog=clgl;Data Source=p11" cn.Open
rs.CursorLocation = adUseClient
rs.Open "select getdate()", cn, adOpenDynamic, adLockBatchOptimistic

Answer 1

以上是连接本机sql-server的代码

Answer 2

你看看SQL SERVER的企业管理器现用户名。用它就行了。

Answer 3

谢谢，不过现在用的名字也是lucky，企业管理器中的服务器名字也是lucky
没甚么区别，
太甚的是其他机器用lucky就行，我本机就不行！