100分求助数据库记录显示的简单问题，在线等候！

Question

把db和rs改成ado控件链接吧，然后把datagrid1的数据原和ado控件绑定

Answer 1

谢谢楼上的蝈蝈，我试试看吧！
也谢谢小高的建议，可是我不想用adodc

Answer 2

蝈蝈，我已经单步执行过了，还是不显示也不报错，真搞不明白啊！
楼上的我也refresh过了，也不行！
难道是VB出问题了？！！！！

Answer 3

Private Sub Command1_Click()Set db = New ADODB.Connection
Set rs = New ADODB.Recordsetdb.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=d:\服装厂管理系统\服装厂管理.mdb"
*********************************************
设置游标类型
db.CursorLocation = adUseClient
db.Open
*********************************************rs.Open "select * from 人员信息", db, adOpenStatic, adLockOptimistic
Debug.Print rs.RecordCount(能debug出来，说明已经连上了数据库）
Set datagrid1.DataSource = rs（但是,无法显示记录，也不报错）**********************************************
去掉以下代码，打开又关闭记录集数据无法显示
rs.Close
Set rs = Nothing
db.Close
**********************************************
End Sub

Answer 4

当然你也可以用  gxingmin(小高)  的方法，使用adodc控件连接

Answer 5

谢谢chpp_2000,解决了！真的谢谢你无私的帮助！
正如你所说的我没有设游标，也不该在最后关闭记录集！
本贴到此，正式结贴了！

Answer 6

我也犯了这个错，同样谢谢chpp_2000兄