qq消息腳本
1. QQ聊天時一直重復一句話的腳本代碼
暈死.直接離開就可以了.
在系統設置那裡,狀態--自動回復.
2. qq定時發送消息軟體
當然QQ本身沒有定時向好友發信息的功能,但是我發現用定時提醒消息也能代替這個功能。
我們開啟運行手機QQ軟體,然後找到需要發送QQ消息提醒的好友。 並打開與好友的聊天窗口界面,點擊「+」按鈕。 並在接下來出現的界面中,找到「提醒」功能選項,並點擊該選項。 然後在這里就可以輸入消息提醒內容了,然後設置好提醒的時間,最後點擊「創建」。 也許在設置的時間到了之後,好友就會收到對應的QQ消息提示了vbs腳本可以實現qq發送,原理是發送聯系人到桌面,然後用vbs直接調用桌面快捷方式打開聊天窗口發送消息關閉窗口,然後把這個vbs腳本添加到系統的自動調度,按你需要的時間進行調度,當然你也可以把定時寫進vbs,讓這個腳本常駐運行,就不用了添加到調度,或者添加為開機自動執行。
首先,你需要建一個文檔,把你要發送的內容寫入文檔,然後保存為txt,發送快捷方式到桌面。找到這個快捷方式,右鍵,屬性,復制目標里邊的內容,我在這里稱它為A。
然後把你要發消息的人發送快捷方式到桌面,也復制目標里邊的內容。我們稱它為B
新建一個txt文檔,
Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run "A"
WScript.Sleep 1000
WshShell.SendKeys "^a"
WScript.Sleep 1000
WshShell.SendKeys "^c"
WScript.Sleep 1000
WshShell.sendKeys "%{F4}"
WScript.Sleep 1500
WshShell.Run "B"
WScript.Sleep 1500
WshShell.sendKeys "^v"
WshShell.sendKeys "{ENTER}"
WScript.Sleep 1500
WshShell.sendKeys "%{F4}"
用上邊復制的AB路徑代替代碼里的A B ,保存,重命名,將後綴名改為vbs。手動運行查看效果。當然,腳本運行時qq需要在線,不能在腳本執行打開窗口的一系列操作時操作鍵盤,不能切換窗口等。WScript.Sleep 1000是一個延時,可以根據自己的電腦適度調小。如果你要給多個人發消息的話,復制第十行以及以後的代碼,粘貼多份在後邊,並將B替換為不同聯系人的桌面快捷方式。如果效果沒問題,就可以把這個腳本加入系統的自動調度,定時執行啦。
實測,發送一次之後桌面聯系人快捷方式可以刪除,保存發送內容的文本快捷方式不可刪除。
微信由於沒找到怎麼發送聯系人到桌面還在研究其他替代方案。
網上down了一段代碼,發現可以發送微信消息
Dim Name,Msg
Name= "微信團隊"
Msg = "Hellow!"
set ws=wscript.createobject("wscript.shell")
Welcome! "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 200
ws.sendKeys "{TAB}"
wscript.sleep 200
ws.sendKeys "{ENTER}"
Welcome! "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}"
ws.sendKeys "%{F4}"
name是你要發的人的名字,msg是發送內容QQ自動定時發送消息(微信暫時沒有好的辦法),可以通過以下代碼實現,有人已經給出來了但有些細節沒說清楚容易導致不一定能正常運行,我這里做些補充。
1、建立一個txt文檔、裡面寫上需要發送的消息內容,復制這個文件所在路徑
2、對目標好友生成桌面快捷方式(對好友頭像點右鍵、在好友管理選項下),查看快捷方式的屬性並復制其「目標」欄的所有內容。
3、建立另一個txt文檔、復制粘貼下面的腳本代碼,然後重命名這個文檔、將txt後綴修改為vbs,將前兩步當中復制下的內容粘貼進腳本當中對應位置。
4、在任務計劃當中建立定時任務、運行製作的vbs腳本文件。
需要注意的地方:
1、QQ的安裝目錄通常默認是在 C盤的Program Files (x86)文件夾下,這個文件夾的名稱中間帶有空格,所以直接復制QQ好友快捷方式的目標內容粘貼到腳本里,通常都會導致運行錯誤,所以最簡單的辦法是重新安裝QQ,選擇一個自定義的、名稱簡單的目錄(避免有空格、特殊符號、中文之類的情況)。至於針對空格符應該可以有特別的表達語法以保證VBS腳本正常運行,我沒研究過,相信精通VBS腳本的大神應該知道,歡迎指出。
2、QQ發送消息的快捷鍵,有些人使用的是回車鍵、有些人可能設置的是ctrl加回車,所以在腳本倒數第三行,可以根據自己需要來設置:如果是ctrl加回車,那麼腳本就修改成WshShell.sendKeys "^{ENTER}"
3、腳本運行需要保持QQ處於登錄狀態,如果發送消息之後並不需要關閉對話框,可以把最後兩行腳本刪除。
4、如果電腦安裝了安全衛士、殺軟之類的,在運行腳本的時候可能會被阻止,所以建議在設置計劃任務前先把腳本添加進安全軟體的白名單。
5、電腦系統需要處於登錄狀態,不能鎖屏。
Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run "消息內容文本文檔所在路徑"
WScript.Sleep 1000
WshShell.SendKeys "^a"
WScript.Sleep 1000
WshShell.SendKeys "^c"
WScript.Sleep 1000
WshShell.sendKeys "%{F4}"
WScript.Sleep 1500
WshShell.Run "QQ好友桌面快捷方式目標欄內容"
WScript.Sleep 1500
WshShell.sendKeys "^v"
WshShell.sendKeys "{ENTER}"
WScript.Sleep 1500
WshShell.sendKeys "%{F4}"
3. QQ消息同步出現腳本錯誤!
1.網速有原因
2.另外就是區域網有人ARP攻擊 導致QQ不能登陸
3.QQ版本有問題 卸載 重新裝個
4.以上都不是 可以介意換下系統 重裝QQ登陸!
希望能幫你解決!
4. QQ消息記錄同步 總是說當前頁面腳本錯誤
是這樣的 QQ這方面的功能不夠完美 我也是經常這樣。關Q重開刷幾次才行
5. 按鍵精靈如何編寫QQ消息發送!!急求
小白有償求,按鍵精靈這類工具寫個微信公眾服務號向每位粉絲一對一推送圖文信息的腳本。
抓點,變數,錄制什麼的
只要寫出來可以用就可以了。(千萬別跑兩次就廢了!我要長久用的呢。)
」大神寫腳本,屌絲也可以利用按鍵精靈錄制20次,「點擊粉絲頭像推送圖文信息的動作「(推送完圖文信息後插入ctrl+w
鍵盤操作關閉頁面),再錄制一次」翻頁動作「,然後重復操作。「
小白,抓點,變數寫不好,總是出錯!錄制要給那麼多人發一遍,又懶得動。你們報上價格,掙錢的機會交給你們了!!
6. 觸動精靈怎麼設置QQ自動發消息腳本
方法/步驟
點擊腳本下拉菜單,點擊「設置運行方式」。
7. 怎麼用按鍵精靈定時發一條QQ消息
用按鍵精靈設置延時,然後把錄制好就行,這方法不好。
8. QQ消息群發腳本
信鴿軟體,我們有郵件群發專家,論壇群發專家,博客群發專家,問答口碑營銷,商務營銷專家,QQ群營銷專家,微博營銷專家,數據整合分析專家,分類信息營銷專家,QQ空間營銷專家,一共是10款軟體。
9. 能不能給我QQ自動發消息的按鍵精靈腳本,手機的
可以的,除非QQ設置了拒絕接受。