如何使用VBS获取正在运行的应用程序列表而不使用单词调用?

时间:2012-11-26 20:06:42

标签: vbscript ms-word

我们正在使用下面的脚本来杀死任何可能干扰自助服务终端操作的打开窗口。

它使用word返回正在运行的应用程序列表而不是进程。

问题是我在Word上调用的脚本和单词不断崩溃。似乎应该有一种方法可以做到这一点,而无需调用单词。

这是我正在使用的代码

sub closeWindows()
Set Word = CreateObject("Word.Application")
Set Tasks = Word.Tasks
For Each Task in Tasks
If Task.Visible AND Task.Name = "Sign Up for Facebook" Then Task.Close()
If Task.Visible AND Task.Name = "Log In | Facebook: Facebook" Then Task.Close()
Next
Word.Quit
end sub
Do
closeWindows
Wscript.Sleep 1000
Loop

1 个答案:

答案 0 :(得分:0)

对于您建议的解决方案,有两种选择:

  1. 锁定/加固自助服务终端以防止使用不需要的应用程序。
  2. 如果您使用这样的“看门狗”脚本,请使用已知良好的应用程序填充脚本,而不是您不想要的应用程序。
  3. 这两个选项都比保留黑名单更具可持续性。