根据来访者浏览器类型显示不同网页ASP版

这个很简单,就是利用asp内建的ServerVariables集合判断浏览器类型。事实上,不只浏览器类型可以判断,甚至版本也可以,其中ie的版本就比较多,如IE5.01、IE7.0 ...

vb 代码
 
  1. <%   
  2. Dim BrowserString   
  3. BrowserString = Request.ServerVariables("HTTP_USER_AGENT")   
  4. BrowserString = Lcase(BrowserString)   
  5.    
  6. Dim broFirefox,broMSIE,broOpera,broWap   
  7. broFirefox = "firefox"   
  8. broMSIE = "msie"   
  9. broOpera = "opera"   
  10. broWap = "wap"   
  11.    
  12. '如果是Firefox   
  13. if Instr(BrowserString, broFirefox) <> 0 then   
  14. Response.Redirect(broFirefox & ".asp")   
  15. end if   
  16. '如果是MSIE   
  17. if Instr(BrowserString, broMSIE) <> 0 then   
  18. Response.Redirect(broMSIE & ".asp")   
  19. end if   
  20. '如果是Opera   
  21. if Instr(BrowserString, broOpera) <> 0 then   
  22. Response.Redirect(broOpera & ".asp")   
  23. end if   
  24. '如果是Wap 
  25.  
  26. if Instr(BrowserString, broWap) <> 0 then
  27. Response.Redirect(broWap & ".asp")
  28. end if
  29. %>