Copy Code code as follows:
<%
' The main screen download tool
Dimxurl,xtool
' Get browser agent
Xurl=lcase (Request.ServerVariables ("Http_user_agent"))
' Definition prohibited agent, the following 5 contains the latest version of the Express, Whirlwind and thunder part of the version, you can add!
Xtool= "mozilla/4.0 (compatible;msie5.00;windows98)" &_
"Mozilla/4.0 (compatible;msie6.0;windows+nt5.0)" &_
"mozilla/4.0 (compatible;msie6.0;windowsnt5.1;)" &_
"Mozilla/4.0 (compatible;msie6.0;windowsnt5.0;. netclr1.1.4322) "&_
"Mozilla/4.0 (compatible;msie6.0;windowsnt5.0;. netclr3.5.20706) "&_
"Mozilla/4.0 (COMPATIBLE;MSIE6.0;WINDOWSNT5.1;SV1;. netclr1.1.4322;. netclr2.0.50727) "
' Judge whether the agent is legitimate
Ifinstr (Xtool,xurl) >0then
' Download tool directly report 404 error
Response.status= "404NotFound"
Response.End
EndIf
' The rest of the code is below
Response.Write "Normal browsing content, you can download the page with the Download tool test to see if you can download it?" "
%>
