[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[系统相关] [已解决]xp sp3系统,IE8浏览器。bat或reg或vbs文件,如何禁用或隐藏IE地址栏?

本帖最后由 ygqiang 于 2015-4-7 10:02 编辑

[已解决]xp sp3系统,IE8浏览器。bat或reg或vbs文件,如何禁用或隐藏IE地址栏?
或者能否实现:xp系统下,打开IE8浏览器,禁止在地址栏输入网址上网??
而且要求:即使把鼠标放在浏览器顶部,仍然不会显示地址/仍然不可以输入网址。。

如果是xp sp3系统+IE6浏览器,是可以禁用或隐藏ie地址栏的。。。
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

本帖最后由 ygqiang 于 2015-3-27 11:06 编辑

建立IE快捷方式。。。
"C:\Program Files\Internet Explorer\IEXPLORE.EXE" -k


这个方法,如果把鼠标放在浏览器顶部,仍然会显示地址/仍然可以输入网址。。
1

评分人数

    • CrLf: 原来还有这开关技术 + 1

TOP

回复 2# ygqiang
呵呵,F11

TOP

回复  ygqiang
呵呵,F11
pcl_test 发表于 2015-3-26 00:32



f11可不行。。。地址栏还是会显示出来。还是能输入网址上网。。。。

TOP

回复 4# ygqiang
呵呵,我的意思是你这样以快捷方式来全屏打开IE,还不如直接按F11,因为快捷方式可以修改,还可以绕过以快捷方式来启动IE,比较好的可以用组策略或修改注册表来让IE强制使用全屏模式,如果为的只是让用户浏览特定网页,也可以在防火墙设置只允许浏览指定网址,不过系统自带防火墙是比较弱的,方法还是很多的,这就要看你用意何为

TOP

回复  ygqiang
呵呵,我的意思是你这样以快捷方式来全屏打开IE,还不如直接按F11,因为快捷方式可以修改, ...
pcl_test 发表于 2015-3-26 12:01



    2楼的方法,用鼠标放在浏览器顶部,仍然会显示地址/仍然可以输入网址。。
暂时还是不能解决。。

xp sp3+ie8浏览器  测试的。

TOP

回复  ygqiang
呵呵,我的意思是你这样以快捷方式来全屏打开IE,还不如直接按F11,因为快捷方式可以修改, ...
pcl_test 发表于 2015-3-26 12:01



    xp sp3系统,IE8浏览器。

重新测试了下。。初步感觉好用。。。

1、桌面建立IE8快捷方式的文件tet.lnk。快捷路径为"C:\Program Files\Internet Explorer\IEXPLORE.EXE" -k
2、开机自动启动某个bat文件,内容是:"%userprofile%\桌面\tet.lnk"

TOP

用VBS吧:
set ie=wscript.createobject("internetexplorer.application","event_") '创建ie对象'
ie.fullscreen=0:ie.menubar=0:ie.addressbar=0:ie.toolbar=0:ie.statusbar=0:ie.resizable=0
' 不使用全屏   '取消菜单栏   '取消地址栏     '取消工具栏  '取消状态栏 '不允许用户改变窗口大小
    tmp3=ie_zoom/100000*790
    set tmp1=createobject("htmlfile"):set tmp2=tmp1.parentwindow.screen:tmp1=tmp2.width:set tmp2=nothing
    'if tmp1<790 then msgbox "屏幕太小,显示不完,驱动显卡后再运行吧":ie.quit:wscript.quit
    if tmp3>tmp1 then '超出屏幕宽度不便查看,临时改回去不缩放
        WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom\ZoomFactor",100000,"REG_DWORD"
        tmp3=790
    end if
ie.width=tmp3:ie.height=630:ie.top=2:ie.visible=0:ie.navigate "about:blank"
'宽          '高                                    '打开空白页面
ie.left=int((tmp1-ie.width)/2) '左边水平居中

ie.visible=1
'窗口可见'
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom\ZoomFactor",ie_zoom,"REG_DWORD" '恢复缩放比例

TOP

用VBS吧:
set ie=wscript.createobject("internetexplorer.application","event_") '创建ie对象'
ie.fu ...
9zhmke 发表于 2015-4-14 13:57



   
多谢。。。运行过程中,遇到一点小问题。。。。
  1. set ie=wscript.createobject("internetexplorer.application","event_") '创建ie对象'
  2. ie.fullscreen=0:ie.menubar=0:ie.addressbar=0:ie.toolbar=0:ie.statusbar=0:ie.resizable=0
  3. ' 不使用全屏   '取消菜单栏   '取消地址栏     '取消工具栏  '取消状态栏 '不允许用户改变窗口大小
  4.     tmp3=ie_zoom/100000*790
  5.     set tmp1=createobject("htmlfile"):set tmp2=tmp1.parentwindow.screen:tmp1=tmp2.width:set tmp2=nothing
  6.     'if tmp1<790 then msgbox "屏幕太小,显示不完,驱动显卡后再运行吧":ie.quit:wscript.quit
  7.     if tmp3>tmp1 then '超出屏幕宽度不便查看,临时改回去不缩放
  8.         WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom\ZoomFactor",100000,"REG_DWORD"
  9.         tmp3=790
  10.     end if
  11. ie.width=tmp3:ie.height=630:ie.top=2:ie.visible=0:ie.navigate "http://www.baidu.com"
  12. '宽          '高                                    '打开页面
  13. ie.left=int((tmp1-ie.width)/2) '左边水平居中
  14. ie.visible=1
  15. '窗口可见'
  16. WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom\ZoomFactor",ie_zoom,"REG_DWORD" '恢复缩放比例
复制代码

TOP

用VBS吧:
set ie=wscript.createobject("internetexplorer.application","event_") '创建ie对象'
ie.fu ...
9zhmke 发表于 2015-4-14 13:57



    而且你的这个vbs代码。。如果在打开的页面,按F11键,仍然会显示地址栏。。。

TOP

回复 10# ygqiang


    做一个循环检测,有地址栏就关闭地址栏,或者不检测,每秒关3次地址栏左右,要不就直接弄个DOS窗给他吧。

TOP

本帖最后由 ygqiang 于 2015-4-21 21:24 编辑
回复  ygqiang


    做一个循环检测,有地址栏就关闭地址栏,或者不检测,每秒关3次地址栏左右,要不就 ...
9zhmke 发表于 2015-4-21 15:20



循环3秒检测,有IE地址栏就关闭/隐藏/禁用地址栏。
从而禁止输入网址。(同时要保留ie浏览器右上角的关闭按钮)


这个功能,可以通过vbs代码实现吗?谢谢了。。。
xp系统+ie8浏览器环境。。。。。

TOP

回复  ygqiang


    做一个循环检测,有地址栏就关闭地址栏,或者不检测,每秒关3次地址栏左右,要不就 ...
9zhmke 发表于 2015-4-21 15:20
  1. Set ie = CreateObject("internetexplorer.application")  
  2. ie.visible=1 '设置是否可见
  3. ie.Navigate "www.baidu.com" '设置IE对象默认指向的页面
  4. ie.menubar=0 '不显示IE对象菜单栏
  5. ie.AddressBar=0 '不显示IE对象地址栏
  6. ie.ToolBar=0 '不显示IE对象工具栏
  7. ie.StatusBar=0 '不显示IE对象状态栏
复制代码
这个vbs代码。。当前打开的百度页面,如果按f11键,还是会显示地址栏。。
而且如果在百度页面,重新点开一个新页面,这个新页面,还是显示地址栏。。。

这个时候,就需要:
循环3秒检测,有IE地址栏,就关闭/隐藏/禁用地址栏。。。
禁止输入网址。(同时要保留ie浏览器右上角的关闭按钮)

TOP

在你下面的其他代码里面,循环加入:
ie.menubar=0 '不显示IE对象菜单栏
ie.AddressBar=0 '不显示IE对象地址栏
ie.ToolBar=0 '不显示IE对象工具栏
ie.StatusBar=0 '不显示IE对象状态栏

或者把这几句做成个函数、子程序之类

TOP

在你下面的其他代码里面,循环加入:
ie.menubar=0 '不显示IE对象菜单栏
ie.AddressBar=0 '不显示IE对象地 ...
9zhmke 发表于 2015-4-22 09:05


多谢。。重新发了个帖子。。。貌似解决了。。。回头完整体验下。。。
    http://www.bathome.net/thread-35298-1-1.html

TOP

返回列表