最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

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了。

相關文章

最新評論

依兰县| 长治市| 杨浦区| 天峻县| 张家界市| 吴忠市| 太白县| 双桥区| 惠州市| 永城市| 临江市| 青神县| 卢龙县| 东台市| 星子县| 柘荣县| 凤凰县| 武山县| 千阳县| 松桃| 大姚县| 文安县| 武川县| 武夷山市| 宜州市| 房产| 秦皇岛市| 河津市| 鄯善县| 盐源县| 涡阳县| 浦东新区| 敖汉旗| 台南市| 平顶山市| 建宁县| 华亭县| 新沂市| 彭山县| 棋牌| 龙游县|