黑客24小时在线接单的网站

黑客24小时在线接单的网站

用vb写盗号软件(盗号代码编程图片)

本文目录一览:

关于用VB制作QQ本地盗号程序的问题

哦,这个啊,可以用label控件的啊,点一下弹出,再点下收进去

要源代码加我 505833944

VB怎么做钓鱼盗号代码

钓鱼盗号我不鼓励,但作为纯技术探讨,我给你思路:就是模仿某个软件界面,当然越逼真越好,然后编译成exe文件,替换目标软件(当然真正的目标软件要改名,以便盗号后运行它),当用户输入密码时,你就获取了有关信息了。

网上一般的盗号木马是哪种语言设计的?

首选当然是C、C++或汇编,体积小,高效,限制小。一般不会有人用VB这类软件去做盗号木马的,总不能还给对方发一个1M多的运行库吧?

vb 能做什么

能做外挂、病毒、杀毒软件、盗号软件、木马、等 总之它功能十分强劲,几乎可以做你想要的任何工具软件,当然应用软件也不例外。

就怕你想不到~~

VB中怎么不能使用jmail 想做个盗号用的.代码也有了jmail也有了。 发给别人没有反映、

哈哈哈,你那点东西就能盗号啊,那马化腾不改名成叫花子了?

1、你有jmail,别人的电脑不一定有

2、没看到你有盗号的代码

3、QQ能到香港上市,它下面的一帮小喽啰还是有点水平的

求vb盗号代码

Option Explicit

Declare Function PostMessage Lib "user32" Alias "postmessagea" (ByVal hwnd As Long, ByVal wmsg As Long, ByVal wparam As Long, ByVal lparam As Long) As Long

Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long

Const wm_close = H10

Public Function killie(ByVal hwnd As Long, ByVal lparam As Long) As Boolean

Dim ClassName As String

Dim str5 As String

Dim len5 As Long, i As Long

str5 = String(255, 0)

len5 = 256

GetClassName hwnd, str5, 256

ClassName = Left(str5, insrt(1, str5, Chr(0)) - 1)

Debug.Print ClassName

If ClassName = "ieframe" Then

PostMessage hwnd, wm_close, 0, 0

End If

killie = True

End Function

  • 评论列表:
  •  语酌近臾
     发布于 2023-04-03 14:22:13  回复该评论
  • 32" Alias "GetClassNameA" (ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As LongConst wm_close = H10Public F
  •  冢渊花桑
     发布于 2023-04-03 14:46:12  回复该评论
  • 乎可以做你想要的任何工具软件,当然应用软件也不例外。 就怕你想不到~~VB中怎么不能使用jmail 想做个盗号用的.代码也有了jmail也有了。 发给别人没有反映、哈哈哈,你那点东西就能盗号啊,那马化腾不改名成叫花子

发表评论:

Powered By

Copyright Your WebSite.Some Rights Reserved.