这个asp程序可显示IE.NC客户端的屏幕分辨率
日期：2012-12-10 浏览次数：21121 次
要求使用最新的browscap.ini,不然造成IE5,NC46等新的浏览器无法正确运行.
<HTML>
<head>
<TITLE>detectres.asp</TITLE>
</head>
<%
Set bc = Server.CreateObject("MSWC.BrowserType")
brname=bc.browser
brver=bc.version
%>
<% if brname="IE" and cint(brver)>=4 then %>
<body bgcolor=white onload="doit()">
<script language=vbscript>
<!--
sub doit()
document.write "Your screen width is : " & screen.width & " pixels<br>"
document.write "Your screen height is : " & screen.height & " pixels<br>"
document.write "Your clientWidth is : " & document.body.clientWidth
document.write " pixels<br>"
document.write "Your clientHeight is : " & document.body.clientHeight
document.write " pixels<br>"
' add the rest of the of the page's
' IE4 html code here...using document.write like :
document.write "<br><A HREF='blank.htm'>blank link</A>"
end sub
-->
</script>
'any regular html code you put here
'will disappear after the document.writes
</body>
</html>
<% else %>
<body bgcolor=white>
<% response.write "You're using " & brname & ", version # " & cint(brver) & " with " %>
<% if brname="IE" and cint(brver)=3 then
pixels=Request.ServerVariables("HTTP_UA_PIXELS")
color=Request.ServerVariables("HTTP_UA_COLOR")
response.write "Pixels=" & pixels & ", colors=" & colors
%>
<p>
' add the rest of the page's IE3 html code here...
</body>
</html>
<% end if %>
<% if brname="Netscape" and (cint(brver) > 1) then %>
<body bgcolor=white>
<Script Language="JavaScript">
<!--
if(navigator.javaEnabled())
{
var tools=java.awt.Toolkit.getDefaultToolkit();
var size=tools.getScreenSize();
w=size.width;
h=size.height;
}
document.write("Screen size : " + w + " x " + h + " pixels.");
//-->
</script>
<% end if %>
<p>
' add other Netscape html code here...like :
<br>
<A HREF="blank.htm">blank link</A>
</body>
</html>
<% end if %>
<HTML>
<head>
<TITLE>detectres.asp</TITLE>
</head>
<%
Set bc = Server.CreateObject("MSWC.BrowserType")
brname=bc.browser
brver=bc.version
%>
<% if brname="IE" and cint(brver)>=4 then %>
<body bgcolor=white onload="doit()">
<script language=vbscript>
<!--
sub doit()
document.write "Your screen width is : " & screen.width & " pixels<br>"
document.write "Your screen height is : " & screen.height & " pixels<br>"
document.write "Your clientWidth is : " & document.body.clientWidth
document.write " pixels<br>"
document.write "Your clientHeight is : " & document.body.clientHeight
document.write " pixels<br>"
' add the rest of the of the page's
' IE4 html code here...using document.write like :
document.write "<br><A HREF='blank.htm'>blank link</A>"
end sub
-->
</script>
'any regular html code you put here
'will disappear after the document.writes
</body>
</html>
<% else %>
<body bgcolor=white>
<% response.write "You're using " & brname & ", version # " & cint(brver) & " with " %>
<% if brname="IE" and cint(brver)=3 then
pixels=Request.ServerVariables("HTTP_UA_PIXELS")
color=Request.ServerVariables("HTTP_UA_COLOR")
response.write "Pixels=" & pixels & ", colors=" & colors
%>
<p>
' add the rest of the page's IE3 html code here...
</body>
</html>
<% end if %>
<% if brname="Netscape" and (cint(brver) > 1) then %>
<body bgcolor=white>
<Script Language="JavaScript">
<!--
if(navigator.javaEnabled())
{
var tools=java.awt.Toolkit.getDefaultToolkit();
var size=tools.getScreenSize();
w=size.width;
h=size.height;
}
document.write("Screen size : " + w + " x " + h + " pixels.");
//-->
</script>
<% end if %>
<p>
' add other Netscape html code here...like :
<br>
<A HREF="blank.htm">blank link</A>
</body>
</html>
<% end if %>
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
