QQ自動後綴時間腳本

Ⅰ qq怎麼寫自動回復腳本

腳本（script）是使用一種特定的描述性語言，依據一定的格式編寫的可執行文件，又稱作宏或批處理文件。
簡單來說也就是以特定的情況做出不同的命令。（例如樓主你鏈接裡面說的QQ回復就是樣）（最常見的就是一些後綴為BAT的文件）
看樣子樓主目前還不大適合自己寫腳本，你可以上網下個QQ聊天機器人也可以達到你的目的。當然了這些軟體都是很%%XX的。

Ⅱ 求一QQ定時自動改名腳本或軟體

下面的代碼可以實現你想要的功能，無論在哪裡，滑鼠，以及背景
註：
1，只要你的人，你想聊QQ，然後打開這個腳本打開的窗口線（打開的腳本，
必須讓當前窗口的窗口，您要的揚聲器打開腳本，你無法控制，可以很容易地做任何事情，除了關機）
2，此腳本是按鍵精靈8.0

USERVAR VAR1 = 0「0改變你想說的話」
HWND =插件。 Window.Foreground（）
：呼叫Plugin.Window.Move（HWND，0，0）
延遲3599000
：呼叫Plugin.Window.Show（HWND）
的延時1000 <BR / SayString VAR1
的KeyDown 18，1
按鍵83 1
在KeyUp 18 1

359900之間的差異，第二個小時，1000 =候秒

Ⅲ 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}"