vbscript:获取应用程序窗口文本

时间:2013-05-11 22:38:40

标签: vbscript wmi

我正在使用vbs自动化应用程序安装。我有一个代码,它启动安装程序exe文件,并继续发送键盘。但现在我需要获取安装程序窗口的文本。我可以获得安装程序窗口的标题(使用objShell.AppActivate),但没有找到获取该窗口文本的方法。有没有办法在vbs中捕获它?

1 个答案:

答案 0 :(得分:1)

另一种方法是枚举进程命令行而不是windows:

Dim WshShell
Set WshShell = CreateObject("Wscript.Shell")

strComputer = "."
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colProcesses = objWMIService.ExecQuery("SELECT * FROM Win32_Process")

For Each objProcess in colProcesses
  If InStr(objProcess.CommandLine,"notepad")>0 Then
    WshShell.AppActivate objProcess.ProcessId  
 End If
Next