| 您现在的位置 >> 文章列表 |
<%
'参数设置
pagesize=15 '每页显示的文章数量
%>
<%
classid=request.QueryString("classid")
sql="select * from articleclass "
classname=""
if classid<>"" then
if instr(classid,",") then
sql=sql&" where classid in ("&classid&")"
else
sql=sql&" where classid="&classid
end if
rs.open sql,conn,1,1
if not (rs.eof or rs.bof) then
classname=rs("classname")
else
classname=""
end if
rs.close
end if
ac=request.QueryString("ac")
if ac="pic" then
classname=""
end if
%>
| <%= classname %> |
<%
sql="select * from article where passed=true and classid in (1) "
if ac="pic" then
sql=sql&" and includepic=true"
end if
if classid<>"" then
if instr(classid,",") then
sql=sql&" and classid in ("&classid&")"
else
sql=sql&" and classid="&classid
end if
end if
sql=sql&" order by ontop,updatetime desc,articleid desc,hits desc"
set mypg=new jcpageclass
mypg.getsql=sql
mypg.getconn=conn
mypg.pagesize=pagesize
set rs=mypg.getrs()
i=0
while not (rs.eof or rs.bof) and i·"&rs("title")&"
")
i=i+1
rs.movenext
wend
%> |
| <%call mypg.showpage %> |
|
|
|
