VBS怎么查.Windows有哪些属性？

9zhmke

写一小程序, 要遍历所有的IE窗, 如果是VBS新生成的会叫"about:blank",遇到就关闭之,以防第二次不能正常运行
其中一段判断后, 怎么结束进程呢? 要不杀掉其他的IE, 只杀这个窗口的.

1. Set ws=createobject("wscript.shell")
   
2. 
   
3. Set Shell=CreateObject("Shell.Application")
   
4.      For Each win In Shell.Windows
   
5.          If LCase(Right(win.fullName,12))="iexplore.exe" Then
   
6.              if win.LocationURL="about:blank" then
   
7.                   msgbox obj
   
8.                   win.terminate()   '没有这个terminate() 方法,该换其他的什么来代替?
   
9.              end if
   
10.          End If
    
11.      Next

复制代码

fastslz

1. win.Quit

复制代码

9zhmke

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

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

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

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

fastslz

回复 3# 9zhmke


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