用VB连接本地SQL的问题

Question

我用VB连接SQL,代码如下
Public rs As ADODB.Recordset
Public db As ADODB.connectionPrivate Sub Form_Load()
Dim t As Integer
Set db = New ADODB.connection
Set rs = New ADODB.Recordset
db.ConnectionString = "Provider=SQLOLEDB.1;Password=admin;Persist Security Info=True;User ID=admin;Initial Catalog=酒店管理;Data Source=(local)"
db.Open
rs.Open "select rName from 客房类型", db, adOpenStatic, adLockReadOnly
 Dim i As String
 For t = 0 To Val(rs.RecordCount) - 1
 i = Trim(rs.Fields("rName").Value)
 rs.MoveNext
 Combo1.AddItem i
 Next t
rs.Close
End Sub
在Data Source中,只有设置本地的服务器名才能访问,
无论设置是(local)或者是localhost,或着是127.0.0.1都不能访问,怎么才能解决啊!!!

Answer 1

User   ID=admin
sql server 你自己建了一个用户名叫做 admin么？
一般用sa 用户的嘛

Answer 2

用sa 用户也不行,
只有在Data   Source设置为本机服务器的名字才能够访问,
用(local)或者是localhost,或着是127.0.0.1都不能访问

Answer 3

dataSource是指sql server 2000 在计算机上注册的名字.就是说sql在注册为服务器的时候你自己指定的名字.肯定你注册的时候没有选择默认值,(local)是默认的服务器注册名字.

Answer 4

管理帖子-->给分-->输入密码-->结贴

Answer 5

dataSource一般指数据源的名字.