<%
function show_check(flag) '新闻审核状态函数
if flag="0" then
response.Write("已审核")
else
response.Write("未审核")
end if
end function
function set_check(flag) '对新闻的审核操作函数
if flag="1" then
response.Write("撤销审核")
else
response.Write("通过审核")
end if
end function
set lastnew_rs=server.CreateObject("adodb.recordset")
sql="select * from m_news order by n_intime desc"
lastnew_rs.open sql, conn,1,1
'初始化参数pn
if request.QueryString("pn")="" then
page=1
else
page=cint(request.QueryString("pn"))
end if
lastnew_rs.AbsolutePage=page 'page即当前页
%>
<p> </p>
<table width="600" height="53" border="0">
<tr>
<td width="250" height="25" cols
我找了一个伪静态代码，如下：
index.asp
<!--#include file="config.asp"-->
<ol>
<%
Set rs=server.CreateObject("adodb.recordset") & ......
