📄 index.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="fun.asp"-->
<%
response.buffer=true
dim page,ipage,str,i
sql="select * from book order by id DESC"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3.2
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>金海洋广告</title>
</head>
<LINK href="main.css" type=text/css rel=stylesheet>
<body bgcolor="#003366" background="../images/bg.gif" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" height="6" border="0" cellpadding="0" cellspacing="0" background="../images/aaa.gif" bgcolor="44A5DC">
<tr>
<td></td>
</tr>
</table>
<table width="100%" height="107" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="760" height="107" valign="top" bgcolor="#FFFFFF"> <table width="760" height="65" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="257" valign="top"><img src="../images/new_logo.gif" width="222" height="63" hspace="5"></td>
<td width="498" align="right"> <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="400" height="60">
<param name="movie" value="../images/new_2.swf">
<param name="quality" value="high">
<embed src="../images/new_2.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="400" height="60"></embed></object>
</td>
</tr>
</table>
<table width="760" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="../images/qqqqqqqqqqqqq.gif" width="760" height="42" border="0" usemap="#Map">
<map name="Map">
<area shape="rect" coords="20,13,63,29" href="../">
<area shape="rect" coords="70,13,125,29" href="../a.html">
<area shape="rect" coords="130,13,183,29" href="../b.html">
<area shape="rect" coords="189,13,259,29" href="../e.html">
<area shape="rect" coords="266,12,339,27" href="../i.html">
<area shape="rect" coords="348,12,425,28" href="../c.html">
<area shape="rect" coords="488,11,543,27" href="../f.html">
<area shape="rect" coords="548,13,605,29" href="../g.html">
<area shape="rect" coords="610,13,668,29" href="../h.html">
<area shape="rect" coords="673,10,724,29" href="./">
<area shape="rect" coords="433,11,481,30" href="../d.html">
</map></td>
</tr>
</table></td>
<td align="right" valign="top" background="../images/qqqqqqqqqqqqq_back.gif" bgcolor="#FFFFFF"><br>
<img src="../images/new_1.gif" width="34" height="34" hspace="21" vspace="5"></td>
</tr>
</table>
<table width="100%" height="35" border="0" cellpadding="0" cellspacing="0" background="../images/ss2.gif">
<tr>
<td height="26" valign="top"> <table width="70%" height="35" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="97" height="32"> </td>
<td width="598" style="padding-top:8px;"><a href="#name"><img src="images/write.gif" width="18" height="18" hspace="5" border="0" align="absmiddle"><font color="#FF6600"><strong>我要留言</strong></font></a></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="750" valign="top"> <table width="730" height="67" border="0" cellpadding="0" cellspacing="0" background="../images/llss2.gif" bgcolor="E9E9E9">
<tr>
<td style="line-height:180%;"><font face="Times New Roman"><font color="#999999"><br>
<%IF (rs.State =adStateClosed) or (rs.BOF=true and rs.EOF =true) or rs.RecordCount=0 then%>
</font></font>
<center>
暂时还没有留言! <a href="add.html"><font color="#0099FF">我要留言</font></a><img src="images/write.gif" alt="我要留言" width="18" height="18" vspace="2" border="0" align="absmiddle">
</center>
<%ELSE%>
<table width="700" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-bottom:#ffffff 4px solid">
<tr>
<td width="57" height="30" align="center"> </td>
<td width="168" align="center"> <table width="50" height="5" border="0" cellpadding="0" cellspacing="0">
<tr>
<td></td>
</tr>
</table>
</td>
<td width="475" height="30" align="right" style="padding-right:12px;">
<%
rs.pagesize=10
page=clng(request("Page"))
if page=empty then page=1
if page < 1 then page=1
if page > rs.pagecount then page=rs.pagecount
%>
 第<font color=ff0000><b><%=page%></b></font>页/共<font color=ff0000><b><%=rs.pagecount%></b></font>页
 共<font color=ff0000><b><%=rs.recordcount%></b></font>条 
<%if page<>1 then%>
<a href=./?Page=1>首页</a> <a href=./?Page=<%=(page-1)%>>上页</a>
<%else%>
首页<font color=000000> </font>上页
<%end if%>
<% if page<>rs.pagecount then%>
<a href=./?Page=<%=(page+1)%>>下页</a> <a href=./?Page=<%=rs.pagecount%>>尾页</a>
<%else%>
下页<font color=000000> </font>尾页
<%end if%>
<script language=javascript>
function mychange(v){
if (v==""){}
else{
window.open (v,target="_self")
}
}
</script> 转第
<select class=dh name=select onChange=mychange(value) size="1" style="font-family: 宋体;border:1px solid; font-size: 9pt">
<%for i=1 to rs.pagecount%>
<%if i=page then%>
<option value=./?Page=<%=i%> selected><%=i%></option>
<%else%>
<option value=./?Page=<%=i%>><%=i%></option>
<%end if%>
<%next%>
</select>
页
<%admin_8848=session("admin_gbook")%>
<%if admin_8848<>"8848_admin" then%>
<%end if%>
<%if admin_8848="8848_admin" then%>
<a href="Mod_Psss.asp">[修改密码]</a> <a href=exit.asp>[退出管理]</a>
<%end if%>
</td>
</tr>
</table>
<%
rs.absolutepage=page
for ipage=1 to rs.pagesize
%>
<table width="700" align="center" cellpadding="4" cellspacing="0" style="border:#cccccc 1px solid;">
<tr bgcolor="efefef">
<td height="23" colspan="2" valign="middle" style="border-bottom:#cccccc 1px solid;color:#333333"> <strong><img
src="../images/gbooklist.gif" width=20 height=20 hspace="15" align="absmiddle"></strong>姓名：<font color=333333><b><%=htmlout(rs("姓名"))%></b></font> <a href=mailto:<%=rs("电子邮件")%>><font size="1" color="#333333" face="Verdana, Arial, Helvetica, sans-serif">Mail</font></a> <a href=<%=rs("主页地址")%> target=_blank><font size="1" color="#333333" face="Verdana, Arial, Helvetica, sans-serif">Homepage</font></a> <font size="1" face="Verdana, Arial, Helvetica, sans-serif">Time：<%=rs("留言时间")%></font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="745" valign="middle" style="color:#666666;line-height:150%;padding-left:15px;">
<table width="75" height="3" border="0" cellpadding="0" >
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -