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

📄 index.asp

📁 基本功能: 1.网友留言 2.留言可以选择悄悄话 3.管理员后台管理留言 4.可有多个管理员 5.20个留言形象 6.可设置每页显示最大留言数
💻 ASP
字号:
🔍 
<!--#include file="conn1.asp"-->
<%
set data=server.createobject("adodb.recordset")
sq_1="select * from message order by id desc"
data.open sq_1,conn,1,1
set op=server.createobject("adodb.recordset")
sq_2="select * from msg_option order by id desc"
op.open sq_2,conn,1,1
%>

<%
dim pn
dim d_page
d_page=op("page_num") 
data.pagesize=d_page
if request.querystring("pn")="" or request.querystring("pn")=0 then
pn=1
else
pn=request.querystring("pn")
data.absolutepage=trim(request.querystring("pn"))
end if
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=op("web_name")%>留言本</title>
<style type="text/css">
<!--
body,td,th {font-size: 12px;}
a {font-size: 12px;}
a:link {text-decoration: none;}
a:visited {text-decoration: none;}
a:hover {text-decoration: none;}
a:active {text-decoration: none;}
.style5 {color: #FF0000}
.style6 {font-size: 12px}
-->
</style>
</head>


<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" link="<%=op("link_color")%>" vlink="<%=op("vlink_color")%>" alink="<%=op("alink_color")%>" text="<%=op("text_color")%>">

<div align="center">
	<table cellpadding="0" cellspacing="0" width="768" height="97">
		<tr>
			<td height="10" valign="top" width="10">
			<img border="0" src="image/top_left.gif" width="10" height="10"></td>
			<td height="10" valign="top" width="748" background="image/top.gif" colspan="2">
			</td>
			<td height="10" valign="top" width="10">
			<img border="0" src="image/top_right.gif" width="10" height="10"></td>
		</tr>
		<tr>
			<td height="79" valign="top" width="10" background="image/mid_left.gif">
			　</td>
			<td height="79" valign="top" width="171" bgcolor="#F3F3FF">
			<img border="0" src="<%=op("web_logo")%>" width="171" height="75"></td>
			<td height="79" valign="middle" width="577" bgcolor="#F3F3FF">
			<p align="center">
			<object classid="clsid:D27CDB6E-AE6D-11CF-96B8-444553540000" id="obj1" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,40,0" border="0" width="537" height="63">
				<param name="movie" value="<%=op("web_ad")%>">
				<param name="quality" value="High">
				<param name="menu" value="false">
				<embed src="flash/ad.swf" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" name="obj1" width="537" height="63" quality="High" menu="false"></object>
			</td>
			<td height="79" valign="top" width="10" background="image/mid_right.gif">
			　</td>
		</tr>
		<tr>
			<td height="10" valign="top" width="10">
			<img border="0" src="image/bottom_left.gif" width="10" height="10"></td>
			<td height="10" valign="top" width="748" background="image/bottom.gif" colspan="2">
			</td>
			<td height="10" valign="top" width="10">
			<img border="0" src="image/bottom_right.gif" width="10" height="10"></td>
		</tr>
	</table>
</div>
<div align="center">
	<table cellpadding="0" cellspacing="0" width="768" height="12">
		<%if data.eof and data.bof then%><tr>
			<td height="12" width="768">
			<p align="center"><a href ="add_msg.asp">还没有留言哦,你来开个头吧^_^</a>
			<table cellpadding="0" cellspacing="0" width="768" height="12">
		
		<tr>
			<td height="12">
			<p align="center">[<a href="add_msg.asp">写留言</a>]&nbsp;&nbsp;&nbsp;
			[<a href="admin_enter.asp">管理员登陆</a>]&nbsp;&nbsp;&nbsp;
			[<a href=<%=op("web_address")%>>回到主页</a>]</td>
		</tr>
	</table>

			</p>
			</td>
			<%else%>
		</tr>
	</table>
</div>
<div align="center">
	<table cellpadding="0" cellspacing="0" width="768" height="12">
		
		<tr>
			<td height="12">
			<p align="center">[<a href="add_msg.asp">写留言</a>]&nbsp;&nbsp;&nbsp;
			[<a href="admin_enter.asp">管理员登陆</a>]&nbsp;&nbsp;&nbsp;
			[<a href=<%=op("web_address")%>>回到主页</a>]</td>
		</tr>
	</table>
	<table cellpadding="0" cellspacing="0" width="768" height="12">
		
		<tr>
			<td height="12" style="font-size: 12px" width="150">
			<p align="center"><b><font color="#6A6AFF">蓝雨之恋 一生不变</font></b></td>
			<td height="12" style="font-size: 12px" width="0">
			</td>
			<td height="12" style="font-size: 12px" width="618">
			<b>
			<marquee bgcolor="#FFFFFF" width="611" height="12" scrollamount="2" scrolldelay="100"><%=op("zm")%></marquee></b></td>
		</tr>
	</table>
	<table cellpadding="0" cellspacing="0" width="768" height="12">
		<!-- MSTableType="nolayout" -->
		<tr>
			<td height="12" style="font-size: 12px">
			<p align="center"><font color="#6A6AFF">倾听留言本源码下载地址: 
			</font> 
			<a href=http://iceherald.10169.net/qtice_book.rar> 
			<font color="#6A6AFF">http://iceherald.10169.net/qtice_book.rar</font></a><font color="#6A6AFF"><br>
			QQ联系:55572687</font></td>
		</tr>
	</table>
	<table cellpadding="0" cellspacing="0" width="768" height="10">
		<!-- MSTableType="nolayout" -->
		<tr>
			<td height="10" width="10">
			<img border="0" src="image/top_left.gif" width="10" height="10"></td>
			<td height="10" width="132" background="image/top.gif"></td>
			<td height="10" width="10">
			<img border="0" src="image/top_right.gif" width="10" height="10"></td>
			<td height="10" width="17"></td>
			<td height="10" width="10">
			<img border="0" src="image/top_left.gif" width="10" height="10"></td>
			<td height="10" width="579" background="image/top.gif"></td>
			<td height="10" width="10">
			<img border="0" src="image/top_right.gif" width="10" height="10"></td>
		</tr>
	</table>
</div>
<%do while not data.eof and d_page>0 %>
<div align="center">
	<table cellpadding="0" cellspacing="0" width="768" height="154">
		<!-- MSTableType="nolayout" -->
		<tr>
			<td height="154" width="11" background="image/mid_left.gif" rowspan="2">
			　</td>
			<td height="154" width="131" valign="middle">
			<div align="center">
				<table cellpadding="0" cellspacing="0" width="120" height="174">
					<tr>
												
						<td height="138">
						<p align="center">
						<%if data("is_admin")="2" then%>
						<font color="#FF0000">[管理员]</font><%end if%><br>
						<img border="0" src="<%=data("face")%>" width="50" height="100" style="border: 1px solid #000000"></p>
						</td>
					</tr>
					<tr>
						<td height="12" style="table-layout:fixed;word-break:break-all ; font-size: 12px" >
						<p align="center">昵称:<%=data("nick_name")%></p>
						</td>
					</tr>
					<tr>
						<td height="12" style="table-layout:fixed;word-break:break-all;font-size: 12px">
						<p align="center">QQ:<%=data("oicq")%></p>
						</td>
					</tr>
				</table>
			</div>
			</td>
			<td height="154" width="10" background="image/mid_right.gif" rowspan="2">
			　</td>
			<td height="154" width="19" rowspan="2">　</td>
			<td height="154" width="8" background="image/mid_left.gif" rowspan="2">
			　</td>
			<td height="154" width="581" rowspan="2">
			<div align="center">
			<table cellpadding="0" cellspacing="0" width="579" height="151">
				<tr>
					<td height="12" width="579" colspan="3">
					+----------------------------------------------------------------------------------------------+</td>
				</tr>
				<tr>
					<td height="109" width="14" rowspan="3">　</td>
					
					<td height="19" width="546" valign="top" style="table-layout:fixed;word-break:break-all;font-size: 12px">留言主题:
					<%if data("show")=2 then%>
					<font color="<%=op("qqh_color")%>">秘密</font>
					<%else%>
					<%=data("title")%>
					<%end if%>
					</td>
					<td height="109" width="19" rowspan="3">　</td>
				</tr>
				<tr>
					<td height="83" width="546" bgcolor="<%=op("bg_color")%>" valign="top" style="table-layout:fixed;word-break:break-all; text-indent:30">
					<%if data("show")=2 then%>
                         <font color="<%=op("qqh_color")%>">此留言为悄悄话^_^</font>
                         <%else%>					
					<%=data("contents")%>　
					<%end if%>
					</td>
				</tr>
				<tr>
					<td height="25" width="546" bgcolor="<%=op("bg_color")%>" valign="top" style="table-layout:fixed;word-break:break-all; text-indent:30">
					<%if data("is_admin")="2" then%><%else%><font color="<%=op("reply_color")%>">回复:<%=data("reply")%></font><%end if%></td>
				</tr>
				<tr>
					<td height="18" width="560" colspan="2">
					<p align="right">&nbsp;留言时间:<%=data("date")%>&nbsp;&nbsp;
					
					<a target="_blank" href="<%=data("web_index")%>">
					<img border="0" src="image/icon/ie.gif" width="16" height="16">&nbsp;
					<a href=mailto:<%=data("e_mail")%>>
					<img border="0" src="image/icon/email.gif" width="16" height="16"></p>
					</td>
					<td height="18" width="19"></td>
				</tr>
				<tr>
					<td height="12" width="579" colspan="3">
					+----------------------------------------------------------------------------------------------+</td>
				</tr>
			</table>
			</div>
			</td>
			<td height="154" width="10" background="image/mid_right.gif" rowspan="2">
			　</td>
		</tr>
		<tr>
			<td height="1" width="131" valign="top"></td>
		</tr>
	</table>
</div>
<div align="center">
	<table cellpadding="0" cellspacing="0" width="768" height="10">
		<!-- MSTableType="nolayout" -->
		<tr>
			<td height="10" width="10" style="font-size: 12px">
			<img border="0" src="image/bottom_left.gif" width="10" height="10"></td>
			<td height="10" width="132" background="image/bottom.gif" style="font-size: 12px">
			</td>
			<td height="10" width="10" style="font-size: 12px">
			<img border="0" src="image/bottom_right.gif" width="10" height="10"></td>
			<td height="10" width="17" style="font-size: 12px"></td>
			<td height="10" width="10" style="font-size: 12px">
			<img border="0" src="image/bottom_left.gif" width="10" height="10"></td>
			<td height="10" width="579" background="image/bottom.gif" style="font-size: 12px">
			</td>
			<td height="10" width="10" style="font-size: 12px">
			<img border="0" src="image/bottom_right.gif" width="10" height="10"></td>
		</tr>
	</table>
</div>
<% d_page=d_page-1
data.movenext
loop	%>
<div align="center">
	<table cellpadding="0" cellspacing="0" width="768" height="13">
		<!-- MSTableType="nolayout" -->
		<tr>
			<td height="13">
			<p align="right">第<font color="#ff0000"><%=pn%></font>页 <%
                            for p=1 to data.pagecount
                            response.write ("[")
                            response.write "<a href=index.asp?pn="&p&">"&p&"</a>"
                            response.write ("]&nbsp;")
                            next
                          %>共<%=data.pagecount%>页</p>
			</td>
		</tr>
	</table>
</div>
              <%data.close
			set data=nothing
			set op=nothing
			conn.close
			set conn=nothing 
			%>

<div align="center">
	<table cellpadding="0" cellspacing="0" width="348" height="87">
		<!-- MSTableType="nolayout" -->
		<tr>
			<td height="12" valign="top" width="348" colspan="3"></td>
		</tr>
		<tr>
			<td height="63" valign="top" width="48">　</td>
			<td height="63" valign="top" width="251">
			<p align="center"><font face="宋体" size="2">倾听留言本V1.2<br>
			</font>留言本及源程序由 <span lang="en">
			<font face="宋体" size="2" color="#FF0000"><a href="QQ:55572687">
			<font color="#FF0000">冰中使者</font></a></font><a href="QQ:55572687"><font face="宋体" color="#FF0000" size="3">&reg;</font></a><font face="宋体" size="4" color="#FF0000">
			</font><font face="宋体" size="2">制作<br>
			</font></span><font face="宋体" size="2">
			[<a target="_blank" href="http://www.qtice.com">http://www.qtice.com</a>]<br>
　</font></td>
			<td height="63" valign="top" width="49">　</td>
		</tr>
		<tr>
			<td height="12" valign="top" width="348" colspan="3"></td>
		</tr>
	</table>
</div>

</body>

<%end if%>
</html>

⌨️ 快捷键说明

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