打开一个去掉菜单栏，固定大小的IE浏览器的方法

最新推荐文章于 2023-08-14 08:00:00 发布

最新推荐文章于 2023-08-14 08:00:00 发布 · 268 阅读

文章标签：

#IE #浏览器

JAVASCRIPT 专栏收录该内容

10 篇文章

订阅专栏

本文介绍如何使用VBS脚本控制IE浏览器自动化操作，包括设置浏览器窗口大小及位置、隐藏工具栏等，并提供了完整的示例代码。

我们可以写如下代码：

Option Explicit
Dim objIE
Const READYSTATE_COMPLETE   = 4     'As Long
Const OLECMDID_ZOOM         = 19    'As Long
Const OLECMDEXECOPT_DONTPROMPTUSER = 2  'As Long
Const URL   = "http://localhost:8080/imart/default.portal"    'As String
Set objIE = CreateObject("InternetExplorer.Application") 
 
'创建IE对象
With objIE
 
    ''  跳转到指定的url
    .Navigate2 URL
    Do While .ReadyState <> READYSTATE_COMPLETE : Loop
    .Left = fix((objIE.document.parentwindow.screen.availwidth-objIE.width)/2) '水平居中'
    .Top = fix((objIE.document.parentwindow.screen.availheight-objIE.height)/2) '垂直居中' 
    .Width = 1024
    .Height = 768  
    .ToolBar = False      'ToolBar On/Off
    .MenuBar = False     'MenuBar On/Off
    .ResizAble = False
    .AddressBar = False
    .Statusbar=True
    ''是否在IE中显示
    .Visible = False
    .ExecWB OLECMDID_ZOOM,OLECMDEXECOPT_DONTPROMPTUSER, CLng(2), Null
End With

然后保存上面代码为以vbs为后缀名的文件，点击该文件就可以打开指定的网址。