VBScript 根據IE窗口的標題輸出ESC
更新時間:2018年04月30日 14:56:26 作者:Dogfish
這篇文章主要介紹了VBScript 根據IE窗口的標題輸出ESC,代替人工按esc操作的實現代碼,需要的朋友可以參考下
已經很長時間了。一個打印機的driver老是會跳出一個窗口,告訴你出什么錯。因為我的程序是自動出來,屬于長期沒人監(jiān)管的機器,所以,當這個信息跳出來的時候,就會使這個程序停頓。這個時候要認為按一下esc鍵,然后就可以繼續(xù)下去。未來解決這個問題,我使用VBScript寫了一個幾行的文件來代替我按這個esc。
核心代碼
‘測試函數
PressESC "Windows Internet Explorer", "{ESCAPE}"
'我們要處理的函數
Function PressESC(WindowTitle, KeyCommand)
Set objShell = CreateObject("WScript.Shell") ‘定義一個WHS對象
If objShell.AppActivate(WindowTitle) Then '檢測是否有我們要檢測的Windows
objShell.AppActivate WindowTitle ‘把窗口對焦
objShell.SendKeys KeyCommand '發(fā)送一個ESC鍵
End If
End Function
把以上的代碼,保存為VBS文件,然后把這個VBS設置為Windows的Scheduler,就可以實現自動按ESC了。
相關文章
使用xcacls.vbs(cacls.exe)修改NTFS權限說明(中文版)
本分步指南介紹如何使用擴展的更改訪問控制列表工具 (cacls.exe,對應的腳本文件是xcacls.vbs) 修改和查看文件或文件夾的 NTFS 權限。2010-08-08
VBS實現GB2312,UTF-8,Unicode,BIG5編碼轉換工具
VBS寫的GB2312,UTF-8,Unicode,BIG5編碼轉換工具,轉換工具下載:GB2Ue.vbs (3.34 kb)2010-06-06

