如何将运行目录的TXT文件里面的账号和密码，每一行账号和密码剪切分别填入指定的AP...

yangge0452

这个加了编辑框，不用的可以自己修改

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

载入 (窗口1, , 假)
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
_指针到整数	整数型
参数名	类 型	参考	可空	数组	备 注
指针	整数型

置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })
返回 (0)

子程序名	返回值类型	公开	备 注
取变量内存地址	整数型
参数名	类 型	参考	可空	数组	备 注
变量	通用型

置入代码 ({ 139, 69, 8, 201, 194, 4, 0 })
返回 (0)

子程序名	返回值类型	公开	备 注
_窗口1_尺寸被改变

变量名	类 型	静态	数组	备 注
a	整数型
b	整数型
c	整数型
d	整数型

a ＝ 取用户区宽度 ()
b ＝ 取用户区高度 ()
c ＝ 60
d ＝ 32
高级表格.移动 (0, 0, a, b － d)
编辑框1.移动 (0, 高级表格.高度, a － c, d)
按钮1.移动 (编辑框1.左边 ＋ 编辑框1.宽度, 编辑框1.顶边, c, d)

子程序名	返回值类型	公开	备 注
_窗口1_创建完毕

高级表格.表格线颜色 ＝ #藏青
高级表格.背景颜色 ＝ #白色
高级表格.文字颜色 ＝ #黑色
高级表格.点燃色 ＝ #红色
高级表格.表头背景颜色 ＝ #天蓝
高级表格.选择区背景 ＝ #银白
高级表格.选择区文字颜色 ＝ #蓝色
高级表格.客户区背景颜色 ＝ 高级表格.背景颜色
高级表格.列数 ＝ 3
高级表格.置列宽 (0, 50)
高级表格.置列宽 (1, 150)
高级表格.置列宽 (2, 150)
高级表格.置xx (0, 0, 1, “序号”)
高级表格.置xx (0, 1, 1, “账号”)
高级表格.置xx (0, 2, 1, “密码”)
高级表格.置行高 (0, 28)
拖放对象1.接收文件 ＝ 真
拖放对象1.zc拖放控件 (取窗口句柄 ())
编辑框1.内容 ＝ 取运行目录 () ＋ “\第1个文件.txt”

子程序名	返回值类型	公开	备 注
_拖放对象1_得到文件			支持多个文件一起拖入
参数名	类 型	参考	可空	数组	备 注
接收到的文件路径	文本型

启动线程 (&处理账号文件, _指针到整数 (取变量内存地址 (接收到的文件路径)), )
延迟 (10)

子程序名	返回值类型	公开	备 注
处理账号文件			不需要那么复杂，我讲究一切从简
参数名	类 型	参考	可空	数组	备 注
文件路径	文本型

变量名	类 型	静态	数组	备 注
路径数组	文本型		0
分割符	文本型
计次	整数型
文件号	整数型
单行文本	文本型
单行分割	文本型		0
行	整数型

