vb小问题！

[gw0702]

Private Sub Command1_Click()
Dim cn As Connection
Dim rs As Recordset
Dim str As String
Set cn = New ADODB.Connection
str = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=RSDAGLXT;Data Source=."
cn.Open str
Set rs = New ADODB.Recordset
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Open "人事档案信息表", cn
Set MSHFlexGrid1.DataSource = rs
End Sub 

[gw0702]

怎么不变色啊。。晕死。。

Catalog=RSDAGLXT

Data Source=.

二个是什么意思。。。。谢谢。。。。。

[jhone99]

Private Sub Command1_Click()
Dim cn As Connection
Dim rs As Recordset
Dim str As String

Set cn = New ADODB.Connection
str = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=RSDAGLXT;Data Source=."
cn.Open str
Set rs = New ADODB.Recordset
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Open "人事档案信息表", cn
Set MSHFlexGrid1.DataSource = rs
End Sub

[jhone99]

Initial Catalog:
DataBase:
两者没有任何区别只是名称不一样，就好像是人类的真实姓名与曾用名一样。。都可以叫你。

[gw0702]

这二个是什么意思啊。。。jhone99

[gw0702]

哪为什么要二个都写在这里。。。哪个数据源在哪里？？？？

[jhone99]

Provider=SQLOLEDB.1 ------打开数据库用oledb的方式连接
Persist Security Info ----是否保存安全信息
User ID-------------------用户名
PassWord------------------密码
Initial Catalog-----------数据库的名称或者数据库ip或者目录
Data Source---------------数据源

[gw0702]

好