⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 messageview.asp

📁 软件介绍:国内最完善功能最齐全的多级会员程序.主要功能涵盖所有多级会员管理所需,超强大会员自定义编辑功能
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%
user=session("user")
admin=request("admin")
if admin="" then
admin=session("admin")
end if
if user="" and admin<>"admin" then
%>
<script language="javascript">
alert("登陆超时,请重新登陆!")

document.location="../index.asp?id=mm1"
</script>
<%
response.end
end if
session("admin")=admin
if pagenum="" or pagenum<1 then
pagenum=1
else
pagenum=cint(pagenum)
end if
Set rs=Server.CreateObject("ADODB.recordset")
rs.cachesize=30
rs.cursortype=1
mysq="select * from bbs order by titl desc"
rs.open mysq,cn,3,2
%>
<HTML><HEAD><TITLE>田响商务建站-会员交流中心</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<SCRIPT language=JavaScript><!-- Begin
function checkRequired(f){
for(var j=0;j<f.elements.length;j++){
if(f.elements[j].value=="") {alert(f.elements[j].name+"不能为空。");return false;break;}
}
return true;
}
// End -->
</SCRIPT>
<LINK href="images/index.css" rel=stylesheet>
</HEAD>
<BODY leftMargin=0 topMargin=1 background="../images/bg.gif">
<div align="center">
  <center>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" height="66">
  <tr> 
    <td width="168" height="80">
    <img src="../images1/logo.gif" width="168" height="70"></td>
    <td width="2" height="66"></td>
    <td height="66"> 
      <table border=0 cellpadding=0 cellspacing=0 width="590">
        <tr> 
          <td height=70 width="478" align="center"><!--[if gte vml 1]><v:roundrect id="_x0000_s1025"
 alt="" style='position:absolute;left:216.75pt;top:0;width:365.25pt;height:56.25pt;
 z-index:3' arcsize="10923f" strokecolor="silver">
 <v:fill color2="fill darken(118)" rotate="t" method="linear sigma" focus="50%"
  type="gradient"/>
 <v:shadow on="t" opacity=".5" offset="-6pt,6pt"/>
 <v:textbox>
<table cellspacing="0" cellpadding="0" width="90%" height="100%">
  <tr>
    <td align="center"><span style="font-size: 9pt; background-color:#FFFFFF">
    <img src="../images1/banner.gif" width="450" height="50"></span></td>
  </tr>
</table>
 </v:textbox>
</v:roundrect><![endif]--><![if !vml]><span style='mso-ignore:vglayout;
position:absolute;z-index:3;left:181px;top:-1px;width:480px;height:80px'><img
width=480 height=80 src="setad.files/image001.gif" v:shapes="_x0000_s1025"></span><![endif]></td>
          <td height=70 width="92" align="center" bgcolor="#FFFFFF"> 
                      <a href="index.asp?id=<%=id%>" style="text-decoration: none">
                      <font color="#000000">
                      <img border="0" src="../images1/b7.jpg" width="100" height="80"></font></a></td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width=760>
  <TBODY>
  <TR>
    <TD vAlign=top width=601>     
      <TABLE border=0 cellPadding=0 cellSpacing=0 width="754">     
        <TBODY>     
        <TR>     
          <TD height=10 width=14><img src="images/jiao1t.gif" width="10" height="10"></TD>     
          <TD height=10 width=740></TD></TR>     
        <TR>     
          <TD width=14></TD>     
          <TD width=740>     
            <TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
              <TBODY> 
              <TR> 
                <TD width="100%"> 
                  <TABLE bgColor=#01592 border=0 cellPadding=0 cellSpacing=1      
                  width="100%">
                    <TBODY> 
                    <TR> 
                      <TD bgColor=#ffffff vAlign=top width="100%" align="center"> 
                        <TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
                          <TBODY> 
                          <TR> 
                            <TD vAlign=top width="100%"> </TD>
                          </TR>
                          <TR> 
                            <TD width="100%"> </TD>
                          </TR>
                          <TR> 
                            <TD width="100%" align="center"> 
                              <table width="97%" border="0" cellspacing="0" cellpadding="1" bgcolor="#01592">
                                <tr>
                                  <td>
                                    <table width="100%" border="0" cellspacing="0" cellpadding="5" bgcolor="#FFFFFF">
                                      <tr> 
                                        <td bgcolor="#FFEBE7" background="../../../918/soho/images/hard_03.gif">
                                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                            <tr>
                                              <td align="right">
                                              <input id="mybutton2" type="button" name="myall" value="预览全部" onclick="document.location='messageview.asp'" style="background-color: #FFFFFF"></td>
                                              <td align="center">
                                              <input id="mybutton2" type="button" name="mywrite" value="创建新帖" onclick="document.location='messageadd.asp'" style="background-color: #FFFFFF"></td>
                                              <td>
                                              <input style="BORDER-RIGHT: #ffffff 1px solid; BORDER-TOP: #ffffff 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #ffffff 1px solid; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px solid; BACKGROUND-COLOR: #ffffff; TEXT-DECORATION: underline" onclick="history.back(-1)" type="button" value="返回上一步"></td>
                                            </tr>
                                          </table>
                                        </td>
                                      </tr>
                                      <tr> 
                                        <td>
                                          <table width="100%" border="0" cellspacing="0" cellpadding="1" style="word-break:break-all;">
                                                      <%
rs.pagesize=10
if pagenum>rs.pagecount then
pagenum=1
end if
if rs.eof then
else
rs.absolutepage=pagenum
end if
for j=1 to rs.pagesize
if rs.eof then exit for
%>
                                                      <tr> 
                                                        <td colspan="3"><hr size="1" <%if rs("stat")="标题" then%>color="#FF5918" <%else%>color="#FFEBE7" <%end if%>></td>
                                                      </tr>
                                                      <tr> 
                                                        <td colspan="2"><a style="cursor:hand;" onclick=window.location="message.asp?id=<%=rs("id")%>"><font size="2" color="#0000FF"><%=rs("stat")%>:<%=rs("titl")%></font></a></td>
                                                        <td width="30%"><font color="#FF5908">阅读<%=rs("count")%>次</font></td>
                                                      </tr>
                                                      <tr> 
                                                        <td width="30%"><font color="#0000FF">第</font><font face="Times New Roman" color="#0000FF"><%=j%></font><font color="#0000FF">条</font><font color="#FF5908">共</font><font face="Times New Roman" color="#FF5908"><%=rs.recordcount%></font><font color="#FF5908">条</font></td>
                                                        <td width="40%"><font color="#FF5908">作者:<%=rs("user")%></font></td>
                                                        <td width="30%"><font color="#FF5908">时间:</font><font face="Times New Roman" color="#FF5908"><%=rs("da")%></font></td>
                                                      </tr>
                                                      <%
rs.movenext
if rs.eof then exit for

next
%>
                                                      <tr> 
                                                        <td colspan="3"><hr size="1" color="#FF5918"></td>
                                                      </tr>
                                                      <tr> 
                                                        <td colspan="3"><font size="2" color="#0000FF">转到:
												<%
	for i=1 to rs.pagecount
	response.write "<a href=messageview.asp?pagenum="&i&">"&i&"</a>  "
	next
	
	%>
														
														</font></td>
                                                      </tr>
                                                      <tr align="center"> 
                                                        <td colspan="3"><font color="#FF5908"><a href="messageview.asp?pagenum=<%=pagenum-1%>">上一页 
                                                          </a>>>> <a href="messageview.asp?pagenum=<%=pagenum+1%>">下一页</a>&gt;&gt;&gt;&nbsp;</font></td>
                                                      </tr>
                                                    </table>
                                        </td>
                                      </tr>
                                    </table>
                                  </td>
                                </tr>
                              </table>
                            </TD>
                          </TR>
                          <TR> 
                            <TD width="100%"> </TD>
                          </TR>
                          <TR> 
                            <TD width="100%" align="right"> 
                              <TABLE border=0 cellPadding=0 cellSpacing=1 width=160>
                                <TBODY> 
                                <TR> 
                                    <TD bgColor=#fff7f7 height=20 width="12%"> </TD>
                                    <TD bgColor=#ffebe7 height=20 width="12%"> </TD>
                                    <TD bgColor=#ffdbce height=20 width="12%"> </TD>
                                    <TD bgColor=#ffcfbd height=20 width="12%"> </TD>
                                    <TD bgColor=#ffb69c height=20 width="13%"> </TD>
                                    <TD bgColor=#ff9e73 height=20 width="13%"> </TD>
                                    <TD bgColor=#ff7542 height=20 width="13%"> </TD>
                                    <TD bgColor=#ff5918 height=20 width="13%"> </TD>
                                  </TR>
                                  </TBODY> 
                                </TABLE>
                            </TD>
                          </TR>
                          </TBODY> 
                        </TABLE>
                      </TD>
                    </TR>
                    </TBODY>
                  </TABLE>
                </TD>
              </TR>
              </TBODY>
            </TABLE>
          </TD></TR>     
        <TR>     
              <TD height=2 width=14></TD>     
              <TD height=2 width=740></TD>
            </TR></TBODY></TABLE></TD></TR>
  </TABLE>     
<table width="770" border="0" cellspacing="0" cellpadding="5" align="center" height="34">
  <tr>
      
    <td align="center" background="../../../918/soho/images/hard_03.gif" height="24">
    <span style="font-size: 9pt">会员内部交流-请不要发表无关话题-多谢合作!</span></td>
    </tr>
  </table>
</BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -