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

📄 letter.asp

📁 1:本聊天室只有69K
💻 ASP
字号:
<!--#INCLUDE FILE="inc_config.asp"-->
<!--#INCLUDE FILE="inc_dbconn.asp" -->
<% response.expires=0 %>
<html>
<head>
<title>你有留言耶!</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body      {  font-size: 10.4pt }
td        {  font-size: 10.4pt }
.normal   {  <%=m_button%> ; font-size: 10.4pt}
.over     {  <%=m_buttonover%> ; font-size: 10.4pt}
.down     {  <%=m_buttondown%> ; font-size: 10.4pt}
-->
</style>
</head>

<body bgcolor="<%=m_bg2%>" text="<%=m_text2%>">
   <%
if request("id")<>"" then
my_conn.execute ("delete from "&dbtable_gbook&" where "&dbfield_gbook_id&"="&trim(request("id")))
%>
<br><br>
<center><strong><font color="<%=m_text2%>">删除留言成功!</font></strong><br><br>
<input type="button" value="返回" class="normal" onmouseover="this.className='over'" onmousedown="this.className='down'" onmouseout="this.className='normal'" onclick="top.location.href='letter.asp'"> 
<input type="button" value="关闭" class="normal" onmouseover="this.className='over'" onmousedown="this.className='down'" onmouseout="this.className='normal'" onclick="javascript:window.close()">
</center>
<% else %> 
<table width="380" border="1" cellspacing="0" cellpadding="3" bordercolorlight="#FFFFFF" bordercolordark="#999999">
  <tr align="center" bgcolor="<%=m_bg1%>">
    <td colspan="2" style="color:<%=m_text1%>">你 的 留 言</td>
  </tr>
<%
set rs=my_conn.execute("select * from "&dbtable_gbook&" where "&dbfield_gbook_name&"='"&session("user")&"' order by "&dbfield_gbook_id&" desc")
if not rs.eof then
  do while not rs.eof %>
  <tr> 
    <td align="center" valign="center"><img src="img/<%=rs(dbfield_gbook_picture)%>.gif"></td>
    <td>
	<% if rs(dbfield_gbook_comefrom)<>"" then %>
	来自 <font color="blue"><%=rs(dbfield_gbook_comefrom)%></font> 的
	<% end if %> <font color="red"><%=rs(dbfield_gbook_lyname)%></font> 
		<% if rs(dbfield_gbook_homepage)<>"" then %>
		<a href="<%=rs(dbfield_gbook_homepage)%>"><img src="img/home.gif" width="16" height="16" border="0"></a>
		<% end if %>
		<% if rs(dbfield_gbook_email)<>"" then %>
	    <a href="mailto:<%=rs(dbfield_gbook_email)%>"><img src="img/mail.gif" width="16" height="16" border="0"></a>
		<% end if %>
	    于 <font color="yellow"><%=rs(dbfield_gbook_addtime)%></font> 对你说:<br>
	    <%=rs(dbfield_gbook_message)%>
  <tr>
    <td colspan="2" align="right">
	<a href="letter.asp?id=<%=rs(dbfield_gbook_id)%>" onclick="return confirm('你确认要删除这条留言吗?')">删留言</a>
	<a href="reletter.asp?n=<%=rs(dbfield_gbook_lyname)%>" onclick="javascript:window.parent.resizeTo(620,200)");">回留言</a></td>
  </tr>
  <%
  rs.movenext
  loop
else %>
  <tr>
     <td colspan="2" align="center">你还没有留言耶!</td>
  </tr>
<% end if
rs.close
set rs=nothing
my_conn.close
set my_conn=nothing
end if
%>
</table>
</body>
</html>
<% session("havebook")=1 %>

⌨️ 快捷键说明

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