📄 wish.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<!--
<pre>
┌─ 自由领域ASP+WAP同学录系统 ─────────────────┐
│ │
│ 感谢你使用 自由领域ASP+WAP同学录系统(测试版） │
│ 使用本免费源码您必须遵守以下规定 │
│ 不得公开发表代码 不得用做商业用途，不得向其他使用者收费。 │
│ │
│ 使用时，请保留此段信息，谢谢配合 │
│ │
│ 2004/12/19 │
│ │
└──────────────── http://99167.jahee.com ───┘
</per>
-->
<html>
<head>
<title>自由领域ASP+WAP同学录系统-许愿池</title></head>
<body>
<SCRIPT src="tip.js" type=text/javascript></SCRIPT>
<style type="text/css">
<!--
body,table,td,p,th { font-size: 9pt}
a { text-decoration: none;color:<%=linkcolor%>}
a:hover { text-decoration: none}
#tipBox {
BACKGROUND: #ffffff; BORDER-BOTTOM: black 1pt solid; BORDER-LEFT: black 1pt solid; BORDER-RIGHT: black 1pt solid; BORDER-TOP: black 1pt solid; FONT-FAMILY: 宋体; FONT-SIZE: 9pt; POSITION: absolute; VISIBILITY: hidden; padding:2 ;Z-INDEX: 100
}
-->
</style>
<body bgcolor="<%=bgcolor%>" text="<%=textcolor%>" link="<%=linkcolor%>">
<div align="center">
<table align=center cellpadding=2 cellspacing=1 width=550 border=1 bordercolor=#6284C1>
<tr>
<td align=center bgcolor=<%=titledarkcolor%>>
<font color="<%=titlelightcolor%>"><%=title%></font>
</td>
</tr>
</table>
<br>
<div align="center">
<center>
<DIV id=tipBox></DIV>
<table border="0" cellpadding="0" cellspacing="0" width="490" align=center>
<tr>
<td valign="bottom" colspan="5"><img src="IMG/Standtop.gif" width="500" height="95"></td>
</tr>
<tr>
<td align="right" valign="top" width="50"><img src="img/standleft.gif" width="15" height="200"></td>
<td valign="top" width="380" background="img/standbg.gif" style="padding:5">
<%
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from wish order by id desc"
rs.open sql,conn,1,1
if not (rs.bof or rs.eof) then
page=request.querystring("page")
pmcount=24 '每页显示记录数
rs.pagesize=pmcount
maxpage=rs.pagecount
total=rs.recordcount
if isempty(page) or cint(page)<1 or cint(page)>maxpage then
page=1
end if
rs.absolutepage=page
rc=rs.pagesize
re=1
for i=1 to 4
for x=1 to 6
if rs.eof and rc>0 then exit for
%>
<a href ="wishshow.asp?id=<%=rs("id")%>" onmouseover="this._tip = '<font color=#808080>有<%=rs("counter")%>人看过<br><%=rs("name")%>(<%=rs("sex")%>)的愿望</font><br><font color=#5a5a5a>请按此看看</font>'">
<img src="img/<%=rs("wishtype")%>/card.gif" width=50 height=30 border=0></a>
<%
rs.movenext
next
if rs.eof and rc>0 then exit for
response.write "<br>"
next
end if
%>
</td>
<td valign="top" width="15"><img src="img/standleft.gif" width="15" height="200"></td>
<td valign="top" width="50"><a href="lucky.asp" target="_blank" onmouseover="this._tip = '<font color=<%=linkcolor%>>按此看看今日运程</font>'" onclick="window.open('lucky.asp','Luck','width=158,height=297,scrollbars=no'); return false;"><img src="img/luck.gif" border="0" width="50" height="100"></a><br><a href="write.asp"><img src="img/chim.gif" border="0" width="50" height="100"></a></td>
<td valign="top" width="50"><img src="img/standleft.gif" width="15" height="200"></td>
</tr>
</table>
</center>
</div>
<br>
<div align="center">
<table align=center cellpadding=2 cellspacing=1 width=552 border=1 bordercolor=#6284C1>
<tr>
<td align="center" bgcolor=<%=titledarkcolor%> width="130"><font color="<%=titlelightcolor%>"><a href="../wish/login.asp">管理员维护</a></font></td>
<td align="center" bgcolor=<%=titledarkcolor%> width="268"><font color="<%=titlelightcolor%>">
页数【
<%
for num=1 to maxpage
if num=cint(page) then
response.write num
else
response.write "<b> <a href=wish.asp?page=" & num & ">" & num & "</a> </b>"
end if
next
%>
】</font></td>
<td align="center" width="130" bgcolor=<%=titledarkcolor%>>
<p align="center"><font color="<%=titlelightcolor%>">现有<font color="<%=linkcolor%>"><b><%=rs.recordcount%></b></font>个祈愿</p>
</td>
</tr>
</table>
</div></body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -