审计实务-中国会计师网

				设为首页
				繁体简体
				在线咨询

<% Response.Buffer = True Const EnableStopInjection = True If EnableStopInjection = True Then If Request.QueryString <> "" Then Call StopInjection(Request.QueryString) If Request.Cookies <> "" Then Call StopInjection(Request.Cookies) If Request.Form <> "" Then Call StopInjection(Request.Form) End If Sub StopInjection(Values) Dim regEx Set regEx = New RegExp regEx.IgnoreCase = True regEx.Global = True regEx.Pattern = "'|;|#|([\s\b+()]+(select|update|insert|delete|declare|@|exec|dbcc|alter|drop|create|backup|if|else|end|and|or|add|set|open|close|use|begin|retun|as|go|exists)[\s\b+]*)" Dim sItem, sValue For Each sItem In Values sValue = Values(sItem) If regEx.Test(sValue) Then Response.Write "己记录IP" Response.End End If Next Set regEx = Nothing End Sub %> Untitled Document

审计实务审计研究审计准则审计制度

审计实务 - 文章导览

理论及文书

特殊目的审计

资本金验证

审计信息化

理论及文书

政府审计

报表审计

内部审计

金融审计

造价审计

特殊目的审计

审计案例

资本金验证

审计信息化

使用协议 | 关于我们 | 广告服务 | 企业建站 | 立信邮局 | 友情链接 | 网址大全 | 网群地图

技术支持电话：86 28 86784192　E-mail:info@lxcj.com

中国会计师网２００６版权所有.翻印必究技术支持:立信会计师事务所蜀ICP备05000215号