Red de conocimiento informático - Material del sitio web - Cómo implementar el script VBS para detectar y operar opciones en ventanas de diálogo específicas

Cómo implementar el script VBS para detectar y operar opciones en ventanas de diálogo específicas

Si usa QTP (el lenguaje de programación también es VBS), existe un método WinExist() para determinar directamente si la ventana existe. Sin embargo, no existe tal método en VBS. Solo puede juzgar si la activación de la aplicación se realizó correctamente a través del valor booleano devuelto por el método AppActivate. Si el cuadro de diálogo existe, definitivamente devolverá Verdadero, lo que indica que la activación se realizó correctamente. Basado en esta idea:

En caso de error, reanudar siguiente

count = 0

set WshShell = WScript.CreateObject("WScript.Shell")

Hacer mientras cuenta lt; 15

ret = WshShell.AppActivate("Test")

Si ret Entonces

WshShell.SendKeys "{TAB} " 'Cambie al botón "cancelar" mediante la tecla TAB

WshShell.SendKeys "{ENTER}" 'Haga clic en "cancelar"

Salir Hacer

De lo contrario

WScript.Sleep 1000

recuento = recuento 1

Finalizar si

Bucle