大家好,我是公眾號三分學(xué)堂的郭立元~
和朋友聊天是談?wù)撊绾瘟魅隥Q群,解決核心問題是別人為什么成群結(jié)隊(duì),我們要做的是提供“誘餌”,成群結(jié)隊(duì)以后可以給對方需要的東西或服務(wù)。
那我們做腳本的能提供什么誘餌?肯定是腳本啊,那么要解決的就是怎么把腳本和QQ群聯(lián)系在一起的問題。
一個(gè)簡單的方式是把腳本放到QQ群里面,別人進(jìn)群才能下載,這是比較常用的方法。
不過別人進(jìn)群后轉(zhuǎn)發(fā)腳本給其他人,其他人使用腳本時(shí)其實(shí)和我們的QQ群就沒有聯(lián)系了。
為了增強(qiáng)關(guān)聯(lián)性,我們把QQ群作為腳本運(yùn)行的驗(yàn)證,只有在使用設(shè)備上登錄過加群的QQ,才能驗(yàn)證通過使用腳本。
這種驗(yàn)證的原理是讀取設(shè)備上的QQ數(shù)據(jù)庫,查看當(dāng)前QQ所加群中是否有我們的群。
具體步驟:
1,找到QQ數(shù)據(jù)庫的路徑:
/data/data號.db
在路徑中可以看到數(shù)據(jù)庫名稱是QQ號,這就是說要知道完整的路徑,要獲取到QQ號,可以是讓用戶自己填寫,也可以遍歷所有數(shù)據(jù)庫文件,從中找到QQ號。
兩種獲取QQ號的方法中我個(gè)人是覺得讓用戶自己填寫更好,因?yàn)楫?dāng)設(shè)備中登錄過多個(gè)QQ的時(shí)候,遍歷出來就是多個(gè)結(jié)果。這樣就不準(zhǔn)了。
2,讀取數(shù)據(jù)庫文件,查找群號做驗(yàn)證
Import ";
Dim QQ="453485278" //做成輸入框,讓用戶填寫
Dim q群號="242971687" //你自己的QQ群
Dim DBpath = "/data/data;&QQ&".db"
Dim ret = (DBpath, "FTSTroopTime")
If Len(ret) = 0 Then
TracePrint "驗(yàn)證失敗,請加入QQ群"&q群號&"完成驗(yàn)證"
EndScript
End If
For i = 1 To Len(ret)
TracePrint ret[i]["mUin"]
If ret[i]["mUin"] = q群號 Then
TracePrint "驗(yàn)證群通過"
Exit For
End If
If i = Len(ret) Then
TracePrint "驗(yàn)證失敗,請加入QQ群"&q群號&"完成驗(yàn)證"
EndScript
End If
Next
我在測試的時(shí)候發(fā)現(xiàn),這鐘方法也是存在bug,比如進(jìn)群后又退出群,在QQ數(shù)據(jù)庫里面還是會(huì)有這個(gè)群記錄。
在QQ數(shù)據(jù)庫中還有很多其他的數(shù)據(jù),但是是加密的,破解加密還沒搞定,所以只能是用這個(gè)沒加密的數(shù)據(jù)做驗(yàn)證,等以后把QQ加密破解了,在優(yōu)化這個(gè)方法。
=正文完=
1.《【qq綁定】「安卓按鍵」綁定QQ群,別人就不能隨便用我的腳本了》援引自互聯(lián)網(wǎng),旨在傳遞更多網(wǎng)絡(luò)信息知識,僅代表作者本人觀點(diǎn),與本網(wǎng)站無關(guān),侵刪請聯(lián)系頁腳下方聯(lián)系方式。
2.《【qq綁定】「安卓按鍵」綁定QQ群,別人就不能隨便用我的腳本了》僅供讀者參考,本網(wǎng)站未對該內(nèi)容進(jìn)行證實(shí),對其原創(chuàng)性、真實(shí)性、完整性、及時(shí)性不作任何保證。
3.文章轉(zhuǎn)載時(shí)請保留本站內(nèi)容來源地址,http://f99ss.com/gl/2500475.html