VBScript 根據IE窗口的標題輸出ESC

這篇文章主要介紹了VBScript 根據IE窗口的標題輸出ESC,代替人工按esc操作的實現代碼，需要的朋友可以參考下

已經很長時間了。一個打印機的driver老是會跳出一個窗口，告訴你出什麼錯。因爲我的程序是自動出來，屬於長期沒人監管的機器，所以，當這個信息跳出來的時候，就會使這個程序停頓。這個時候要認爲按一下esc鍵，然後就可以繼續下去。未來解決這個問題，我使用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 '發送一個ESC鍵 
  End If 
End Function 

把以上的代碼，保存爲VBS文件，然後把這個VBS設置爲Windows的Scheduler，就可以實現自動按ESC了。