?? msgboard.asp
字號:
<%@LANGUAGE="VBScript" CODEPAGE="936"%>
<!--#include file="CONN.asp" -->
<!--#include file="SESSION.asp" -->
<!--#include file="CHAR.asp" -->
<%
strsql="select mssg.*,user.realname from mssg inner join [user] on user.username=mssg.mssguser order by mssg.mssgtime desc"
set rs=server.CreateObject("adodb.recordset")
rs.open strsql,conn,1,1
if not rs.eof then
rs.PageSize =10 '每頁記錄條數
result_num=rs.RecordCount '記錄總數
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
else
result_num=0
maxpage=0
page=0
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<title><%=classname%>同學錄--班級留言</title>
<link href="css/class.css" type=text/css rel=stylesheet>
<script language="JavaScript" src="js/go.js"></script>
</head>
<body background="images/1.GIF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="776" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="3"><img src="images/top_t.gif" width="776" height="43"></td>
</tr>
<tr>
<td width="138"><img src="images/top_l.gif" width="138" height="39"></td>
<td width="584" align="right" bgcolor="#666B52"><a href="index.asp"><img src="images/toplogo.gif" alt="<%=classname%>同學錄" width="200" height="39" border="0"></a></td>
<td width="54"><img src="images/top_r.gif" width="54" height="39"></td>
</tr>
<tr>
<td colspan="3"><table width="776" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="120" rowspan="2" valign="top" background="images/left_x.gif"><img src="images/left_img.gif" width="120" height="480"></td>
<td rowspan="2" valign="top" bgcolor="#F2F2EA"> <div align="center">
<!--#include file="top.asp" -->
</div>
<table width="618" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top"> <div align="center"><br>
<!--#include file="left.asp" -->
</div></td>
<td width="10"> </td>
<td width="418" valign="top"><table width="400" border="0" align="center" cellpadding="2" class="font1">
<tr>
<td width="459">您的位置>班級留言</td>
<td width="27"> </td>
</tr>
</table>
<div align="center">
<table width="400" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="400" border="0" cellpadding="0" cellspacing="0" background="images/gnymtbz.gif">
<tr>
<td width="135"><img src="images/bjly.gif" width="135" height="36"></td>
<td> </td>
<td width="100"><img src="images/bjly_fbly.gif" width="100" height="36" border="0" usemap="#Map"></td>
</tr>
</table></td>
</tr>
<tr>
<td><table width="400" border="0" cellpadding="0" cellspacing="0" background="images/n_bk.gif">
<tr>
<td> <br>
<table width="100%" border="0" align="center" cellpadding="4" cellspacing="0">
<%if not rs.eof then
for i=1 to rs.PageSize
%>
<tr>
<td><table width="380" border="0" align="center" cellpadding="4" cellspacing="0" class="1px-table">
<tr>
<td width="120" rowspan="2" align="center" bgcolor="fafbf2">
<table width="110" border="0" cellpadding="0" cellspacing="1" bgcolor="#666B52">
<tr>
<td><table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="E3E3CF">
<tr>
<td><img src="images/birthdayman.gif" width="15" height="18">
<span class="font1"><strong><font color="#FF0000"><a href="member.asp?id=<%=rs("mssguser")%>"><%=rs("realname")%></a></font></strong>在<%=formatdate(rs("mssgtime"))%>時留言說道：</span> </td>
</tr>
</table></td>
</tr>
</table>
<span class="font1"> </span></td>
<td width="260" bgcolor="fafbf2">
<TABLE width="250" border=0 cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD width=14><IMG height=8
src="images/board/top_l.gif"
width=14></TD>
<TD
background=images/board/top_c.gif></TD>
<TD width=16><IMG height=8
src="images/board/top_r.gif"
width=16></TD>
</TR>
<TR>
<TD vAlign=top width=14
background=images/board/center_l.gif></TD>
<TD
bgColor=#fffff1><%=ubbcode(rs("MssgText"))%><BR></TD>
<TD vAlign=top width=16
background=images/board/center_r.gif><IMG
height=8
src="images/board/top_r2.gif"
width=16></TD>
</TR>
<TR>
<TD vAlign=top width=14><IMG height=42
src="images/board/foot_l1.gif"
width=14></TD>
<TD
background=images/board/foot_c.gif><IMG
height=42
src="images/board/foot_l3.gif"
width=36></TD>
<TD align=right width=16><IMG height=42
src="images/board/foot_r.gif"
width=16></TD>
</TR>
</TBODY>
</TABLE>
</td>
</tr>
<tr>
<td align="right" bgcolor="fafbf2">
<%if rs("MssgUser")=session("username") or session("usergroup")=3 then%>
<a href="msgadd.asp?id=<%=rs("MssgID")%>"><img src="images/edit.gif" alt="修改" width="22" height="16" border="0"></a><a href='javascript:go("msgdel.asp?id=<%=rs("MssgID")%>","您確定要刪除?")'><img src="images/del.gif" alt="刪除" width="22" height="16" border="0"></a>
<%end if%>
</td>
</tr>
</table>
<br>
</td>
</tr>
<%
rs.movenext
if rs.EOF then Exit For
next
end if
rs.close
set rs=nothing
%>
</table>
<table width="380" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#666B52">
<tr>
<td><table width="380" border="0" align="center" cellpadding="0" cellspacing="0" class="font1">
<tr>
<td align="center" bgcolor="#f1f1eb" class="font1">
<% call LastNextPage(maxpage,page,result_num) %>
</td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td><img src="images/n_foot.gif" width="400" height="10"></td>
</tr>
</table>
</div></td>
</tr>
</table></td>
<td width="38" valign="top" background="images/right_b.gif"><img src="images/right_b.gif" width="38" height="5"></td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="3"><img src="images/z_f.gif" width="776" height="26"></td>
</tr>
<tr>
<td colspan="3"> </td>
</tr>
</table>
<map name="Map">
<area shape="rect" coords="19,11,88,28" href="msgadd.asp">
</map>
</body>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -