必须要有一个com组件支持,你要要可以给你,安装一下就好了!代码如下:
VBS的set tool=CreateObject("screen.tool")
if tool.ChangeDisplay(800,600,,0) then
MsgBox "111"
tool.ResetDisplay
else
MsgBox "222"
end if
VBS的set tool=CreateObject("screen.tool")
if tool.ChangeDisplay(800,600,,0) then
MsgBox "111"
tool.ResetDisplay
else
MsgBox "222"
end if
<script language="javascript1.2">
function window.onload(){
var srcwidth=screen.width;
var srcheight=screen.height;
if (srcwidth==1024) {splittop.rows="102,*";
splitleft.cols="340,*";
splitmain.rows="26,*";
splitbm.rows="430,*";
}
else {
splittop.rows="102,*";
splitleft.cols="225,*";
splitmain.rows="26,*";
splitbm.rows="260,*";
document.all.copyrightframe.src="frameend01.asp";
}
}
</script>
<html>
<head>
</head>
<frameset framespacing="0" border="false" frameborder="0" rows="78,297,64">
<frame name="top" scrolling="no" noresize target="contents" src="top.htm">
<frameset cols="235,565">
<frame name="contents" target="main" src="left.htm" scrolling="no" noresize>
<frame name="main" src="dongtai.htm" scrolling="auto" noresize>
</frameset>
<frame name="bottom" scrolling="no" noresize target="contents" src="under.htm">
<noframes>
<body>
<p>This page uses frames, but your browser doesn't support them.</p>
</body>
</noframes>
</frameset>
</html>