如何同时读取相同数据库多个数据表,取不同数据表数据表分类汇总,字段有以下,其中a.asp 是主表,内容如下:

编号 学号 姓名 电话 邮件 确定班级(动态表) 确定成绩(动态表)
01 20061230 aa 88888 111@163.com 初二 优
02 20061532 bb 88888 111@163.com 高二 良
03 20061333 cc 88888 111@163.com 初三 中
04 20061231 dd 88888 111@163.com 高一 差
05 20061248 ee 88888 111@163.com 初一 优
06 20061554 ff 88888 111@163.com 高二 良
07 20061332 gg 88888 111@163.com 初三 优
08 20061233 hh 88888 111@163.com 高三 优

请问高手如何查找出列表为确定班级"高三"的所有行信息,

<!--#include file="fun.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from or where flag=0 order by id desc"
rs.open sqltext,conn,1,1
If rs.eof and rs.bof then
rs("id")%></td>
rs("use")%></td>
rs("name")%></td>
rs("tel")%></td>
rs("mail")%></td>
Getxinxi(rs("c_id"))%></td>
Getchengji(rs("cjtype"))%></td>

-----------------------------------------------------------
b.asp 是调用另外两个数据表数据表,b.asp程序如下:
<%
'******************
'取得班级名称
'******************
Function Getbanji(ZZID)

if trim(ZZID)="" then
exit Function
end if

set rec=server.createobject("adodb.recordset")
strsql="select c_name from xinxi where Id=" & ZZID & ""
rec.open strsql,conn,1,1

If Not rec.Eof Then
Getbanji=rec("c_name")
Else
Getbanji=""
End IF

rec.close
End Function

'******************
'取得成绩名称
'******************
Function Getchengji(ZZID)

if trim(ZZID)="" then
exit Function
end if

set rec=server.createobject("adodb.recordset")
strsql="select type from neirong where Id=" & ZZID & ""
rec.open strsql,conn,1,1

If Not rec.Eof Then
Getchengji=rec("type")
Else
Getchengji=""
End IF

rec.close
End Function
%>
-----------------------------------------------------------------------

请问高手如何查找出列表为确定班级"高三"的所有行信息,

   有没有高手能详细解答.

直接用
sql=select * from 表名,表名 where 条件1,条件2 order by id desc
这个不就是从多个表查询吗,是不是想要这个啊.
不过你说的真的让我有点糊涂,兄弟要练习一下语言表达能力哦.呵呵.

sql=select * from 表名,表名 where 条件1,条件2 order by id desc

能不能写具体点啊,这句放在什么地方

set rs=server.createobject("adodb.recordset")
sql=select * from 表名,表名 where 条件1,条件2 order by id desc
rs.open sql,conn,1,1