set data1.recordset=rs '这句出错

[Equn]

rs是ado.recordset对象
data1是data控件，data1控件我需要用于MSFlexGrid控件
data1.recordset对象需要的recordset是DAO的！
所以:
set data1.recordset=rs '这句出错
难道data1.recordset的记录集就一定要用DAO的？不能使用ADO的么？　不懂DAO :(

[道素]

rs这个东西你使用前一定要new
data1.recordset的记录集当然可以是ado，你最好把错误提示写出来，这样才好找原因

___
( ">
)(
// ) [e-mail]
--//""--－－－－－－－－－－
-/------

[xinjiana]

'定义命令和记录集
Dim cmd As Command
Dim rs As Recordset

'设置命令和记录集的链接对象
'de.cnn为ado的数据源
Set cmd = New Command
cmd.ActiveConnection = de.cnn
cmd.CommandText = "select * from tabuser"
Set rs = cmd.Execute

Set Data1.Recordset = rs
'释放
Set rs = Nothing


应该还有更好的方法的

[阿晨0]

首先确定你的rs已经能打开，能使用
然后就可以直接这样使用了

rs.open
set MSFlexGrid1.Recordset=rs
Recordset1.refresh

这样就可以了，当你是用了ADO的表，就不再需要Data的连接了

[lxcc]

data本身不支持与ado绑定
直接
set MSFlexGrid1.datasource=rs

[cool_man]

DATA是DAO的，你的rs是ADO的所以要用ADODC这个控件才行

[Equn]

Private Sub Form_load()
Dim rs As New Recordset
Dim con As New Connection
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\dealmore\data\data.mdb"
rs.Open "select * from products", con, 1, 1
Set MSFlexGrid1.DataSource = rs '执行到这句时提示出错:对象变量或with块变量未设置
End Sub

MSFlexGrid控件只能和Adodc控件连接，不能直接连接Ado记录集？

[Equn]

up

[lalalulu]

set data1.datasource=rs