常用的读写文件的命令有这些: File.Read 、File.Write、File.ReadLines、 File.ReadLine

File.Read

 

命令名称 File.Read
命令功能 读取文件内容
命令参数 FileName:字符串型,为文件绝对路径
返回值 字符串型,为读出的内容

 

命令名称 File.Write
命令功能 写入文件内容
命令参数 FileName:字符串型,为文件绝对路径
str:字符串型,为待写入文本的内容
返回值 无

范例:

  1. Dim 返回值
  2. //写入文本信息（路径，内容）
  3. Call File.Write(“/sdcard/MobileAnjian/anjian.txt”,”我爱按键精灵”)
  4. // 读anjian.txt文本的内容
  5. 返回值=File.Read(“/sdcard/MobileAnjian/anjian.txt”)
  6. ShowMessage 返回值
  7. Delay 2000
  8. //写入多行内容
  9. Call File.Write(“/sdcard/MobileAnjian/anjian.txt”, “我爱按键精灵\n我爱按键精灵”)
  10. 返回值=File.Read(“/sdcard/MobileAnjian/anjian.txt”)
  11. ShowMessage 返回值
  12. Delay 2000

复制代码

上面代码展示了读写文件的命令的使用方法. 读取和写入的内容都需要是字符串类型. 当文本的内容有多行时读取命令也会把换行读取出来. 在使用traceprint命令输出时是查看不出来, 需要使用showmessage命令来查看, 就可以发现读取出来的内容是携带换行.

File.ReadLines

 

命令名称 File.ReadLines
命令功能 读取文本文件内容,存为数组
命令参数 FileName:字符串型,为文件绝对路径
返回值 返回数组,由读取每一行的字符串组成

范例:
想要把这个文本里每行的内容读取出来

  1. Dim 账号数组
  2. 账号数组 = File.ReadLines(“/sdcard/MobileAnjian/zhanghao.txt”)
  3. For Each v in 账号数组
  4. TracePrint “当前行的内容是: ” & v
  5. Next

复制代码

这种读取内容成数组的命令好处在于方便处理多行的内容, 可以先把文本的内容读取存到数组里, 之后只需要读取数组就好了, 提高效率和便捷性

File.ReadLine

 

命令名称 File.ReadLine
命令功能 读取文本文件中指定行的内容
命令参数 FileName:字符串型,为文本文件路径
Line:整数型,欲读取内容的行数号
返回值 字符串型,为读出的指定行内容

范例

  1. Dim 内容,行数
  2. // 读取文本总共有多少行
  3. 行数 = File.LinesNumber(“/sdcard/MobileAnjian/zhanghao.txt”)
  4. For i=1 to 行数
  5. 内容 = file.Readline(“/sdcard/MobileAnjian/zhanghao.txt”, i)
  6. TracePrint “当前第” & i & “行的内容是: ” & 内容
  7. next

复制代码

这个命令可以单独读取多行文本中的指定的行. 可以配合删除指定行的命令来实现读取一行删一行的功能

  1. Dim 内容,行数
  2. // 读取文本总共有多少行
  3. 行数 = File.LinesNumber(“/sdcard/MobileAnjian/zhanghao.txt”)
  4. For 行数
  5. 内容 = file.Readline(“/sdcard/MobileAnjian/zhanghao.txt”, 1)
  6. call File.DeleteLine(“/sdcard/MobileAnjian/zhanghao.txt”,1)
  7. Next

复制代码

这个代码就实现了读取循环读取文本的第一行, 读取完毕后就删除第一行. 因为每次删除第一行之后原本第二行的内容就会变成第一行, 所以循环结构里只需要读取和删除第一行就可以了.

简单的自动换号

可以通过读取文本以及for循环来配合使用, 这里就来简单的模拟一下自动换号的功能.
这里的思路是先把多个账号和密码按照一定的格式保存到文本里, 然后再把文本读取到数组里, 循环读取每个元素的内容, 提取出账号和密码, 进行输入

  1. Dim 内容数组,行数,路径,账号,密码,分割内容
  2. 路径 = “/sdcard/MobileAnjian/zhanghao.txt”
  3. // 读取文本内容为数组,遍历数组每一行内容
  4. 内容数组 = File.ReadLines(路径)
  5. For Each 内容 In 内容数组
  6. // 把账号和密码分割开
  7. 分割内容 = split(内容,”–“)
  8. 账号 = 分割内容(0)
  9. 密码 = 分割内容(1)
  10. // 点击账号输入框坐标, 输入账号
  11. Tap 100, 200
  12. Delay 500
  13. InputText 账号
  14. Delay 1000
  15. // 点击密码输入框,输入密码
  16. Tap 200,300
  17. Delay 500
  18. InputText 密码
  19. Next

复制代码

 

声明：
本站所有文章，如无特殊说明或标注，均为本站原创发布。
任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。
如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。