Question

按键精灵问题，怎样用数组输入不同的账号

比如，我有50个qq号，我先登录第一个qq号码，操作完成后退出在登录第二个qq号码，以此类推，怎样用按键精灵数组代码来完成这50个qq号码和密码循环登录。有知道的请赐教，要代码，详细些比较好。直接回答和发我邮箱都行 邮箱：112169073@qq.com
最好给弄个实例代码，这样我这个初学者能看懂，写实例代码就以5个qq号码和密码循环登陆就可以，就是怎样读取账号和密码，然后怎样把读取到的账号和密码怎样写入账号和密码框内，怎样循环，要比较详细的代码。谢谢

Answer 1

Text = Plugin.File.ReadFileEx("d:\新建 文本文档 (2).txt")//文档位置你自己改，QQ帐号跟密码一句一行。
dim MyArray
MyArray = Split(Text, "|")
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray)/2
Call Lib.API.运行程序("C:\Program Files\Tencent\QQ\Bin\QQ.exe")//QQ位置
Delay 10000
//QQ登陆输入帐号坐标位置，没用找字找图，系统不一样，不好用，坐标自己找。
MoveTo 761,246
Delay 500
LeftClick 1
Delay 500
//下面这句是得到文本内容
SayString Cstr(MyArray(i))
Delay 300
KeyPress "Tab", 1
Delay 300
KeyPress "BackSpace", 20
Delay 300
//分隔密码，逐个模拟输出，密码里不能有组合键。
str = Cstr(MyArray(i+1))
//MessageBox str
For j = 1 To Len(str)
k= Mid(str,j,1)
KeyPress k,1
Next
Delay 200
moveto 861,343
Delay 200
LeftClick 1
Delay 1000
i=i+2
Next
End If

没试过，有点逻辑小错误可能，密码不能有组合键。加你QQ了，叫仙豆，有问题再问。