如题，用'Set Rs = Conn.Execute("Select PPM.PID,PPM.PName,PPM.PCLASS,PPM.PSJ,ProClass.typeid,ProClass.typename,EJGYS.GYSID,EJGYS.GYSName from PPM,EJGYS,ProClass where PPM.PCLASS=ProClass.typeid AND PPM.PSJ=EJGYS.GYSID Order by PPM.PID desc")
同时查询三个表，如何进行分页。我用的是叶子的分页程序。

大虾们帮帮忙。急。

三个表和一个表没啥不同,你说的分页程序我没用过,具体的没法说

3个表做联合查询放在一个rs里照样可以分页的。

如果三个表都有关联的数据可以互查,那就可以用联合查询.就算是不用联合查询,用一般的方法做.也可以用分页显示的.分页方法和平常的是一样的.

问题是我用的叶子的分页程序。
Dim ors
Set ors=new Cls_vbsPage
Set ors.Conn=conn    
With ors
    .PageSize=15
    .PageName="Pages"
    .DbType="AC"
    .RecType=-1
    .JsUrl="../inc/"
    .Pkey="AffID" 主键
    .Field="AffID,AffName,AffAdd,AffTime,Adata" 这来是各个字段
    .Table="Affiche" 表名
    .Condition=""
    .OrderBy="AffID DESC"
End With

我把另外两个表放进去好像不可以啊。

谁可以给我个分页代码，同时查询三个表可以用的。

Rs.open "Select ChaoShi.CEJGYSID,EJGYS.GYSID,ChaoShi.CID,EJGYS.GYSName from EJGYS,ChaoShi where ChaoShi.CEJGYSID=EJGYS.GYSID Order by ChaoShi.CID desc",Conn,1,1 我查询数据库代码

现在要把这个查询出来的结果分页，到底咋的弄，还是没有弄明白，大家继续帮忙。

With ors
    .PageSize=15
    .PageName="Pages"
    .DbType="AC"
    .RecType=-1
    .JsUrl="../inc/"
    .Pkey="ChaoShi.CID" '你主键是哪一个我不知道,随便找了一个
    .Field="ChaoShi.CEJGYSID,EJGYS.GYSID,ChaoShi.CID,EJGYS.GYSName" '这来是各个字段(填入select和from中间的内容)
    .Table="EJGYS,ChaoShi" '表名(填入from和where中间的内容)
    .Condition="ChaoShi.CEJGYSID=EJGYS.GYSID" '(填入where和order by中间的内容)
    .OrderBy="ChaoShi.CID desc"  '(填入order by后面的内容)
End With