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

[问题求助] VBS怎么查.Windows有哪些属性?

写一小程序, 要遍历所有的IE窗, 如果是VBS新生成的会叫"about:blank",遇到就关闭之,以防第二次不能正常运行
其中一段判断后, 怎么结束进程呢? 要不杀掉其他的IE, 只杀这个窗口的.
  1. Set ws=createobject("wscript.shell")
  2. Set Shell=CreateObject("Shell.Application")
  3.      For Each win In Shell.Windows
  4.          If LCase(Right(win.fullName,12))="iexplore.exe" Then
  5.              if win.LocationURL="about:blank" then
  6.                   msgbox obj
  7.                   win.terminate()   '没有这个terminate() 方法,该换其他的什么来代替?
  8.              end if
  9.          End If
  10.      Next
复制代码

回复 3# 9zhmke


    大牛不敢当,vbs我也是用到哪学到那。

TOP

fastslz 发表于 2013-12-31 14:03



    大牛出马了,谢谢指点。  最近想用VBS自制一系统优化的便捷程序,已做了一半多了,fastslz也做过类似的吧? 我把思路发上来请给一些建议吧:

1、先检测环境,避开硬盘太小、内存不足、环境不够之类的问题
2、用HTML来做界面,把参数放上由用户修改,当用户点击开始优化的时候,将更改过的内容过滤后写入源文件内部。
3、开始优化,无非就是移动桌面、收藏夹、改些习惯和去掉一些没用的东西

因为是VBS,所以可以很方便地全开源任意加代码,fastslz在这方面是行家,还请多指教。

TOP

  1. win.Quit
复制代码

TOP

返回列表