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

📄 message.asp

📁 购物系统时尚版.强大的后台文章编辑器的功能
💻 ASP
字号:
<!--#include file="my_lib/my_request.asp" -->
<!--#include file="my_lib/char.asp" -->
<!--#include file="db_conn.asp" -->
<%
id=my_request("id",1)
action=my_request("action",0)
if action="save" then
call save()
end if
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/main.css" rel="stylesheet" type="text/css">
<title>商品评论</title>
</head>

<body>

<table border="1" width="100%" id="table1" style="border-collapse: collapse" bordercolor="#CCCC99">
	<tr>
		<td>
		<form action="message.asp" method=post>
		<table border="0" width="100%" id="table2" cellspacing="0" cellpadding="0">
			<tr>
				<td height="20" bgcolor="#CFF3F8" width="982" colspan="2">
				<p align="center" class=blank>商 品 评 论</td>
			</tr>
			<tr>
				<td width="10%" align="right" class=smallfont>&nbsp;笔名:</td>
				<td width="93%" class=smallfont>
				<input type="text" name="username" size="16" maxlength="20"><input type=hidden name=id value=<%=id%>>&nbsp;&nbsp; 
				级别:<input type="radio" value="1" name="xingxing"><img border=0 src=images/art1.gif>
				<input type="radio" value="2" name="xingxing"><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif>
				<input type="radio" value="3" name="xingxing" checked><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif>
				<input type="radio" value="4" name="xingxing"><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif>
				<input type="radio" value="5" name="xingxing"><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif><img border=0 src=images/art1.gif></td>
			</tr>
			<tr>
				<td width="7%" align="right" class=smallfont>&nbsp;内容:</td>
				<td width="93%"><textarea rows="3" name="neirong" cols="49"></textarea><input type=hidden name=action value=save></td>
			</tr>
			<tr>
				<td width="982" colspan="2">
				<p align="center"><input type="submit" value="提交" name="B1">&nbsp;&nbsp;
				<input type="button" value="关闭" name="B2" onclick="javascript:window.close()"></td>
			</tr>
			<tr>
				<td width="982" colspan="2" height="25">
				<font color=#FF0000 style="font-size: 12px">&nbsp; 声明:网友发表的任何内容与本站均无直接或间接关系,请不要发表任何非法内容。</font></td>
			</tr>
			</table></form>
		</td>
	</tr>
</table>

</body>

</html>
<%sub save()
username=my_request("username",0)
xingxing=my_request("xingxing",1)
neirong=my_request("neirong",0)
pid=my_request("id",1)
if username=""  or xingxing="" or neirong="" or pid=""  then
response.write"<SCRIPT language=JavaScript>alert('资料未填写完整或参数错误!');"
response.write"javascript:history.go(-1)</SCRIPT>"
else
sql="select * from product_leave"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
rs.addnew
rs("username")=username
rs("xingxing")=xingxing
rs("neirong")=Outleach(neirong)
rs("pid")=pid
rs("ip")=Request.ServerVariables("REMOTE_ADDR")
rs("addtime")=now()
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
response.write"<script>window.opener.document.location.reload();</script>"
response.write"<script>window.close();</script>"
end sub
%>

⌨️ 快捷键说明

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