日期:2014-05-20  浏览次数:20702 次

跪求一段打开网页后自动全屏代码!!!!拿分的来!!!只要好使就给分
请各位大哥大姐告诉小弟一段打开网页后自动全屏的代码!!!

支持IE/MYIE的.....


小弟再次谢过了!!!!!!

------解决方案--------------------
< script >
< !--
function omiga_window(){
window.open( "12.htm ", " ", "fullscreen=1,menubar=0,toolbar=0,directories=0,location=0,
status=0,scrollbars=0 ")
}
//-- >
< /script >

  代码功能是由一个网页调出另一个浏览器窗口,加上设置语句,设置新窗口的大小为全屏,然后新的网页内容就显示在此窗口里,借此实现了全屏。

  不要忘记在网页文件的 < body > 标签里加上加载网页里调用函数的代码。代码设置如下:

< body onload= "omiga_window() " scroll= "no " >
------解决方案--------------------
居然还要父窗口??

给你个完美的

<script>
function max(){
self.moveTo(-5,-118)
self.resizeTo(window.screen.Width+30,window.screen.Height+143)}
</script>
<html>
<head>
<title> </title>
</head>
<body onLoad= 'max() '>


</body>
</html>
------解决方案--------------------
a href= 'http://www.163.com/ ' target= '_blank ' 'fullscreen=yes '
------解决方案--------------------
下面是VBS生成IE对象的一段代码,我想应该能看懂吧。


with IE.document
.Write " <html> " & vbcrlf
.Write " <head> " & vbcrlf
.Write " <title> ABCS </title> " & vbcrlf

.Write " <SCRIPT LANGUAGE= 'VBScript '> " & vbcrlf
.Write "Sub ReSize() " & vbcrlf
.Write " moveTo 0,0 " & vbcrlf
.Write " resizeTo window.screen.width,window.screen.height " & vbcrlf
.Write "End Sub " & vbcrlf
.Write " </SCRIPT> " & vbcrlf

.Write " </head> " & vbcrlf
.Write " <body onLoad= 'ReSize() '> " & vbcrlf
.Write "ABCD " & vbcrlf
.write " <form name=login id=login action= "+portal_url+ " method=POST> " & vbcrlf
.write " <input type=hidden name=userid value= "+user+ "> " & vbcrlf
.write " <input type=hidden name=password value= "+password+ "> <br> " & vbcrlf
.write " </form> " & vbcrlf
.write " </body> " & vbcrlf
.write " </html> "
end with