vb6中用ado连接access时的recordset如何初始化？

Question

请说明原理，多谢各位大侠了。

Answer 1

Option Explicit
Dim adocon As ADODB.connection
Dim rs As New ADODB.Recordset
Private Sub Form_Load()Set adocon = New ADODB.connection
adocon.Provider = "Microsoft.Jet.OLEDB.4.0 "
adocon.Open "c:\test.mdb"
Set rs = adocon.Execute("select * from TableName")
End Sub

Answer 2

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset '创建一个记录集对象实例或
Dim rs As New ADODB.Recordset后者在编译时此后的每一句代码后都需要插入一个附加的语句，直至记录集对象被使用，降低了效率。微软表示不推荐

Answer 3

Dim Con as new Connection
Dim Rs as new Recordset
Dim StrSQL as String 
strSQL="provider=MicroSoft.Jet.OLEDB.4.0;DataSource="+"数据路径"
Con.open  strSQL
Rs.open "Select * from 表名",Con

Answer 4

连接我会了，
怎样将recordset里的内容绑定到显示控件里呢？

Answer 5

文本框：
textbox.datasource=Rs
textbox.datamember=Rs.fields(i).valueDatagrid:
datagrid.datasource=Rs