此主题相关图片如下：未命名.jpg

这个是在发表文章评论时,复制点SQL语句或脚本出现的,

现在的问题就是正常的不应该显示<scrip...>  /n也该是换行,怎么把原句显示出来了,看他的语句也没错啊,怎么改啊

For I=LBound(SplitSqlArr) To Ubound(SplitSqlArr)
   If Instr(LCase(Str),SplitSqlArr(I))<>0 Then
    Response.Write "<script>alert('系统警告！\n\n1、您提交的数据可能有恶意字符;\n2、您的数据已经被记录;\n3、您的IP："&GetIP&";\n4、操作日期："&Now&";\n');window.close();</script>"
    Response.End
   End if
  Next

提供一段评论代码,用它来做为评论评论内容就会出现这个提示

" WHERE instr(specialid,'" & KS.S("SpecialID") & "')>0 AND Verific=1 And DelTF=0"

[此贴子已经被作者于2007-11-11 22:23:25编辑过]