<% title=trim(checkstr(request("title"))) sql="select * from tbl_question where questionid=0 and is_show='T' order by inputdate desc" 'response.write sql set rs=conn.execute(sql) Set mypage=new xdownpage '创建对象 mypage.getconn=conn '得到数据库连? mypage.getsql=sql mypage.pagesize=2 '设置每一页的记录条数据为5? set rs=mypage.getrs() %> ::Chibanting::



<%if not rs.eof then%> <% for i=1 to mypage.pagesize '接下来的操作就和操作一个普通Recordset对象一样操? if not rs.eof then '这个标记是为了防止最后一页的溢出 %> <% rs.movenext else exit for end if next %>
?/strong><%=rs("title")%>
<%=rs("memo")%>
Name:<%=rs("linkman")%>  Time:<%=rs("inputdate")%> <% set rsp=conn.execute("select * from tbl_question where questionid="&rs("id")&" order by inputdate desc") while not rsp.eof %> <%=rsp("inputdate")%>Reback?/span>
...........................................................
<%=rsp("memo")%> <% rsp.movenext wend rsp.close %>
...........................................................
<% mypage.showpage() %>
<% end if rs.close %> o
Tetle: *
Tel: *
Name?/td> *

Msn?/p>

*
Content?/td> *