comment_save.asp

来自「商品订单管理：商品分类管理 添加与修改商品 管理订单 投诉订单 反馈信息 商品留」· ASP 代码 · 共 27 行

<!--#include file="conn.asp"-->
<!--#include file="char.asp"-->
<link rel="stylesheet" type="text/css" href="img/css.css">
<%
dim id,mailX,CommentX
If IsEmpty(request("id")) Then
response.write "Sorry ,the product is not found" 
End If
id=request("id")
set rs=conn.execute("select * from hw where hw_id="&id&"")
if rs.bof and rs.bof then
response.write "Sorry ,the product is not found" 
End If
rs.close
set rs=nothing
	mailX=replace(trim(request("MailX")),"'","")
	CommentX=replace(trim(Request("CommentX")),"'","")
    if mailX="" or CommentX="" then
response.write "Invalid entered. Please try again." 
else
set rs=nothing
CommentX = HTMLEncode(CommentX)
  conn.execute("insert into Comment(dataid,mailX,CommentX) values ('"&id&"','"&mailX&"','"&CommentX&"')")
  Successstr="Thank you!"
  Successbox(Successstr)
  end if
%>