|
发表于 2015-11-24 08:53:26
|
显示全部楼层
///////////////////////昨晚正好帮朋友写了个。你参考下
变量 账号=数组(),账号数量=0,当前,线程ID
功能 按钮0_点击()/////////////////////////////////////开始
变量 文件=文件读取内容(浏览框获取文本("浏览框0"))
如果(浏览框获取文本("浏览框0")=="")
消息框("账号为空,请重新导入")
否则
字符串分割(文件,"\r\n",账号)
账号数量=数组大小(账号)
调试输出(账号数量)
变量 现在=编辑框获取文本("编辑框0")
如果(现在!="")
当前=现在
否则
当前=0
结束
调试输出(当前)
控件是否有效("按钮0",假)
结束
功能 主线()
调试输出("进入主线")
变量 账密
调试输出(当前)
调试输出(账号数量)
如果(当前=="")
消息框("请先点击开始")
否则
如果(当前>=账号数量)
消息框("账号已用完")
否则
字符串分割(账号[当前],"----",账密)
调试输出(账密[0]&"----"&账密[1])
超级键盘发送字符串(账密[0],50)
等待(500)
超级键盘按键(13)
等待(500)
超级键盘发送字符串(账密[1],50)
等待(500)
超级键盘按键(13)
当前++
结束
结束
结束
功能 启动_热键()
线程ID=线程开启("主线","")
结束
|
|