溫馨提示×

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

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

使用易語(yǔ)言怎么實(shí)現(xiàn)QQ全自動(dòng)批量點(diǎn)贊功能

發(fā)布時(shí)間:2021-05-22 16:53:35 來(lái)源:億速云 閱讀:307 作者:Leah 欄目:編程語(yǔ)言

本篇文章給大家分享的是有關(guān)使用易語(yǔ)言怎么實(shí)現(xiàn)QQ全自動(dòng)批量點(diǎn)贊功能,小編覺(jué)得挺實(shí)用的,因此分享給大家學(xué)習(xí),希望大家閱讀完這篇文章后可以有所收獲,話不多說(shuō),跟著小編一起來(lái)看看吧。

利用模擬操作的方式實(shí)現(xiàn)QQ全自動(dòng)點(diǎn)贊

此功能需要加載精易模塊

.版本 2
.支持庫(kù) iext
.支持庫(kù) HtmlView
.支持庫(kù) spec
.程序集 窗口程序集1
.程序集變量 停止變量, 邏輯型
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
' 不允許多個(gè)QQ登錄,不然每次需要手動(dòng)選擇點(diǎn)贊的號(hào)
.子程序 _導(dǎo)入按鈕_被單擊
.局部變量 分割文本, 文本型, , "0"
.局部變量 文本, 文本型
.局部變量 i1, 整數(shù)型
.局部變量 索引, 整數(shù)型
通用對(duì)話框1.初始目錄 = 取運(yùn)行目錄 ()
.如果真 (通用對(duì)話框1.打開(kāi) () = 真)
  超級(jí)列表框1.全部刪除 ()
  文本 = 到文本 (讀入文件 (通用對(duì)話框1.文件名))
  分割文本 = 分割文本 (文本, #換行符, )
  .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (分割文本), i1)
    系統(tǒng)_處理事件 ()
    索引 = 超級(jí)列表框1.插入表項(xiàng) (超級(jí)列表框1.取表項(xiàng)數(shù) () + 1, 到文本 (超級(jí)列表框1.取表項(xiàng)數(shù) () + 1), , , , )
    超級(jí)列表框1.置標(biāo)題 (索引, 1, 分割文本 [i1])
  .計(jì)次循環(huán)尾 ()
.如果真結(jié)束
.子程序 _點(diǎn)贊按鈕_被單擊
QQ個(gè)人資料_批量點(diǎn)贊 ()
.子程序 QQ個(gè)人資料_批量點(diǎn)贊
.局部變量 局_當(dāng)前行, 整數(shù)型
.局部變量 局_句柄1, 整數(shù)型
.局部變量 局_句柄_整組, 整數(shù)型, , "0"
.局部變量 局_橫坐標(biāo), 整數(shù)型
.局部變量 局_縱坐標(biāo), 整數(shù)型
.局部變量 N, 整數(shù)型
.局部變量 局_所有QQ_文組, 文本型, , "0"
局_橫坐標(biāo) = 336
局_縱坐標(biāo) = 334
.計(jì)次循環(huán)首 (超級(jí)列表框1.取表項(xiàng)數(shù) (), N)
  .如果真 (停止變量 = 真)
    返回 ()
  .如果真結(jié)束
  加入成員 (局_所有QQ_文組, 超級(jí)列表框1.取標(biāo)題 (N - 1, 1))
.計(jì)次循環(huán)尾 ()
' -----------------------
窗口_模糊遍歷窗口 (, , “的資料”, 局_句柄_整組)
系統(tǒng)_處理事件 ()
.如果真 (取數(shù)組成員數(shù) (局_句柄_整組) > 0)
  .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (局_句柄_整組), N)
    窗口_關(guān)閉 (局_句柄_整組 [N])
  .計(jì)次循環(huán)尾 ()
.如果真結(jié)束
' -----------------------
.計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (局_所有QQ_文組), N)
  .如果真 (停止變量 = 真)
    返回 ()
  .如果真結(jié)束
  超級(jí)列表框1.現(xiàn)行選中項(xiàng) = N - 1
  超文本瀏覽框1.地址 = “tencent://ContactInfo/?subcmd=ViewInfo&puin=0&uin=” + 局_所有QQ_文組 [N]
  .計(jì)次循環(huán)首 (10, )
    延遲 (1000)
    局_句柄1 = 窗口_取句柄_模糊 (“的資料”, “TXGuiFoundation”)
    系統(tǒng)_處理事件 ()
    .如果真 (局_句柄1 > 0)
      跳出循環(huán) ()
    .如果真結(jié)束
  .計(jì)次循環(huán)尾 ()
  超級(jí)列表框1.置標(biāo)題 (N - 1, 2, “√”)
  .如果真 (局_句柄1 = 0)
    信息框 (“打開(kāi)QQ個(gè)人資料失敗”, #錯(cuò)誤圖標(biāo), “注&意:”)
    點(diǎn)贊按鈕.禁止 = 假
    返回 ()
  .如果真結(jié)束
  ' --------------
  程序_延時(shí) (1000)
  .計(jì)次循環(huán)首 (10, )
    系統(tǒng)_處理事件 ()
    鼠標(biāo)_消息 (局_句柄1, 局_橫坐標(biāo) + 100, 局_縱坐標(biāo), 2, 1)
    系統(tǒng)_處理事件 ()
    鼠標(biāo)_消息 (局_句柄1, 局_橫坐標(biāo), 局_縱坐標(biāo), 1, 1)
    程序_延時(shí) (300)
    系統(tǒng)_處理事件 ()
    ' 調(diào)試輸出 (“ 鼠標(biāo)_消息 ”)
  .計(jì)次循環(huán)尾 ()
  程序_延時(shí) (1000)
  窗口_關(guān)閉 (局_句柄1)
.計(jì)次循環(huán)尾 ()
信息框 (“完成”, 0, “注&意:”)
.子程序 _停止按鈕_被單擊
停止變量 = 真

以上就是使用易語(yǔ)言怎么實(shí)現(xiàn)QQ全自動(dòng)批量點(diǎn)贊功能,小編相信有部分知識(shí)點(diǎn)可能是我們?nèi)粘9ぷ鲿?huì)見(jiàn)到或用到的。希望你能通過(guò)這篇文章學(xué)到更多知識(shí)。更多詳情敬請(qǐng)關(guān)注億速云行業(yè)資訊頻道。

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

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

AI