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