当前位置: 代码迷 >> vbScript >> vbs IE 窗口 最大化 (不是全屏) 怎么实现
  详细解决方案

vbs IE 窗口 最大化 (不是全屏) 怎么实现

热度:7770   发布时间:2013-02-26 00:00:00.0
vbs IE 窗口 最大化 (不是全屏) 如何实现?
vbs IE 窗口 最大化 (不是全屏) 如何实现?
vbs IE 窗口 最大化 (不是全屏) 如何实现?

------解决方案--------------------------------------------------------
VBScript code
Set IE = CreateObject("InternetExplorer.Application")IE.AddressBar = falseIE.MenuBar = falseIE.StatusBar = trueIE.ToolBar = falseIE.Visible = falseIE.Top = 0IE.Left = 0IE.FullScreen = TrueW = IE.WidthH = IE.HeightIE.FullScreen = FalseIE.Width = WIE.Height = HIE.Visible = trueIE.Navigate "http://www.powerjs.com/"
------解决方案--------------------------------------------------------
探讨
With CreateObject("InternetExplorer.Application")
.Navigate "http://www.baidu.com/"
.Left = 0
.Top = 0
.Width = .document.parentWindow.screen.availWidth
.Height = .document.parentWindow.screen.availHeight
.Visible = True
End With


加上地址为什么不行?


------解决方案--------------------------------------------------------
当然你可以一开始就是 Navigate 目标站点

With CreateObject("InternetExplorer.Application") 
.Navigate "http://www.baidu.com/"
While .Busy Or (.ReadyState <> 4)
Wend
.Left = 0 
.Top = 0 
.Width = .document.parentWindow.screen.availWidth 
.Height = .document.parentWindow.screen.availHeight
.Visible = True 
End With 
  相关解决方案