帮忙看下这段代码什么意思？

[ke888]

<%
dim GuGetFlag
dim GuErrorSQLG,GuErrorSQLF
dim RequestKey
dim iGuG,iGuF

GuErrorSQLG=GuErrorSQLGDefault
GuErrorSQLF=GuErrorSQLFDefault
GuErrorSQLG=split(GuErrorSQLG,"|")
GuErrorSQLF=split(GuErrorSQLF,"|")

if Request.ServerVariables("REQUEST_METHOD")="GET" then
GuGetFlag=True
else
GuGetFlag=False
end if

if GuGetFlag then
For Each RequestKey In Request.QueryString
For iGuG=0 To Ubound(GuErrorSQLG)
if Instr(LCase(Request.QueryString(RequestKey)),GuErrorSQLG(iGuG))<>0 then
Response.redirect WebSiteURL
Response.end
end if
Next
Next
else
For Each RequestKey In Request.Form
For iGuF=0 To Ubound(GuErrorSQLF)
if Instr(LCase(Request.Form(RequestKey)),GuErrorSQLF(iGuF))<>0 then
Response.redirect WebSiteURL
Response.end
end if
Next
Next
end if
%>

[Anlige]

好象是sql防注入检测~

[yanniu008]

[Quote=引用 1 楼 Anlige 的回复:]
好象是sql防注入检测~
[/Quote]