vb.net微信發(fā)送 vbs發(fā)消息

vbaexcel中如何編程向微信自動(dòng)發(fā)送信息

理論上可以使用AppActivate切換到微信窗口,然后使用sendkeys輸入內(nèi)容、按回車(chē)發(fā)送。但是微信的窗口不好控制,我懶得鉆研,改用QQ發(fā)送,很容易就成功了。

創(chuàng)新互聯(lián)公司長(zhǎng)期為成百上千家客戶(hù)提供的網(wǎng)站建設(shè)服務(wù),團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年,關(guān)注不同地域、不同群體,并針對(duì)不同對(duì)象提供差異化的產(chǎn)品和服務(wù);打造開(kāi)放共贏平臺(tái),與合作伙伴共同營(yíng)造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為丁青企業(yè)提供專(zhuān)業(yè)的成都做網(wǎng)站、網(wǎng)站制作,丁青網(wǎng)站改版等技術(shù)服務(wù)。擁有十年豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開(kāi)發(fā)。

vbscript定時(shí)發(fā)送微信消息

本程序?qū)崿F(xiàn)定時(shí)向指定微信群發(fā)送指定消息的功能。

主要工具如下:

2020年受疫情影響,需要定時(shí)給小朋友所在學(xué)校的微信群發(fā)送體溫,于是想到了借助程序~~

pc保持開(kāi)機(jī)狀態(tài),微信pc端在線

通過(guò)模擬鍵盤(pán)輸入,替代手工敲擊鍵盤(pán),達(dá)到自動(dòng)發(fā)送消息的效果。

Dim Name,Msg

Name = "微信群名"

Msg = "xxx小朋友,體溫36.5"

set ws=wscript.createobject("wscript.shell")

ws.Run "mshta vbscript:ClipboardData.SetData("chr(34)"text"chr(34)"," Chr(34) Name Chr(34) ")(close)",0,True

ws.sendKeys "^%w"

ws.appactivate "微信"

wscript.sleep 500

ws.sendKeys "^f"

wscript.sleep 500

ws.sendKeys "^v"

wscript.sleep 500

ws.sendKeys "{ENTER}"

wscript.sleep 2000

ws.Run "mshta vbscript:ClipboardData.SetData("chr(34)"text"chr(34)"," Chr(34) Msg Chr(34) ")(close)",0,True

wscript.sleep 200

ws.sendKeys "^v"

wscript.sleep 300

ws.sendKeys "{ENTER}"

僅針對(duì)微信群名未更換的情況,如果微信群名稱(chēng)更換了,也要及時(shí)變更哦,喜歡的點(diǎn)個(gè)贊哈~

微信.net開(kāi)發(fā)怎么群發(fā)消息求源代碼

{

"articles": [

{

"thumb_media_id":"qI6_Ze_6PtV7svjolgs-rN6stStuHIjs9_DidOHaj0Q-mwvBelOXCFZiq2OsIU-p",

"author":"xxx",

"title":"Happy Day",

"content_source_url":"",

"content":"content",

"digest":"digest",

"show_cover_pic":"1"

},

{

"thumb_media_id":"qI6_Ze_6PtV7svjolgs-rN6stStuHIjs9_DidOHaj0Q-mwvBelOXCFZiq2OsIU-p",

"author":"xxx",

"title":"Happy Day",

"content_source_url":"",

"content":"content",

"digest":"digest",

"show_cover_pic":"0"

}

]

}

這是群發(fā)圖文的json

把這個(gè)json格式的字符串post到就行了。

群發(fā)詳細(xì)接口說(shuō)明:

微信小程序 消息推送 vb。net怎么配置token

你這個(gè)口令令牌錯(cuò)誤啊,需要在你的公眾號(hào)的后臺(tái)去獲取你的口令令牌地址填寫(xiě)上去才行。另外你的url服務(wù)器地址也要填寫(xiě)正確,不能有錯(cuò)誤,這樣配置出來(lái)的信息才正確。

分享題目:vb.net微信發(fā)送 vbs發(fā)消息
URL地址:http://muchs.cn/article46/doedehg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供手機(jī)網(wǎng)站建設(shè)、網(wǎng)站改版、小程序開(kāi)發(fā)、Google、App設(shè)計(jì)、網(wǎng)站排名

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)

成都做網(wǎng)站