//如文件所在目录C:\XXX.txt //文本内容格式如下: //账号*密码*区 //账号*密码*区 //账号*密码*区 //怎么办呢?先读取文本到Text Text = Plugin.File.ReadFileEx("C:\XXX.txt") arr1 = split(Text, "|")'再用“|”分割每行存为数组 For i = 0 To UBound(arr1) - 1'循环数组到最大下标,要减1,因为是从0开始 TracePrint arr1(i)'输出当前行 arr2 = split(arr1(i), "*")'再用“*”分割当前行的,账号与密码等 TracePrint arr2(0)'数组的0位就是账号 TracePrint arr2(1)'数组的1位就是密码 TracePrint arr2(2)'数组的2位就是区 账号= arr2(0) 密码= arr2(1) 区=arr2 (2) //这样你就获得当前一行的账号与密码与区了 //接下来就是写个函数如“账号输入”将获得的账号与密码等传递进去,这个自己根椐实际情况写 Call 账号输入(账号, 密码, 区) //下面标记一下已登陆,我用整行替换方法。 Call lib.文件.替换指定行文本内容("C:\XXX.txt",账号&"*"&密码&"*"&区&"*"&"已登陆",i) Next |
|