📄 guestbook.asp
字号:
<%@ Language=Jscript %>
<%
conn = Server.CreateObject("ADODB.Connection");
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" +
Server.MapPath("message.mdb"));
rs = Server.CreateObject("ADODB.Recordset");
sql = "Select * from record order by time desc";
rs.Open(sql, conn, 3);
rs.PageSize = 4;
if (Request("page").Count > 0)
{
iPage = parseInt(Request("page"));
if(iPage < 1)
iPage = 1;
if(iPage > rs.PageCount)
iPage = rs.PageCount;
}
else
{
iPage = 1;
}
Response.Write("当前第" + iPage + "页，共" + rs.PageCount + "页");
rs.AbsolutePage = iPage;
%>
<%
for( i = 0; i < rs.PageSize; i++)
{
if(!rs.Eof)
{
%>
<link rel="stylesheet" href="../st.css" type="text/css">
<body background="bg.jpg">
<table border="1" bordercolor="#111111" align="center">
<tr>
<td width="66">
<div align="center"><b><font size="4" color="#000099">姓名：</font></b></div>
</td>
<td width="544"><%=rs("name")%>
<div align="center"></div>
</td>
</tr>
<tr>
<td width="66">
<div align="center"><b><font size="4" color="#008080"> <font color="#000099">Email:</font></font></b></div>
</td>
<td width="544">
<a href="mailto:<%=rs("mail")%>"> <%=rs("mail")%></a>
</td>
</tr>
<tr>
<td width="66">
<div align="center"><b><font size="4" color="#000099">主题：</font></b></div>
</td>
<td width="544" height="17"><%=rs("main")%>
<div align="center"></div>
</td>
</tr>
<tr>
<td width="66">
<div align="center"><b><font size="4" color="#000099">主页：</font></b></div>
</td>
<td width="544"><%=rs("homepage")%>
<div align="center"></div>
</td>
</tr>
<tr>
<td height="20" width="66">
<div align="center"><b><font size="4" color="#000099">内容：</font></b></div>
</td>
<td height="20" width="544"><%=rs("message")%>
<div align="center"></div>
</td>
</tr>
</table>
<HR>
<%
rs.movenext();
}
}
%>
<br><br><br>
<%
if (iPage != 1)
{
%>
<a href="guestbook.asp?page=1" class="unnamed1"><font color="#000000">第一页</font></a>
<a href="guestbook.asp?page=<%=iPage-1%>" class="unnamed1"><font color="#333333">上一页</font></a>
<%
}
if (iPage != rs.PageCount)
{
%>
<a href="guestbook.asp?page=<%=iPage+1%>" class="unnamed1"><font color="#000000">下一页</font></a>
<a href="guestbook.asp?page=<%=rs.pageCount%>" class="unnamed1"><font color="#000000">最后页</font></a><br>
<hr>
<a href="ly.htm"><span class="unnamed1"><font color="#000000">返回</font></span></a>
<span class="unnamed1">
<%
}
conn.close();
%>
</span>
<div align="center"><font color="#666666">Copyright ◎ 2004 All Rights Reserved.
<br>
本站由 songkui 制作 电话:023-58196587
</font> </div>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -