asp实现防止站外提交内容的两个办法

asp实现防止站外提交内容的两个办法：

方式一：

代码如下:<% 

Function IsSelfRefer() 

  Dim formUrl,relUrl 

  formUrl=LCase(Trim(request.ServerVariables("HTTP_REFERER")))  

  If formUrl="" Then 

    IsSelfRefer = False 

  Else 

    relUrl="http://" & Trim(Request.ServerVariables("SERVER_NAME")) 

    If (formUrl<>relUrl) Then 

      IsSelfRefer = False 

    Else 

      IsSelfRefer = True 

    End If 

  End If 

End Function 

%> 

方式二：

代码如下:<% 

Function IsSelfRefer() 

  Dim sHttp_Referer, sServer_Name 

  sHttp_Referer = CStr(Request.ServerVariables("HTTP_REFERER")) 

  sServer_Name = CStr(Request.ServerVariables("SERVER_NAME")) 

  If Mid(sHttp_Referer, 8, Len(sServer_Name)) = sServer_Name Then 

    IsSelfRefer = True 

  Else 

    IsSelfRefer = False 

  End If 

End Function 

%>

（编辑：银川站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!