<% If request("id")="" Then %>
<%set rs=server.CreateObject("adodb.recordset")
sql="SELECT * FROM down_purpose "
sql=sql&" ORDER BY id desc"
rs.Open sql,conn,1,1
myPagesize=10'每页显示数目
call myPages(rs,myPagesize)
line=myPagesize
mycondition="&utype="&request("utype")&"&typeid="&dd&"&ukey="&request("ukey")&"&type_name="&type_name
do while not rs.eof and line>0%>
<%rs.movenext
line=line-1
loop
rs.close
set rs=nothing
%>
<%listpages(mycondition)%>
<% Else %>
<%set rs=server.CreateObject("adodb.recordset")
rs.Open "SELECT top 1 * FROM down_purpose where id="&clng(request("id"))&" ",conn,1,1
if not rs.eof then%>
| <%=rs("title")%> |
|
<%=rs("content")%>
"> |
<% End If %>
<% End If %>
|