婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > 用VBS實現一個小鍵盤動作CTRL+V粘貼操作與思路分析

用VBS實現一個小鍵盤動作CTRL+V粘貼操作與思路分析

熱門標簽:辦理膠州400電話財稅 外呼營銷下單系統 陜西高頻外呼回撥系統哪家好 新密防封卡外呼系統違法嗎 海外美發店地圖標注 打電話的外呼系統貴不貴 百度地圖標注怎么卸載 前鋒辦理400電話申請 加盟電銷機器人好的品牌
提示:
1,是每次有跳出窗口時的1.8秒后都要有此動作,并且是只發送了一次該動作,發送完后等待下次的窗口跳出再循環.
2,每次循環中都只是發送了一次CTRL + V后就停,而不是一直發送

看到問題,立即著手編寫測試代碼,這時候問題出現:

彈出 inputbox 窗口后,VBS處于暫停狀態,等待用戶輸入,點擊確定or取消,

所以在它后面的 Wshshell.Sendkeys "^v" 將無法執行,

如果前面彈出 inputbox 窗口后點擊確定 or 取消的話,那么再執行 ctrl+v 就不能把剪切板中的內容粘貼到inputbox 窗口當中,如果把Wshshell.Sendkeys "^v" 放到 inputbox 之前的話,也不行,因為 inputbox 還沒彈出來,ctrl+v也無法實現粘貼內容到 inputbox,

轉換一下思路,我們把inputbox 和 sendkey寫成兩個文件,這樣它們互相就不會產生沖突,最終解決代碼如下:
復制代碼 代碼如下:

Set WshShell=WScript.CreateObject("WScript.Shell")
WScript.Sleep 2000
Set fso=wscript.createobject("scripting.filesystemobject")
set f=fso.opentextfile("sendkey.vbs",2,true)
f.Write("Set WshShell=WScript.CreateObject(" Chr(34) "WScript.Shell" chr(34) ")")
f.WriteBlankLines(1)
f.Write("WScript.Sleep 1800")
f.WriteBlankLines(1)
f.Write("Wshshell.appactivate " chr(34) "提示" chr(34))
f.WriteBlankLines(1)
f.Write("Wshshell.Sendkeys " chr(34) "^v" chr(34))
f.WriteBlankLines(1)
f.Close
Wshshell.Run ("sendkey.vbs")
InputBox "請輸入","提示",""
fso.DeleteFile ("sendkey.vbs")

代碼先寫 sendkey.vbs 并執行,執行過程中會等待1.8秒發送 ctrl+v ,接著彈出 inputbox,這時候inputbox彈出來了,sendkey.vbs在等待1.8秒后也執行ctrl+v把內容粘貼到了inputbox 輸入框中.問題解決

總結:在遇到一些問題的時候,不能鉆牛角尖,換個思路,其實解決起來并不難!

標簽:咸陽 阜陽 伊春 河南 梅州 牡丹江 四平 武威

巨人網絡通訊聲明:本文標題《用VBS實現一個小鍵盤動作CTRL+V粘貼操作與思路分析》,本文關鍵詞  用,VBS,實現,一個,小鍵盤,;如發現本文內容存在版權問題,煩請提供相關信息告之我們,我們將及時溝通與處理。本站內容系統采集于網絡,涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《用VBS實現一個小鍵盤動作CTRL+V粘貼操作與思路分析》相關的同類信息!
  • 本頁收集關于用VBS實現一個小鍵盤動作CTRL+V粘貼操作與思路分析的相關信息資訊供網民參考!
  • 推薦文章
    主站蜘蛛池模板: 岚皋县| 卓资县| 洪湖市| 商洛市| 花莲县| 苏尼特右旗| 汤阴县| 武城县| 库尔勒市| 将乐县| 慈溪市| 抚远县| 天镇县| 石河子市| 平安县| 金门县| 东辽县| 宜宾县| 忻州市| 祁阳县| 晋宁县| 博湖县| 延吉市| 榆中县| 民勤县| 高尔夫| 阜新| 伊宁市| 华亭县| 涟源市| 瓦房店市| 霞浦县| 江达县| 阿城市| 城口县| 灵武市| 岳普湖县| 乌鲁木齐县| 耒阳市| 嵩明县| 远安县|