asp实现防止站外提交内容的两个方法
摘要：方式一：复制代码代码如下:方式二：复制代码代码如下:
方式一：
复制代码 代码如下:<%
FunctionIsSelfRefer()
DimformUrl,relUrl
formUrl=LCase(Trim(request.ServerVariables("HTTP_REFERER")))
IfformUrl=""Then
IsSelfRefer=False
Else
relUrl="http://"&Trim(Request.ServerVariables("SERVER_NAME"))
If(formUrl<>relUrl)Then
IsSelfRefer=False
Else
IsSelfRefer=True
EndIf
EndIf
EndFunction
%>
方式二：
复制代码 代码如下:<%
FunctionIsSelfRefer()
DimsHttp_Referer,sServer_Name
sHttp_Referer=CStr(Request.ServerVariables("HTTP_REFERER"))
sServer_Name=CStr(Request.ServerVariables("SERVER_NAME"))
IfMid(sHttp_Referer,8,Len(sServer_Name))=sServer_NameThen
IsSelfRefer=True
Else
IsSelfRefer=False
EndIf
EndFunction
%>
【asp实现防止站外提交内容的两个方法】相关文章：
下一篇：
ASP中生成文本文件的两种方式