<!--#include file="../Include/Conno.asp" -->
<!--#include file="../Include/function.asp" -->
<!--#include file="../sql/Neeao_SqlIn.Asp" -->
<%
arcID=Request("arcID")
action=Request("action")
if action="send" then
 if Trim(Request.form("txtCheckCode"))<>CStr(session("CheckCode")) then
   response.write "<script language=javascript>alert('您输入的确认码和系统产生的不一致，请重新输入！');this.location.href='NShow.asp?ArticleID="&arcID&"';</Script>"
   Response.end
 end if

m_Name = deleteHtmlTag(Trim(Request.Form("username")))
u_content = deleteHtmlTag(Trim(Request.Form("msg")))
if m_name<>"" and u_content<>"" then  
u_content=replace(u_content,"药","*")
u_content=replace(u_content,"迷","*")
u_content=replace(u_content,"操","*")
u_content=replace(u_content,"枪","*")
u_content=replace(u_content,"党","*")
u_content=replace(u_content,"法轮功","***")
u_content=replace(u_content,"江泽民","***")
u_content=replace(u_content,"胡锦涛","***")
u_content=replace(u_content,"三级片","我该死")
u_content=replace(u_content,"腚","*")
u_content=replace(u_content,"妓","*")
u_content=replace(u_content,"娼","*")
u_content=replace(u_content,"阴蒂","*")
u_content=replace(u_content,"奸","*")
u_content=replace(u_content,"尻","*")
u_content=replace(u_content,"贱","*")
u_content=replace(u_content,"婊","*")
u_content=replace(u_content,"靠","*")
u_content=replace(u_content,"叉","*")
u_content=replace(u_content,"龟头","*")
u_content=replace(u_content,"屄","*")
u_content=replace(u_content,"赑","*")
u_content=replace(u_content,"妣","*")
u_content=replace(u_content,"肏","*")
u_content=replace(u_content,"尻","*")
u_content=replace(u_content,"屌","*")
end if
m_Sql = "Insert Into tb_newsPloy(n_id,u_name,u_msg,u_ip)"
m_Sql = m_Sql + "Values("&arcID&",'"&m_Name&"','"&u_content&"','"&request.ServerVariables("REMOTE_ADDR")&"')"
conn.Execute(m_Sql)
conn.Close
Response.write "<script language=javascript>alert('您的评论己发布成功,点确定返回查看！');this.location.href='NShow.asp?ArticleID="&arcID&"';</Script>"
Response.End()
End if
%>