如何用ASP獲取客戶(hù)端屏幕分辨率，我們可以通過(guò)以下方式實(shí)現(xiàn)：
在訪(fǎng)問(wèn)網(wǎng)頁(yè)的時(shí)候使用js獲得瀏覽器的分辨率然后轉(zhuǎn)向本網(wǎng)頁(yè)并把分辨率傳出去，然后接收分辨率并把它存儲(chǔ)在session中，最后再轉(zhuǎn)到之前的網(wǎng)頁(yè)

代碼：
<%
'若已經(jīng)自動(dòng)轉(zhuǎn)向執(zhí)行此條件語(yǔ)句
if Bint(trim(request("sw"))) > 0 then
   session("MyScreenWidth")=Bint(trim(request("sw")))
   session("MyScreenHeight") = Bint(trim(request("sh")))
   response.Redirect(session("FrontUrl"))
end if
%>
<%
'第一次訪(fǎng)問(wèn)網(wǎng)頁(yè)
if Bint(session("MyScreenWidth"))=0 then
if Bint(trim(request("sw"))) = 0 then
   session("FrontUrl") = GetUrl()
end if
response.Write("<scr"&"ipt>")
if Instr(GetUrl(),"?") > 0 then
   response.Write("window.location='"&GetUrl()&"&sw='+screen.width+'&sh='+screen.height;")
else
   response.Write("window.location='"&GetUrl()&"?sw='+screen.width+'&sh='+screen.height;")
end if
response.Write("</scr"&"ipt>")
end if
%>

<%="你的分辨率是："&session("MyScreenWidth")&"*"&session("MyScreenHeight")%>

<%
'下面是幾個(gè)函數(shù)
Function Bint(str)
If IsNumeric(str) then
   Bint = Clng(str)
Elseif IsEmpty(str) then
   Bint = 0
Elseif IsNull(str) then
   Bint = 0
Else
   Bint = 0
End if
End function
Function GetUrl()
sUrl = Request.ServerVariables("URL")
sQueryString = ""
For Each x In Request.QueryString
sQueryString = sQueryString & "&" & x & "=" & Server.URLEncode(Request(x))
Next
if len(sQueryString)>0 then
sQueryString = right(sQueryString,len(sQueryString)-1)
else
sQueryString = ""
end if
if len(sQueryString)>0 then
GetUrl = sUrl & "?" & sQueryString
else
GetUrl = sUrl
end if
End function
%>