这个代码为何出错？

cyber-bobo

Dim Rs2 As New ADODB.Recordset
Dim Rs As New ADODB.Recordset
Dim Conn As New ADODB.Connection
Set Conn = CurrentProject.Connection

Rs.Open "select * from 表3", Conn, adOpenDynamic, adLockOptimistic '(这句中的表3是一个表，没问题！)

Rs2.Open "select * from 查询1", Conn, adOpenDynamic, adLockOptimistic '（这句中的查询1是一个查询结果，会出现语法错误的提示！）

为何？应作如何修改？

andymark

语句没问题, 查询1 是否引用某窗体作查询条件, ADO 不支持这样写法
把例子传上来

cyber-bobo

是的，要引用某窗体作查询条件，那就不能用ADO了，有没有其它办法呢？
例子不好传，我的土办法是先把查询结果导入一个临时表再处理，请问还能有更好的办法吗？

andymark

不要在查询里引用窗体作查询条件,在ADO里加条件

Rs2.Open "select * from 查询1 where 条件='" & me.控件名 & "'", Conn, adOpenDynamic, adLockOptimistic

fswxs

学习

cyber-bobo

问题是查询1本身也是根据一个引用窗体作查询条件的查询作基础表的查询，那又如何，头晕了！
就是说：查询1是根据查询2作出的查询
        而查询2是一个引用窗体作查询条件的查询

[ 本帖最后由 cyber-bobo 于 2007-12-9 19:33 编辑 ]