📄 default.asp
字号:
<!--#include file="Conn2.asp" -->
<!--#include file="Conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
set showbbs=conn.execute("select*from mofeibook order by id desc")
rs.open "select*from mofeibook order by id desc",conn,1,1
order=0
count=rs.RecordCount
pagesize=10
pagecount=count\(pagesize+1)+1
page=request.QueryString("page")
if page="" then
page=1
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=name%></title>
<BASE onmouseover=window.status="<%=name%>(<%=http%>)----为您提供最丰富的网络资源！";return true>
<link href="../common/css/other.css" rel="stylesheet" type="text/css">
<link href="../common/css/font.css" rel="stylesheet" type="text/css">
<link href="../common/css/link.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
//-->
</script>
</head>
<body>
<table width="850" border="0" align="center" cellpadding="0" cellspacing="0" class="table_2">
<tr>
<td height="2"></td>
</tr>
</table>
<!--#include file="common/index_top.asp" -->
<!--#include file="common/menu.asp"-->
<table width="850" border="0" align="center" cellpadding="0" cellspacing="0" class="table_2">
<tr>
<td height="2"></td>
</tr>
</table>
<table width="850" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="table_2">
<tr>
<td> 现在是: <%=now()%> </td>
<td height="25"> <p align="right"> <img border="0" src="ymbimg/mo.gif" width="10" height="10"> <a href="login.asp">管理登录</a> <img border="0" src="ymbimg/mo.gif" width="10" height="10"> <a href="input.asp" title="你认为沉默是金吗?">我要留言</a>
</td>
</tr>
</table>
<table>
</table>
<%
if not showbbs.eof then
showbbs.Move (page-1)*pagesize
cc=(page-1)*pagesize
do while (not showbbs.eof) and (order<pagesize)
cc=cc+1
order=order+1
%>
<table border="0" cellpadding="0" cellspacing="1" width="850" align="center" bgcolor="#999999" bordercolorlight="#ACC8F0" bordercolordark="#FFFFFF">
<tr>
<td bgcolor="#F7F7F7" width="21%" height="24"> <img border="0" src="ymbimg/time.gif" width="19" height="14">
<%=showbbs("time_")%></td>
<td colspan="7" bgcolor="#F7F7F7" width="556"><img border="0" src="ymbimg/1title.gif" width="10" height="10"> <b><font color="#180682">标题: <%=DoTrimProperly((showbbs("title_").Value), 36, 0, 1, "...")%></font></b></td>
</tr>
<tr>
<td height="250" bgcolor="#FFFFFF" > <p align="center"><img src="ymbqipic/<%=showbbs("face_")%>.jpg" width="140" border="0" align="middle"></p> </td>
<td colspan="7" bgcolor="#FFFFFF">
<table border="0" cellpadding="0" cellspacing="0" width="570" align="center" style="word-break:break-all;table-layout:fixed">
<tr>
<td width="570"><br>
<img border="0" src="ymbimg/11.gif" width="9" height="9">
<font color="#004600">内容:</font> <%=showbbs("mofei_")%></td>
</tr>
<tr>
<td bgcolor="#FDFDFD">-----------------------------------------------------------------------------------------------</td>
</tr>
<tr>
<td width="570" bgcolor="#FDFDFD"><img border="0" src="ymbimg/req.gif" width="10" height="9"> <span class="font12_red">版主于：</span><font color="#808080"><%=showbbs("retime_")%> <span class="font12_red">回复：</span></font><font color="#808080"><%=showbbs("remofei_")%></font>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td bgcolor="#F7F7F7" height="25">
<p align="center"><img border="0" src="ymbimg/where.gif" width="12" height="11">
<font color="#008000"><%=DoTrimProperly((showbbs("where_").Value), 4, 0, 1, "...")%></font> <img border="0" src="ymbimg/use.gif" width="16" height="18">
<b><font color="#5E0920"><%=DoTrimProperly((showbbs("use_").Value), 4, 0, 1, "...")%></font></b></p>
</td>
<td bgcolor="#F7F7F7">
<table border="0" cellpadding="0" cellspacing="0" width="554" align="right" bgcolor="#F7F7F7">
<tr>
<td width="30%" ></td>
<td width="10%"><img border="0" src="ymbimg/ip.gif" width="13" height="15" alt="对不起!只有版主才有此权限!">查 IP</td>
<td width="10%"><img border="0" src="ymbimg/4_qq.gif" width="45" height="18" alt="和我聊天-QQ:<%=showbbs("qq_")%>"></td>
<td width="10%"><a href="<%=showbbs("home_")%>" target="_blank"><img border="0" src="ymbimg/1home.gif" width="47" height="18" alt="欢迎参观我的主页:<%=showbbs("home_")%>"></a></td>
<td width="10%"><a href="mailto:<%=showbbs("email_")%>"><img border="0" src="ymbimg/1email.gif" width="45" height="18" alt="朋友从写信开始!mailto:<%=showbbs("email_")%>"></a></td>
<td width="10%"><img border="0" src="ymbimg/del.gif" width="52" height="16" alt="对不起!只有版主才有此权限!"></td>
<td width="10%"><img border="0" src="ymbimg/re.gif" width="45" height="18" alt="对不起!只有版主才有此权限!"></td>
</tr>
</table>
</td>
</tr>
</table>
<%
showbbs.movenext
loop
end if
showbbs.Close
set showbbs=nothing
%>
<table width="850" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="table_2">
<tr>
<td>
<td colspan="7" bgcolor="#FFFFFF">
<p align="right">
<%if page>1 then%>
<a href="default.asp?page=1">第一页</a> <a href="default.asp?page=<%=page-1%>">上 页</a>
<%end if%>
<%if (page-pagecount)<0 then%>
<a href="default.asp?page=<%=(page+1)%>">下 页</a>
<a href="default.asp?page=<%=pagecount%>">最后页</a>
<%end if%>
</p>
</td>
</tr>
</table>
<table width="850" border="0" align="center" cellpadding="0" cellspacing="0" class="table_2">
<tr>
<td height="5"></td>
</tr>
</table>
<!--#include file="common/bottom.asp" -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -