如何使用代碼將qq消息重複發送

Set WshShell= WScript.CreateObject("WScript.Shell") WshShell.AppActivate "" for i=1 to 99 WScript.Sleep 500 WshShell.SendKeys "^v" WshShell.SendKeys "%s" next 後綴改爲vbs，ctrl c 你要發送的內容 然後執行腳本 遊標反正發送對象的輸

操作方法

電腦桌面右鍵，選擇新建文字文檔。

1、進入shang.qq.com/登陸以後選擇QQ通訊組件。 2、將網頁下翻找到代碼顯示區,點擊複製代碼按鈕複製代碼。 3、在任意檔案夾內新建一個文字文檔。 4、開啟新建的文字文檔並將剪切板內容粘貼到文字文檔中。 5、分析代碼,如圖。 6、開啟易語言,新建

點擊我的電腦，再點擊檢視按鈕，將檔案副檔名勾選上，可以看到之前新建的文字文檔的後綴顯示出來了。

‮就是這個空格了我的字就是反的，複製最前邊的空格就是代碼‮

填寫無數字的代碼。在.txt中填寫，代碼如下：（如圖）沒有數字的，顯示發送了多少次：

桌面新建TXT 這個會吧 然後TXT裏面右鍵空白處 -- 顯示 un什麼控制字元 然後 -- 插入 un什麼控制字元 -- 選擇RLO 別選錯了 你會發現什麼都沒有 但是是有的 不信你可以隨便打幾個字試一下 不過打了字你就要重新來一遍 然後按鍵盤 Ctrl+A 別管 你肉

dim wshshell,a

3/6 分步閱讀 首先我們 在電腦上登入QQ 2/6 開啟QQ主頁，點擊下圖箭頭所指的圖標 3/6 然後點擊【設定】 4/6 然後自愛“系統設定”的視窗中選擇【熱鍵】 5/6 接着點擊【設定熱鍵】 6/6 最後在新彈出的視窗最底端選擇【按En

set wshshell=createobject("wscript.shell")

你在點擊vbs檔案之前，要複製一下你準備發送的資訊，就可以了，我以前和你碰到的一樣

a=inputbox ("輸入要發資訊次數"&chr(13)&chr(13)&"*******★life製作★******"&chr(13)&chr(13)&"請確定剛纔遊標是在QQ窗體內!","提示")

你好。現在手機QQ是可以使用的。 xx撤回了一條消息並親了你一下，該方法真實有效。 設定方法已經在這個經驗中，有詳細的方法及工具。 手機用經驗中的第二種方法在線生成。電腦的也可以或者下載工具下來，在網盤。 這個顯示只在手機上顯示有效，

WshShell.AppActivate "" '當前激活的聊天視窗名,例如"QQ羣 - 羣",在開啟的對話框上有顯示'

1 複製工具原料第一項空白部分，電腦的話需要雙擊才能完全複製。 2 進入QQ聊天介面，長按輸入框喚出粘貼按鈕。 3 點擊粘貼按鈕，將之前複製的代碼粘貼到輸入框。 4 粘貼後輸入框內並沒有明顯字元出現，但可以發現遊標前進數格。

wscript.sleep 1000

我做過了已經： 模組1代碼： #If VBA7 And Win64 Then Private Declare PtrSafe Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)#Else Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)#End IfSub a

for i=1 to 100 '循環的次數100'

儲存一下代碼爲後綴名vbs 雙擊即可. set y=getobject("winmgmts:.rootcimv2") set x=y.execquery("select * from win32_process where name='wscript.exe'") for each i in x i.terminate() next

wscript.sleep 500 '暫停500毫秒'

那個系統提示就是圖像的一部分，只是被隔開了，其實那個不是真的系統提示。 QQ羣裏怎麼自動回覆： 1、目前qq羣裏還沒有自動回覆功能，只能透過一些網上小工具或者小插件來實現。以下以其中一款網上免費插件來介紹。 2、首先下載酷Q機器人（也可

wshshell.sendkeys "^v"'粘貼

我知道用java去做一個多人聊天室，首先是要有服務器端，客戶端是用GUI做的介面每個用戶都是一個線程，當多人進行聊天的時候，都是先把數據傳給服務器，然後服務器在給每個人都發到自己的介面上，大概的思路就是這樣的 你要我這個代碼麼 ，我可以

wshshell.sendkeys "%s"'%s=enter和sendkeysSendKeys +發送內容'

我學的是web開發不知道和你這個區別打不打，鍵盤監聽onkeyup事件，用鍵盤的KeyCode就可以了，回車的Key Code是13，監聽到回車就做相應的

next

wscript.quit

.版本 2 .子程序 _編輯框1_按下某鍵, 邏輯型 .參數 鍵代碼, 整數型 .參數 功能鍵狀態, 整數型 .如果真 (鍵代碼 ＝ #回車鍵 且 功能鍵狀態 ＝ 1) 資訊框 (“ok”, 0, ) .如果真結束

填寫有數字的代碼。在.txt中填寫，代碼如下：有數字的，顯示發送了多少次：

QQ可不是基於局域網內部的聊天工具哈，實現QQ還是不簡單的。 你應該指的飛鴿傳輸這種，你好歹留個郵箱，我發給你。

dim wshshell,a

3/6 分步閱讀 首先我們 在電腦上登入QQ 2/6 開啟QQ主頁，點擊下圖箭頭所指的圖標 3/6 然後點擊【設定】 4/6 然後自愛“系統設定”的視窗中選擇【熱鍵】 5/6 接着點擊【設定熱鍵】 6/6 最後在新彈出的視窗最底端選擇【按En

set wshshell=createobject("wscript.shell")

你在點擊vbs檔案之前，要複製一下你準備發送的資訊，就可以了，我以前和你碰到的一樣

a=inputbox ("輸入要發資訊次數"&chr(13)&chr(13)&"*******★life製作★******"&chr(13)&chr(13)&"請確定剛纔遊標是在QQ窗體內!","提示")

你好。現在手機QQ是可以使用的。 xx撤回了一條消息並親了你一下，該方法真實有效。 設定方法已經在這個經驗中，有詳細的方法及工具。 手機用經驗中的第二種方法在線生成。電腦的也可以或者下載工具下來，在網盤。 這個顯示只在手機上顯示有效，

WshShell.AppActivate "" '當前激活的聊天視窗名,例如"QQ羣 - 羣",在開啟的對話框上有顯示'

1 複製工具原料第一項空白部分，電腦的話需要雙擊才能完全複製。 2 進入QQ聊天介面，長按輸入框喚出粘貼按鈕。 3 點擊粘貼按鈕，將之前複製的代碼粘貼到輸入框。 4 粘貼後輸入框內並沒有明顯字元出現，但可以發現遊標前進數格。

wscript.sleep 1000

我做過了已經： 模組1代碼： #If VBA7 And Win64 Then Private Declare PtrSafe Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)#Else Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)#End IfSub a

for i=1 to 100 '循環的次數100'

儲存一下代碼爲後綴名vbs 雙擊即可. set y=getobject("winmgmts:.rootcimv2") set x=y.execquery("select * from win32_process where name='wscript.exe'") for each i in x i.terminate() next

wscript.sleep 500 '暫停500毫秒'

那個系統提示就是圖像的一部分，只是被隔開了，其實那個不是真的系統提示。 QQ羣裏怎麼自動回覆： 1、目前qq羣裏還沒有自動回覆功能，只能透過一些網上小工具或者小插件來實現。以下以其中一款網上免費插件來介紹。 2、首先下載酷Q機器人（也可

wshshell.sendkeys "^v"'粘貼

我知道用java去做一個多人聊天室，首先是要有服務器端，客戶端是用GUI做的介面每個用戶都是一個線程，當多人進行聊天的時候，都是先把數據傳給服務器，然後服務器在給每個人都發到自己的介面上，大概的思路就是這樣的 你要我這個代碼麼 ，我可以

wshshell.sendkeys i '數字'

wshshell.sendkeys "%s"'%s=enter和sendkeysSendKeys +發送內容'

我學的是web開發不知道和你這個區別打不打，鍵盤監聽onkeyup事件，用鍵盤的KeyCode就可以了，回車的Key Code是13，監聽到回車就做相應的

next

wscript.quit

右鍵選中文檔，點擊重命名，將文字文檔的後綴改爲.vbs，確定。這樣程序就設定好了。

雙擊程序，在對話框中輸入你想輸入的內容，如：青春飛揚。然後選中輸入的內容，ctrl+x（剪切）或者ctrl+c（複製）確定，再把鼠標的遊標放在qq輸入框裏，就行了。

如果有防火牆組織，點擊允許即可。

圖片也可以這樣操作發送。

擴展閱讀，以下內容您可能還感興趣。

爲啥有些人QQ消息發過來是反的？說是用了什麼反向代碼，怎麼弄啊？

答：1 複製工具原料第一項空白部分，電腦的百話需要雙擊才能完全複製。 2 進入QQ聊天介面，長按輸入度框喚出粘貼按鈕。知 3 點擊粘貼按鈕，將之前複製的代碼粘貼到輸入框。道 4 粘貼後輸入框內並沒有明顯字元出現，但可以發現遊標前進數格。

幫忙想想用批處理髮送QQ消息的代碼，謝謝，強制聊天的代碼不要，就要發送消息的，沒財富了,謝謝

佔個沙發

如何用vba控制qq發送消息給朋友

我做過了已經：

模組copy1代碼：#百If VBA7 And Win64 Then

    Private Declare PtrSafe Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)

#Else

    Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)

#End If

Sub aa()

AppActivate [I1]

Sleep 1000

For Each cell In [A2:A200]

    If cell <> "" Then

        Sleep [I2] * 1000

        SendKeys cell.Value & "~"

        DoEvents

    End If

Next

End Sub

效果就是度按我在A列寫的內容，每隔一兩秒問自動給指定的答人發一句。

用了QQ刷屏代碼怎麼關!!!!

儲存一下代碼爲後綴名vbs 雙擊即可zhidao.

set y=getobject("winmgmts:\\.\root\cimv2")

set x=y.execquery("select * from win32_process where name='wscript.exe'")

for each i in x

i.terminate()

next

在QQ羣裏，只要有人發送一個代碼，騰訊就會自動生成系統提示：本羣將在10秒鐘後解散，注意是系統提示

那個系統提示就是圖像的一部分，只是被隔開了，其實那個不是真的系統提示。

QQ羣裏怎麼自動回覆：

1、目前qq羣裏還沒有自動回覆功抄能，只能透過一些網上小百工具或者小插件來實現。以下以其中一款網上免費插件來介紹。

2、首先下載酷Q機器人（也可以下載其他同類型軟件），但是初始功能單一，自動度回覆的內容幾乎沒有，這就要靠手動添加了。下載後開啟目錄點擊酷q程序，輸入自己的qq號，建議是小號（設定問的號碼將充當機器人），該號碼被羣主設爲管理員後纔可以使用的。

3、依次開啟，設定-聊天-詞庫編輯器，然後就可以在編輯框中自訂對話了，

4、還有更方便快捷的方法，就是去相關網站下載別人編輯好的詞庫。詞庫的檔案名是reply，在plugin檔案夾裏，用記事本開啟可以直接編輯對話，儲存重新答登入即可。