按键精灵-自动输入帐号和密码

2024-12-12 05:55:48
推荐回答(2个)
回答1:

//前提是光标在输帐号框里面闪动
GG=InputBox("请输入您的帐号!!!"&Vbcrlf&"无内容输入时直接按[确定]或[取消]退出!!!")
If StrComp("",GG)=0 Then
Goto 结束
End If
MM=InputBox("请输入您的密码!!!"&Vbcrlf&"无内容输入时直接按[确定]或[取消]退出!!!")
If StrComp("",MM)=0 Then
Goto 结束
End If
KEY=InputBox("请输入启动按键码! 如:F1~F12键为112~123码;a~z键为65~90码;"&Vbcrlf&"无内容输入时直接按[确定]或[取消]退出!!!")
If StrComp("",KEY)=0 Then
Goto 结束
End If
//转换按键码
KEY=CInt(KEY)
Rem ID
Delay 100
K=WaitKey()
//122为F11键(只要在你的脚本加入按F11键就可以)
If K=KEY Then
//GG为帐号
SayString GG
Delay 500
KeyPress 9 ,1
Delay 200
//MM为密码
SayString MM
Delay 500
KeyPress 13, 1
End If
Goto ID
Rem 结束
EndScript

回答2:

//假设"账号密码.txt" 存有一行“zhh123,mm456” (不含引号,逗号前面为账号,后面为密码)
Text = Plugin.File.ReadFileEx("D:\帐号密码.txt") //读取帐号密码,存到text.
arr=split(text,",") //以逗号为界,分割成两个字符串,放到数组中。
MoveTo zhx, zhy //鼠标移动到帐号输入框里
LeftClick 1 //单击左键。
SayString arr(0) //在当前光标下输入字符串(帐号,zhh123)。
MoveTo mmx, mmy
LeftClick 1
SayString arr(1)