关于一个分页显示的问题。。。高手请进

[Lancol]

目的：有两个或两个以上的表，比如：成品表，半成品表，材料表等等，想把他们名称、项目名称、项目时间、负责人等信息同时在一个页面显出来，并以分页形式。
不要用框架，大家能不能提供一个好点的思路。谢谢了。。。

[mrwang2000]

个人意见，仅供参考：
有两个表
A(aaa,bbb,ccc)
B(aaa,bbb,ddd)
现在你希望把两个表的aaa,bbb的数据收集到一个表里面，用如下的语句

SELECT aaa,bbb from A
UNION
select aaa,bbb from B;

就得到了一个新的视图，包含aaa,bbb两个字段，并且拥有A,B两个表的数据

然后，剩下的就是分页了，楼上的分野方法都不错，你可以参考

[emhuangzi]

就是显示记录集的问题吧..


＜%
　If rs1.recordcount＞0 Then ' 记录集不为空则处理记录
　　rs1.pagesize = 10 ' 设置每页显示的记录数
　　num=rs1.recordcount ' 记录总数
　　pagenum=rs1.pagecount ' 页总数
　　page=request("page") ' 获取页码的原始信息
　　' 处理页码原始信息的开始！
　　If page ＜＞ "" then
　　　page = cint(page)
　　if err.number ＜＞ 0 then
　　　err.clear
　　　page = 1
　　end if
　　if page ＜ 1 then
　　　page = 1
　　end if
　else
　　page = 1
　End if
　if page*rs1.pagesize ＞ num and not((page-1)*rs1.pagesize ＜ num)then
　　page=1
　end if
　' 处理页码原始信息的结束！设置当前页码
　rs1.absolutepage = page
%＞
＜!--判断当前页是否是最后一页，并根据判断设置记录的重复显示--＞
＜% if page＜＞pagenum then
　　　lablenum=rs1.pagesize
　　else
　　　lablenum=num-(page-1)*rs1.pagesize
　　end if
　　for i=1 to lablenum
%＞
＜tr bgcolor="#FFFFFF"＞
　＜td height="25"＞＜div align="center"＞＜%=(rs1.Fields.Item("id").Value)%＞＜/div＞＜/td＞
　＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("名称").Value)%＞＜/div＞＜/td＞
　＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("地址").Value)%＞＜/div＞＜/td＞
　＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("类别").Value)%＞＜/div＞＜/td＞
　＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("最后修改").Value)%＞＜/div＞＜/td＞
　＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("修改人").Value)%＞＜/div＞＜/td＞
＜/tr＞
＜%
　rs1.movenext
next
%＞
＜!--当前页的记录显示结束，以下代码为记录集分页链接代码--＞
＜table width="70%" border="0" align="center" cellpadding="0" cellspacing="0"＞
　＜tr＞
　　＜td height="35"＞
　　　＜div align="right"＞
　　　　＜font color="#333333"＞
　　　　　共有 ＜%=num%＞ 个链接 |
　　　　　＜a href=linkadmin.asp?page=1＞首页＜/a＞ |
　　　　　＜%if page＞1 then%＞＜a href=linkadmin.asp?page=＜%=page-1%＞＞＜%end if%＞上一页＜/a＞ |
　　　　　＜%if page＜pagenum then%＞＜a href=linkadmin.asp?page=＜%=page+1%＞＞＜%end if%＞下一页＜/a＞ |
　　　　　＜a href=linkadmin.asp?page=＜%=pagenum%＞＞尾页＜/a＞ |
　　　　　　页次:＜%=page%＞/＜%=pagenum%＞页 |
　　　　　　共＜%=pagenum%＞页
　　　　＜/font＞
　　　＜/div＞
　　＜/td＞
　＜/tr＞
＜/table＞
＜!--记录集分页链接代码结束，记录集为空时执行以下代码--＞
＜%else%＞
＜tr bgcolor="#FFFFFF"＞
＜td height="25" colspan="6"＞＜div align="center"＞＜% response.Write("没有结果可显示！") %＞
＜/div＞＜/td＞
＜/tr＞
＜%
end if
rs1.Close()
Set rs1 = Nothing
%＞

[emhuangzi]

MSDN是个好东西

http://www.microsoft.com/china/msdn/archives/technic/voices/server05222000.asp

这个也是..

多查查MSDN

[Lancol]

我都晕死了，我要的不是这个，你没有明白我的意思，我想用同时从两个以上表里面读取相同字段的数据，并以一个页面分页形式显示。