问题描述:
由于网上需输密码的情况越来越宽让多,以及木马等窃取密码的情况时有发生,我想到用VB编一个密码输入程序,在需输入密码等隐私资料时,可以通过这个程序输入,避免因键盘输入而造成密码被盗的现象,但因我初学VB,现有一个问题求助,即如缓悄何将该程序的焦点移至网页上的密码框内并输入字符,多谢指教.
解析:
输入总是能够被监视到的,我认为你应该做这样的一个程序:
1、生成一个键盘的界面,要随机排放按键的位置(模拟QQ)
2、一个复制按钮
3、一个文本框
4、一个Timer控件
程序执行步骤:
1、启动程序时生成随即键盘
2、用鼠标点击要输入的密码(此时文本框显示密码,要用*号)
3、点击复制按钮,将密码复制,同时启动Timer控件
4、将密码复制到要输入的地方
5、5秒慎哪局钟后他Timer控件清空复制的内容
分类: 电脑/网络 >>程序设计 >>其他编程语言问题描述:
运行一个有密码的EXE
用户可洞高岩以自己改密码,并且下次开机运行后使用改过的密码?
只要程序和具体步骤哦
解析:
不太明白。给你个方向吧,如果不想用数据库,就用.ini文件吧。当然ini存放内容能加密就更好了,
我不太熟悉vb具体的程序不能给你,你可以按这个方法尝试一下:
1、程序启动的时候出现密码输入窗口。
2、在窗口的载入事件里读入ini文件的内容,(若是只有一个密码在ini文件里就只放他,)
3、输入密码后将输入内容和和ini 内容对纳御比若是一致就成功,要是不一致不就是非法用户了么?
另你要是加密的话解密的过程就是将每次输入的念旅内容经过和修改密码是加密的函数一样的方法再加密一次然后对比
'2个窗体(form1,form2) 2个textbox(text1,text2) 1个commandbutton (command1)'text1 为账慎庆号框,text2为密码框,command1为登录按钮
Dim cCount As Long
Private Sub Command1_Click()
If LCase(Text1.Text) = "abc" And Text2.Text = "123" Then'账号abc(不区分大小写) ,密码123
cCount = 1
Form2.Show
'Unload Me
Else
If cCount = 3 Then
MsgBox "密码不正确且密码搭桥3次错误"
Unload Me
Else
MsgBox "宽枝握密码不正确"
cCount = cCount + 1
End If
End If
End Sub
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Text2.PasswordChar = "*"
cCount = 1
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)