Sub CheckCanSubmit(str)
Dim connt,connts
connt="六合彩,免费电影,安利,http,www,<a"
connts = split(connt,",")
For each glword in connts
if instr(str,glword)<>0 then
Response.Write("<script>alert('操作非法');window.history.go(-1);</script>")
Response.End()
end if
next
End Sub
机械节能产品生产企业官网模板...
大气智能家居家具装修装饰类企业通用网站模板...
礼品公司网站模板
宽屏简约大气婚纱摄影影楼模板...
蓝白WAP手机综合医院类整站源码（独立后台）...苏ICP备2024110244号-2 苏公网安备32050702011978号 增值电信业务经营许可证编号：苏B2-20251499 | Copyright 2018 - 2025 源码网商城 (www.ymwmall.com) 版权所有