在线等!!十万火急
下面是asp中主调函数中的一个函数用来检测来源的合法性,如何使用asp.net语言实现???????????
Sub v_url()
Dim clientbs,clientip,serverip
clientbs=Request.ServerVariables("HTTP_USER_AGENT")
clientip=Cstr(Request.ServerVariables("HTTP_REFERER"))
serverip=Cstr(Request.ServerVariables("SERVER_NAME"))
If InStr(clientbs,"Mozilla")=0 Then
response.End
End If
if mid(clientip,8,len(serverip))<>serverip then
'call errstr(3)
response.end
end if
End Sub