| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 506 人关注过本帖
标题:[求助]分页如何实现?请高手指教!
只看楼主 加入收藏
zhou_yq
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2005-1-11
收藏
 问题点数:0 回复次数:2 
[求助]分页如何实现?请高手指教!

本人做了一个在线考试系统。考试内容分成三个部分,分别是判断题,单选题和多选题。三种题型分别存放在三个表文件中,每个表中存放六次考试的题目,表文件名分别为type1,type2,type3.共一百道题目。题目出现顺序随机。现在我碰到的一个问题是,因为题目存放在三个表中,分页不知如何实现。请高手指教。

部分原代码如下:

<!--#include file="conn.asp"--> <!--#include file="check.asp"--> <%set rst=conn.execute("select * from type1 where sfkh=TRUE")%> <form name="form1" method="post" action="ztested.asp">

<head> <title></title> </head>

<body background="back.GIF" topmargin="0"> <table align=center border="0" cellpadding="0" cellspacing="0" bordercolor="#111111" width=95% height="100"> ………… ………… …………… <tr><td colspan=3 align="left"> 一、判断题(共20题,每题1分)</td></tr> <% dim n(20) for j=1 to 20 n(j)=0 next i=0 do while i<20 randomize sid=int(20*rnd)+1 if n(sid)=1 then else set rst1=conn.execute("select * from type1 where pdtmh="&sid) n(sid)=1 i=i+1 %> <tr><td colspan=3 align="left"><%=i%>.<%=rst1("tm")%></td></tr> <tr><td colspan=3 align="left"><input type=radio name=pd<%=i%> value="A">对&nbsp;&nbsp; <input type=radio name=pd<%=i%> value="B">错</td></tr> <input type=hidden name="pda<%=i%>" value="<%=rst1("pdda")%>" > <tr height="9"><td colspan=3 ></td></tr> <%end if loop %>

<tr><td colspan=3 align="left">二、单选题(共50题,每题1分)</td></tr> <% dim m(50) for dj=1 to 50 m(dj)=0 next di=0 do while di<50 randomize dsid=int(50*rnd)+1 if m(dsid)=1 then else set rst2=conn.execute("select * from type2 where dxtmh="&dsid) m(dsid)=1 di=di+1 %> <tr><td colspan=3 align="left"><%=di%>.<%=rst2("dxtm")%></td></tr> <tr><td colspan=3 align="left"><input type=radio name=dxa<%=di%> value="A">A.<%=rst2("dx1")%>&nbsp;&nbsp;&nbsp;<input type=radio name=dxa<%=di%> value="B">B.<%=rst2("dx2")%>&nbsp;&nbsp;&nbsp;<input type=radio name=dxa<%=di%> value="C">C.<%=rst2("dx3")%>&nbsp;&nbsp;&nbsp;<input type=radio name=dxa<%=di%> value="D">D.<%=rst2("dx4")%></td></tr> <input type=hidden name="dxzda<%=di%>" value="<%=rst2("dxda")%>" > <tr height="8"><td colspan=3 ></td></tr> <%end if loop %> ……………… <tr><td colspan=3 align="left">三、多选题(共30题,每题1分)</td></tr> ……………………… <tr height="100"><td colspan=3 ></td></tr> <tr><td colspan=4 align="center">&nbsp;<input type="Submit" name="Submit" value="提交"> <input type="reset" name="Submit2" value="重置"></td></tr> <input type="hidden" name="cxh" value="<%=session("student")%>">

</table> </form>

搜索更多相关主题的帖子: 指教 
2005-05-18 21:34
hxfly
Rank: 5Rank: 5
等 级:贵宾
威 望:17
帖 子:5810
专家分:118
注 册:2005-4-7
收藏
得分:0 
郁闷
思路挺清晰的啊

2005-05-19 08:50
zhou_yq
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2005-1-11
收藏
得分:0 
本人水平实在有限,请高手指点!!!!!
2005-05-20 20:25
快速回复:[求助]分页如何实现?请高手指教!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023172 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved