按键精灵在一个循环里输入几个不同账号密码_按键精灵吧

按键精灵吧关注：500,531贴子：1,031,411

9回复贴，共1页

按键精灵在一个循环里输入几个不同账号密码

text=Plugin.File.ReadFileEx("C:\网通二区.txt")
Marry = split(text, "|")
For n0 = 0 To UBound(Marry)-1
Next
n0 = 0
Do
hwnd = Plugin.Window.find(0, "登录")
TracePrint hwnd
If hwnd>0 Then
text1 = split(Marry(n0), ",")
帐号 = text1(0)
密码 = text1(1)
MoveTo 699,511//输入账号坐标
For n = 1 To len(帐号)
k=mid(帐号,n,1)
Delay 30
KeyPressS asc(ucase(k)),1
Next
MoveTo 666,570//输入密码坐标
For n = 1 To len(密码)
k=mid(密码,n,1)
Delay 30
KeyPressS asc(ucase(k)),1
Next
Delay 500
MoveTo 633,617//确定
Delay 500
LeftClick 1
Else
End If
Delay 800
text11=join(text1,",")&"---已登录"
Call Lib.文件.替换指定行文本内容("C:\网通二区.txt",text11,n0+1)
n0 = n0 + 1
If n0 >= UBound(Marry) Then
MessageBox "帐号已经全部登录完毕"
EndScript
End If
Loop
上里是一个循环输入一个账号和密码

送TA礼物

IP属地:广东

1楼2017-09-20 01:34回复

你的什么问题啊，代码不看

来自Android客户端2楼2017-09-20 11:03

收起回复

不感兴趣

开通SVIP免广告

3楼2017-09-22 20:59

我貌似在知道里面回复你了~~

4楼2017-09-23 01:14

看得出你的代码很混乱本来一个循环一个帐号可以用 for循环的,但是你的for循环是空的
一个循环内输入2个帐号其实也可以用for i = 0 to xx step x 的不过最小幅度的修改你的代码如下！
text=Plugin.File.ReadFileEx("C:\网通二区.txt")Marry = split(text, "|")no = 0 : 个数 = 2
Do
hwnd = Plugin.Window.find(0, "登录")
TracePrint hwnd
If hwnd > 0 Then
For 个数
text1 = split(Marry(n0), ",")
帐号 = text1(0) : 密码 = text1(1)
MoveTo 699,511//输入账号坐标
For n = 1 To len(帐号)
k=mid(号,n,1)
Delay 30
KeyPressS asc(ucase(k)),1
Next
MoveTo 666,570//输入密码坐标
For n = 1 To len(密码)
k=mid(码,n,1)
Delay 30
KeyPressS asc(ucase(k)),1
Next
Delay 500
MoveTo 633,617//确定
Delay 500
LeftClick 1
text11=join(text1,",")&"---已登录"
Call Lib.文件.替换指定行文本内容("C:\网通二区.txt", text11, n0 + 1)
n0 = n0 + 1
Next
Else
TracePrint "没找到登录窗口"
End If
Delay 1000
Loop Until n0 > UBound(Marry)
TracePrint "帐号已经全部登录完毕"
//制作:法科
//时间:2017-09-22
//QQ:416161561

5楼2017-09-23 01:18

收起回复