VBA和SqlServer连接问题

Question

我使用ADO和Sqlserver连接，可是测试时老是提示“login failed user <"null">。 我的数据库是没有密码的。请问要怎么debug. 最好是通过编程代码了实现，也不是改sqlserver的配置。另外，我的数据库是在本机上。 我的部分代码如下：请高手给看看。
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sql, strCn As String
Dim i
Dim outstrsql = "select * from objects"
strCn = "Provider=sqloledb;Server=127.0.01\servername;uid=;pwd=;Database=dataname" 
conn.Open strCn
rs.Open sql, conn, adOpenKeyset, adLockOptimistic, adCmdTextFor i = 1 To 10
If i <= rs.RecordCount Then
Debug.Print rs("name")
rs.MoveNext
End If
Next
conn.Close
Set conn = Nothing

Answer 1

strCnProvider="SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa;Initial Catalog=dbname;Data Source=127.0.0.1\servername"

Answer 2

谢谢二楼，不过还是不是提示：login failed for user "Sa". 我想问一下，这里的user Id 是什么啊，是sqlserver的用户名，在sqlserver上要怎么查找这个用户名呢。

Answer 3

在企业管理器中,安全,sa账号
sa 系统管理员账号