溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點(diǎn)擊 登錄注冊 即表示同意《億速云用戶服務(wù)條款》

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

發(fā)布時(shí)間:2022-01-17 08:57:55 來源:億速云 閱讀:233 作者:iii 欄目:開發(fā)技術(shù)

本篇內(nèi)容主要講解“怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能”,感興趣的朋友不妨來看看。本文介紹的方法操作簡單快捷,實(shí)用性強(qiáng)。下面就讓小編來帶大家學(xué)習(xí)“怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能”吧!

目標(biāo)

在某個(gè)時(shí)間喚醒電腦屏幕后,自動(dòng)發(fā)送qq信息,并附帶表情包,發(fā)送完畢后關(guān)閉電腦屏幕。整個(gè)過程不用過多的程序運(yùn)行,我們借助vbs腳本和windows定時(shí)任務(wù)去實(shí)現(xiàn)這一功能。

準(zhǔn)備

vbs代碼
qq信息txt文本
qq文件表情包文件
發(fā)送聯(lián)系人的快捷方式
3個(gè)windows任務(wù)

具體操作

信息和快捷方式準(zhǔn)備

qq信息txt文本和表情包文件

桌面新建文本輸入要發(fā)送的信息,保存為abc.txt,

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

桌面新建文件,把要放的表情包放進(jìn)里面,保存為abd

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

qq快捷方式

把聯(lián)系人拖到桌面生成快捷方式,記住,qq保持登錄狀態(tài)

vbs腳本

程序具體改動(dòng)見代碼注釋

Set objShell = CreateObject("Wscript.Shell") 
WScript.Sleep 3000
objShell.SendKeys "{ESC}" 
WScript.Sleep 7000 '等待時(shí)間設(shè)置7秒是為了給足時(shí)間電腦啟動(dòng)
objShell.SendKeys "{ESC}" 
WScript.Sleep 3000
Set Shell=Wscript.Createobject("Wscript.shell")
Shell.run "C:\Users\captainzou\Desktop\abc.txt" 'qq信息文件保存地址
Wscript.Sleep 1000 '等待1秒
set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys ("^a")
Wscript.Sleep 2000 '等待1秒
WshShell.SendKeys ("^c")
Wscript.Sleep 2000 '等待1秒
WshShell.SendKeys "%{F4}"
Wscript.Sleep 1000 '等待1秒
Shell.run "C:\Users\captainzou\Desktop\tanhuang.lnk" '聯(lián)系人快捷方式保存地址
Wscript.Sleep 5000 '等待5秒
WshShell.SendKeys ("^v")
Wscript.Sleep 1000 '等待1秒
WshShell.SendKeys "%{F4}"
Wscript.Sleep 2000 '等待2秒
Shell.run "C:\Users\captainzou\Desktop\abd" '表情包保存地址
Wscript.Sleep 2000 '等待2秒
WshShell.SendKeys ("^a")
Wscript.Sleep 1000 '等待1秒
WshShell.SendKeys ("^c")
Wscript.Sleep 1000 '等待1秒
WshShell.SendKeys "%{F4}"
Wscript.Sleep 1000 '等待1秒
Shell.run "C:\Users\captainzou\Desktop\tanhuang.lnk" '聯(lián)系人快捷方式保存地址
Wscript.Sleep 1000 '等待1秒
WshShell.SendKeys ("^v")
Wscript.Sleep 4000 '等待4秒
WshShell.SendKeys "{ENTER}"
Wscript.Sleep 1000 '等待1秒
WshShell.SendKeys "%{F4}"
Wscript.Sleep 1000 '等待1秒

windows自帶定時(shí)任務(wù)

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

喚醒電腦

在“此電腦”右鍵后點(diǎn)擊管理,找到任務(wù)計(jì)劃程序,點(diǎn)擊“創(chuàng)建任務(wù)”,輸入名稱“喚醒電腦”,在常規(guī)中勾上“使用最高權(quán)限運(yùn)行”,在觸發(fā)器中填入喚醒時(shí)間,在操作中輸入程序“notepad.exe”,在條件中勾上“喚醒計(jì)算機(jī)運(yùn)行此任務(wù)”。然后確定即可。

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

發(fā)送信息

基本與喚醒電腦一致,注意的是要選擇合適的發(fā)送時(shí)間,以及要在操作中瀏覽選擇vbs腳本。

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

關(guān)閉電腦

基本與喚醒電腦一致,注意的是在操作中,輸入程序“shutdown.exe",并且添加參數(shù)”-h“。

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

最后

電腦出現(xiàn)4個(gè)圖標(biāo)后就可以躺下等待半夜自動(dòng)發(fā)送信息了。
qq保持登錄狀態(tài),然后電腦休眠就行了。

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

qq發(fā)送信息后就關(guān)機(jī)了。

怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能

到此,相信大家對“怎么用vbs和windows實(shí)現(xiàn)qq消息表情包定時(shí)發(fā)送功能”有了更深的了解,不妨來實(shí)際操作一番吧!這里是億速云網(wǎng)站,更多相關(guān)內(nèi)容可以進(jìn)入相關(guān)頻道進(jìn)行查詢,關(guān)注我們,繼續(xù)學(xué)習(xí)!

向AI問一下細(xì)節(jié)

免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場,如果涉及侵權(quán)請聯(lián)系站長郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI