vbs IE 窗口 最大化 （不是全屏） 怎么实现

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