使用vb脚本实现钉钉重复发送10条消息
生活随笔
收集整理的這篇文章主要介紹了
使用vb脚本实现钉钉重复发送10条消息
小編覺得挺不錯的,現(xiàn)在分享給大家,幫大家做個參考.
使用vb腳本實現(xiàn)釘釘重復發(fā)送10條消息
1.思路
a.需要創(chuàng)建一個變量(執(zhí)行方法)
b.獲取電腦中管理員權限
c.給與用戶緩沖時間,便于到達指定消息界面
d.獲取粘貼權限并開始粘貼操作
e.使用戶能清晰觀看到粘貼后回車發(fā)送的過程
f.獲取回車權限并開始發(fā)送信息
g.重復執(zhí)行d、e 、f代碼10次,程序就結束運行
注意:前提是你得提前剪切一段你想要復制的內(nèi)容,因為這個在程序外執(zhí)行的前提操作
所以就不在思路中提出來了
2.基礎語法
2.1 定義變量
dim 變量名2.2 賦予系統(tǒng)最高權限
set 變量名=createobject("wscript.shell")2.3 給予用戶緩沖時間
wscript.sleep 時間 '時間計量單位為ms,其中1s=1000ms2.4 對按鍵操作并執(zhí)行粘貼、回車操作
變量名.sendkeys "按鍵" 'ctrl---->^ enter特殊----->{enter} '粘貼操作-----> a.sendkeys "^v"&i '回車操作-----> a.sendkeys "{enter}"2.5 已知循環(huán)次數(shù),因而for循環(huán)相關語法是什么?
for 變量類型 變量名=變量值 to 循環(huán)結束判定條件循環(huán)體內(nèi)容 next2.6 vb腳本的程序如何編寫?
a.直接新建一個記事本
b.更改它的文件拓展名為.vbe
c.然后設為它的編碼格式為ANSI,用來防止中文亂碼問題
? 此步驟的具體操作過程見后面常見問題中4.1的內(nèi)容
d.編寫vb腳本的語句
3.每一步的具體實現(xiàn)過程
3.1 步驟a–需要創(chuàng)建一個變量(執(zhí)行方法)
dim a '定義變量a來執(zhí)行后面操作的方法3.2 步驟b–獲取電腦中管理員權限
set a=createobject("wscript.shell") '給變量a賦予當前系統(tǒng)的最高權限注意:createobject、wscript.shell這兩部分是不能隨便定義的
3.3 步驟c–給與用戶緩沖時間,便于到達指定消息界面
wscript.sleep 3000 'vb腳本等待三秒后才執(zhí)行后續(xù)操作,計量單位為ms,其中1s=1000s3.4 步驟d–獲取粘貼權限并開始粘貼操作
a.sendkeys "(^v)"&i 'i是用來計數(shù)的,確保循環(huán)能執(zhí)行那么多次3.5 步驟e–使用戶觀看粘貼后發(fā)送的過程更清晰
wscript.sleep 500 '使程序暫停0.5s,以便用戶能看到粘貼發(fā)送的全過程3.6 步驟f–獲取回車權限并回車粘貼操作
a.sendkeys "{enter}" '其中{}這種方法是獲取鍵盤上一些特殊按鍵的方法3.7 步驟g–重復執(zhí)行代碼10次
for i=1 to 10 循環(huán)體語句 next4.常見問題
4.1 在vb腳本中出現(xiàn)中文亂碼的顯示問題
解決方案如下
a.打開文件擴展名為.vbe的文件
b.修改編碼格式
點擊完另存為就進入了如下圖所示的界面
c.確認替換原文件
4.2 需要更改軟件消息的默認發(fā)送方式?
一般來說,就有以下兩種發(fā)送方式
a.按下enter鍵就發(fā)送消息,
b.按下alt+enter組合鍵才能發(fā)送消息
若為b情況,需要改成a情況,執(zhí)行程序才能得到想要的效果
更改方法如下所示:
第一步,打開設置界面
第二步 往下滑到快捷鍵位置,在發(fā)送信息處進行修改即可
4.源代碼
dim a '使它具有后臺管理員權限 set a=createobject("wscript.shell") wscript.sleep 3000 for i=1 to 10 a.sendkeys "(^v)"&i wscript.sleep 500 a.sendkeys "{enter}" next總結
以上是生活随笔為你收集整理的使用vb脚本实现钉钉重复发送10条消息的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: ThinkPHP5学校宿舍管理系统
- 下一篇: Error:不允许有匹配 [xX][mM