Response.Redirect(broWap & ".asp") end if if Instr(BrowserString, broWap) <> 0 then 'asp如果是Wap(没有用过所以还要看HTTP_USER_AGENT表示的结果) end if Response.Redirect(broOpera & ".asp") if Instr(BrowserString, broOpera) <> 0 then '浏览器如果是Opera end if Response.Redirect(broMSIE & ".asp") if Instr(BrowserString, broMSIE) <> 0 then '判断浏览器类型ServerVariables("如果是MSIE end if Response.Redirect(broFirefox & ".asp") if Instr(BrowserString, broFirefox) <> 0 then broWap = "wap"类型 broOpera = "opera" broMSIE = "msie" broFirefox = "对于asp;firefox" Dim broFirefox,broMSIE,broOpera,broWap BrowserString = Lcase(BrowserS看着判断浏览器类型ServerVariables("tring) BrowserString = Request.ServerVariables("HTTP_USER_AGENT") Dim BrowsequotrString 事实上判断 servervariables (责任编辑:admin) |