• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.05
软件大小:21.6M
更新时间:07-04

按键精灵安卓版
立即下载

软件版本:3.3.0
软件大小:62.5M
更新时间:5-24

按键精灵iOS版
立即下载

软件版本:1.3.3
软件大小:29.2M
更新时间:06-14

按键精灵Mac版
立即下载

软件版本:1.1.0
软件大小:12.3M
更新时间:12-29

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
返回列表 12345678» / 20
发新话题 回复该主题

[教程心得] 【山海教程】【零基础学按键】学习文件读取命令 [复制链接]

1#


零基础,轻松学习安卓按键,大家好,我是山海师~~~

今天的教程是给大家带来文件命令的使用, 文件读写命令也算是在安卓按键中比较常用的命令, 比较多的用来在手机上保存一些数据, 或者用于实现批量换号等等功能的实现.

>>>>总目录贴入口<<<<


常用的读写文件的命令有这些: File.Read 、File.WriteFile.ReadLinesFile.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
复制代码

关于自动换号的教程大家还可以的参考下这两篇院刊:


用安卓按键来实现自动换号 -【201509期】

优雅的进行账号密码的输入 - 【201509期】





赠人玫瑰手有余香~~~你的一个顺手回复也许就可以让这个帖子给更多的人看到,就能帮助更多的人~~~

最后编辑quitout 最后编辑于 2016-08-29 14:19:29
本主题由 管理员 青黛 于 2018/3/1 17:25:54 执行 审核帖子 操作
2#

呃呃的

3#

顶顶

4#

必须学习

5#

山海教程】【零基础学按键】学习文件读取命令

[url=http://bbs.anji
6#

谢谢山海师老师

7#

看看怎么样

8#

Cckvkclc

9#

谢谢啊

10#

噼噼啪啪

11#

看一看...学一学

12#

山海的教程都很有用,必须收藏

13#

我是来学习的

14#

顶一个


各类脚本定制
QQ: 2776500271
15#

36个赞赞你

16#

的方法反反复复飞

17#

32323423442342323

18#

怎么这么多需要回复的?

19#

学习.

本 来 无 一 物, 何 处 惹 尘 埃.
20#

开看

发新话题 回复该主题