路径数组 ＝ 分割文本 (文件路径, #换行符, )
分割符 ＝ “----”
计次循环首 (取数组成员数 (路径数组), 计次)
文件号 ＝ 打开文件 (路径数组 [计次], #读入, #禁止写 )
如果真 (文件号 ≠ 0)
判断循环首 (是否在文件尾 (文件号, ) ＝ 假)
单行文本 ＝ 读入一行 (文件号)
单行分割 ＝ 分割文本 (单行文本, 分割符, )
' 每个账号最低一个字符 0代表账号的最低数-1，这个数根据自己实际情况修改
如果真 (寻找文本 (单行文本, 分割符, , 假) ＞ 0 且 取数组成员数 (单行分割) ＞ 1)
行 ＝ 高级表格.行数
高级表格.插入行 (到文本 (行), 行)
高级表格.置xx (行, 1, 1, 单行分割 [1])
高级表格.置xx (行, 2, 1, 单行分割 [2])
高级表格.置行高 (行, 18)

判断循环尾 ()
关闭文件 (文件号)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
a	文本型

a ＝ 编辑框1.内容
如果真 (a ≠ “” 且 文件是否存在 (a))
启动线程 (&处理账号文件, _指针到整数 (取变量内存地址 (a)), )
延迟 (10)

i支持库列表	支持库注释
eGrid	高级表格支持库
edroptarget	拖放支持库
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 eGrid<br /> .支持库 edroptarget<br /> .支持库 EThread<br /> .支持库 spec<br /> .程序集 窗口程序集_窗口1<br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> 载入 (窗口1, , 假)<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> .子程序 _指针到整数, 整数型<br /> .参数 指针, 整数型<br /> 置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<br /> 返回 (0)<br /> .子程序 取变量内存地址, 整数型<br /> .参数 变量, 通用型, 参考<br /> 置入代码 ({ 139, 69, 8, 201, 194, 4, 0 })<br /> 返回 (0)<br /> .子程序 _窗口1_尺寸被改变<br /> .局部变量 a, 整数型<br /> .局部变量 b, 整数型<br /> .局部变量 c, 整数型<br /> .局部变量 d, 整数型<br /> a ＝ 取用户区宽度 ()<br /> b ＝ 取用户区高度 ()<br /> c ＝ 60<br /> d ＝ 32<br /> 高级表格.移动 (0, 0, a, b － d)<br /> 编辑框1.移动 (0, 高级表格.高度, a － c, d)<br /> 按钮1.移动 (编辑框1.左边 ＋ 编辑框1.宽度, 编辑框1.顶边, c, d)<br /> .子程序 _窗口1_创建完毕<br /> 高级表格.表格线颜色 ＝ #藏青<br /> 高级表格.背景颜色 ＝ #白色<br /> 高级表格.文字颜色 ＝ #黑色<br /> 高级表格.点燃色 ＝ #红色<br /> 高级表格.表头背景颜色 ＝ #天蓝<br /> 高级表格.选择区背景 ＝ #银白<br /> 高级表格.选择区文字颜色 ＝ #蓝色<br /> 高级表格.客户区背景颜色 ＝ 高级表格.背景颜色<br /> 高级表格.列数 ＝ 3<br /> 高级表格.置列宽 (0, 50)<br /> 高级表格.置列宽 (1, 150)<br /> 高级表格.置列宽 (2, 150)<br /> 高级表格.置xx (0, 0, 1, “序号”)<br /> 高级表格.置xx (0, 1, 1, “账号”)<br /> 高级表格.置xx (0, 2, 1, “密码”)<br /> 高级表格.置行高 (0, 28)<br /> 拖放对象1.接收文件 ＝ 真<br /> 拖放对象1.zc拖放控件 (取窗口句柄 ())<br /> 编辑框1.内容 ＝ 取运行目录 () ＋ “\第1个文件.txt”<br /> .子程序 _拖放对象1_得到文件, , , 支持多个文件一起拖入<br /> .参数 接收到的文件路径, 文本型<br /> 启动线程 (&处理账号文件, _指针到整数 (取变量内存地址 (接收到的文件路径)), )<br /> 延迟 (10)<br /> .子程序 处理账号文件, , , 不需要那么复杂，我讲究一切从简<br /> .参数 文件路径, 文本型<br /> .局部变量 路径数组, 文本型, , "0"<br /> .局部变量 分割符, 文本型<br /> .局部变量 计次, 整数型<br /> .局部变量 文件号, 整数型<br /> .局部变量 单行文本, 文本型<br /> .局部变量 单行分割, 文本型, , "0"<br /> .局部变量 行, 整数型<br /> 路径数组 ＝ 分割文本 (文件路径, #换行符, )<br /> 分割符 ＝ “----”<br /> .计次循环首 (取数组成员数 (路径数组), 计次)<br />     文件号 ＝ 打开文件 (路径数组 [计次], #读入, #禁止写)<br />     .如果真 (文件号 ≠ 0)<br />         .判断循环首 (是否在文件尾 (文件号, ) ＝ 假)<br />             单行文本 ＝ 读入一行 (文件号)<br />             单行分割 ＝ 分割文本 (单行文本, 分割符, )<br />             ' 每个账号最低一个字符 0代表账号的最低数-1，这个数根据自己实际情况修改<br />             .如果真 (寻找文本 (单行文本, 分割符, , 假) ＞ 0 且 取数组成员数 (单行分割) ＞ 1)<br />                 行 ＝ 高级表格.行数<br />                 高级表格.插入行 (到文本 (行), 行)<br />                 高级表格.置xx (行, 1, 1, 单行分割 [1])<br />                 高级表格.置xx (行, 2, 1, 单行分割 [2])<br />                 高级表格.置行高 (行, 18)<br />             .如果真结束<br />         .判断循环尾 ()<br />     .如果真结束<br />     关闭文件 (文件号)<br /> .计次循环尾 ()<br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 文本型<br /> a ＝ 编辑框1.内容<br /> .如果真 (a ≠ “” 且 文件是否存在 (a))<br />     启动线程 (&处理账号文件, _指针到整数 (取变量内存地址 (a)), )<br />     延迟 (10)<br /> .如果真结束

啊D

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
分割账号密码1	文本型	0
分割账号密码2	文本型	0

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
计次	整数型

分割账号密码1 ＝ 分割文本 ( #账号密码, #换行符, )
分割账号密码2 ＝ 分割文本 (分割账号密码1 [1], “----”, )
计次循环首 (取数组成员数 (分割账号密码2), 计次)
编辑框1.内容 ＝ 分割账号密码2 [1]
调试输出 (“账号：”, 分割账号密码2 [1])
编辑框2.内容 ＝ 分割账号密码2 [2]
调试输出 (“密码：”, 分割账号密码2 [2])
' 你没给出要模拟操作哪个APP剩下的就你自己写把
' 代码代码代码
计次循环尾 ()
信息框 (“运行完毕”, 0, , )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 分割账号密码1, 文本型, , "0"<br /> .程序集变量 分割账号密码2, 文本型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 计次, 整数型<br /> <br /> 分割账号密码1 ＝ 分割文本 (#账号密码, #换行符, )<br /> 分割账号密码2 ＝ 分割文本 (分割账号密码1 [1], “----”, )<br /> .计次循环首 (取数组成员数 (分割账号密码2), 计次)<br />     编辑框1.内容 ＝ 分割账号密码2 [1]<br />     调试输出 (“账号：”, 分割账号密码2 [1])<br />     编辑框2.内容 ＝ 分割账号密码2 [2]<br />     调试输出 (“密码：”, 分割账号密码2 [2])<br />     ' 你没给出要模拟操作哪个APP剩下的就你自己写把<br />     ' 代码代码代码<br /> <br /> .计次循环尾 ()<br /> 信息框 (“运行完毕”, 0, , )

ldy123

9月

test.zip (1.73 KB, 下载次数: 0)

2020-3-19 09:56 上传

点击文件名下载附件 不知道是不是这样

1185384801

https://bbs.125.la/forum-215-1.html
在这里发贴就可以了

wzdx

您可以把他**INI，分节读取就可以了

huyaya

这个好弄，看楼上

气死神了

文本_分割文本，，，按照你的分隔符去分割，，每行分割一次，然后账号密码分割一次，就是了