level 3
Xin丿伟超
楼主
<% option explicit %>
<!--#include file ="conn.asp"-->
<html>
<head>
<title>销货一览表</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
body {
background-color: #666;
background-image: url(image/22.jpg);
}
</style>
</head>
<body>
<h2 align="center">内蒙古迎福科技销货一览表</h2>
<center>
<%
if session("name")=""then
response.write "您的身份：游客。"
else
response.write session("name") & ",欢迎访问！"
end if
%>
<table border="0" width="90%">
<tr bgcolor="#bdbdbd" align="center">
<td width="10%">编号</td>
<td width="30%">名称</td>
<td width="20%">供货人</td>
<td width="10%">回复数</td>
<td width="10%">点击数</td>
<td width="20%">日期</td>
</tr>
<%
dim myrecordset,strsql
strsql="select * from article where write_back=0 order by submit_date desc"
set myrecordset=server.createobject("adodb.recordset")
myrecordset.open strsql,conn,1
if not myrecordset.bof and not myrecordset.eof then
dim pageno
if request.querystring("pageno")=""then
pageno=1
else
pageno=cint(request.querystring("pageno"))
end if
myrecordset.pagesize=10
myrecordset.absolutepage=pageno
dim i,j
i=0
j=myrecordset.pagesize
do while not myrecordset.eof and j>0
i=i+1
j=j-1
%>
<tr bgcolor="#f2f2f2" align="center">
<td><%=(pageno-1)* myrecordset.pagesize+i%>
<td><a target=_ blank herf ="show _ article.asp?article _ id =<% = myrecordset("article_id")%>"><%=myrecordset("title")%></a></td>
<td><%=myrecordset("user_name")%></td>
<td><%=myrecordset("title")%></td>
<td><%=myrecordset("hits")%></td>
<td><%=myrecordset("submit_date")%></td>
</tr>
<%
myrecordset.movenext
loop
end if
%>
</table>
<%
for i=1 to myrecordset.pagecount
if i=pageno then
response.write i & " "
else
response.write"<a href=list_title.asp?pageno="& i & "'>" & i & "</a> "
end if
next
%>
<a href="release.asp">创建新记录</a>
</body>
</html>
2014年04月03日 04点04分
1
<!--#include file ="conn.asp"-->
<html>
<head>
<title>销货一览表</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
body {
background-color: #666;
background-image: url(image/22.jpg);
}
</style>
</head>
<body>
<h2 align="center">内蒙古迎福科技销货一览表</h2>
<center>
<%
if session("name")=""then
response.write "您的身份：游客。"
else
response.write session("name") & ",欢迎访问！"
end if
%>
<table border="0" width="90%">
<tr bgcolor="#bdbdbd" align="center">
<td width="10%">编号</td>
<td width="30%">名称</td>
<td width="20%">供货人</td>
<td width="10%">回复数</td>
<td width="10%">点击数</td>
<td width="20%">日期</td>
</tr>
<%
dim myrecordset,strsql
strsql="select * from article where write_back=0 order by submit_date desc"
set myrecordset=server.createobject("adodb.recordset")
myrecordset.open strsql,conn,1
if not myrecordset.bof and not myrecordset.eof then
dim pageno
if request.querystring("pageno")=""then
pageno=1
else
pageno=cint(request.querystring("pageno"))
end if
myrecordset.pagesize=10
myrecordset.absolutepage=pageno
dim i,j
i=0
j=myrecordset.pagesize
do while not myrecordset.eof and j>0
i=i+1
j=j-1
%>
<tr bgcolor="#f2f2f2" align="center">
<td><%=(pageno-1)* myrecordset.pagesize+i%>
<td><a target=_ blank herf ="show _ article.asp?article _ id =<% = myrecordset("article_id")%>"><%=myrecordset("title")%></a></td>
<td><%=myrecordset("user_name")%></td>
<td><%=myrecordset("title")%></td>
<td><%=myrecordset("hits")%></td>
<td><%=myrecordset("submit_date")%></td>
</tr>
<%
myrecordset.movenext
loop
end if
%>
</table>
<%
for i=1 to myrecordset.pagecount
if i=pageno then
response.write i & " "
else
response.write"<a href=list_title.asp?pageno="& i & "'>" & i & "</a> "
end if
next
%>
<a href="release.asp">创建新记录</a>
</body>
</html>
