📄 mesage.asp

📁 酷购网上商城~~ 完整的asp源代码.通过少许的改动就可以让你拥有自己的商城~~ 此代码仅供个人学习使用

💻 ASP

字号:

<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<html><head><title>您有新的短消息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onmouseover="window.status='〖<%=webname%>〗<%=weburl%>如果您喜欢本站,别忘了把本站介绍给您的好友哦！';return true">
<%
if Trim(Request("act"))="del" then
	conn.execute("delete from shop_message where id="&Trim(request("mid")))
end if
%>
<table width="100%" align="center" border="0" cellspacing="0" cellpadding="0" class="table-zuoyou" bordercolor="#CCCCCC">
<tr>
<td valign="top" align="center" bordercolor="#FFFFFF" bgcolor="#FFFFFF">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr bgcolor="#ffffff"> 
<td valign="top"> 
<table width="100%" border="0" align="center" cellpadding="10" cellspacing="0">
<tr> 
<td colspan="2"><table width="100%"  border="0" cellspacing="3" cellpadding="5">
  <tr>
    <td>短消息内容</td>
  </tr>
  <tr bgcolor="#f2f2f2">
    <td><%
	sql="select * from shop_message where UserID='"&Session("UserID")&"' or UserID='YES'"
	set rs100=conn.execute(sql)
	if not rs100.eof and not rs100.bof then
		while not rs100.eof
			response.write "<tr bgcolor='#f2f2f2'><td class=table-shang width='72%'>"&rs100("Content")&rs100("PublishTime")&"<a href='mesage.asp?mid="&rs100("id")&"&act=del'> ×删除</a></td><tr>"
			rs100.movenext
		wend
	end if
	rs100.close
%>
</td>
  </tr>
</table></td>
</tr>
<td class=table-shang width="28%" valign="bottom"> <div align="center"><a href='javascript:window.close()'>点击关闭窗口</a></div></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -