【院刊】-【201410期】记事本风云之游戏批量登录账号 _ 学院院刊

查看: 68679\|回复: 396	[技术交流] 【院刊】-【201410期】记事本风云之游戏批量登录账号 [复制链接]

果兒

组别初中三年级
UID2220985
帖子396
精华0
鲜花522 朵
铜币2506 个
银币334 个
在线时间480
注册时间2013-10-27

1^#

字体大小: t T

发表于 2014-10-08 14:38 | |只看楼主

记事本风云之游戏批量登录账号

记事本是个好东西，我们写脚本的时候，时常会用到它。拿它记录数据，存放结果等等。这么重要的东西，忍不住想多了解下

热身准备

首先，把编辑好的记事本放到按键精灵附件里，以便后面释放使用。

记事本里面的原始内容，是账号密码的设置格式，账号和密码之间要设置分隔符，方便之后读取。

如图：

: 您所在的用户组无法下载或查看附件

释放附件代码：

PutAttachment "G:\test", "游戏账号.txt"

复制代码

例子中，将游戏账号文本释放到G盘下的test文件夹中。

读取账号密码

: 您所在的用户组无法下载或查看附件

需要用到ReadFileEx读取文件命令,

先将文本里的所有内容读取存入到变量text中

代码：

Text = Plugin.File.ReadFileEx("G:\test\游戏账号.txt")
Msgbox "向目标文件读出文本内容为："& Text

复制代码

输出：

: 您所在的用户组无法下载或查看附件

我们看到的是变量text中存放的文本内容，文本中的回车换行符是被当做竖线读取的。

这些竖线是至关重要的，有了它，我们才能将文本里每行的内容分割出来，用split函数分割，分割之后的内容存放到数组my中：

my = split(Text, "|")

复制代码

数组中存放的数据：

my(0): 账号格式：账号,密码例如：zhanghao,mima123

my(1): zhanghao1,mima123

my(2): zhanghao2,mima123

my(3): zhanghao3,mima123

my(4): zhanghao4,mima123

问题来了，例如数组 my(1)中，存放的是账号和密码，账号和密码直接用逗号隔开，所以说，我们还需要分割一次，才能获取到账号和密码。

two = split(my(1), ",")

复制代码

分割之后，数组two里有两个元素，two(0)存放的是账号，two(1)中存放的是密码。

全部代码：

Text = Plugin.File.ReadFileEx("G:\test\游戏账号.txt") //读取文本内容
my = split(Text, "|") //分割每行文本内容
j = UBound(my) //计算数组元素几个
For i= 1 to j-1 //数组my（0）里存放的是提示信息，所以这里从my（1）开始
two = split(my(i), ",") //分割账号和密码
TracePrint "账号" & i & "：" & two(0)
//把读取的账号输入到游戏账号框
TracePrint "密码：" & two(1)
//把读取的密码输入到游戏密码框
Next

复制代码

删除账号密码

想登录好一个账号就删除一个账号怎么实现呢？
我们可以使用命令库中的删除指定行文本内容，在读取输入好一行账号密码之后马上删除当前行

: 您所在的用户组无法下载或查看附件

全部命令——>我的命令库——>文件——>删除指定行文本内容(文本路径,行数)

代码：

Text = Plugin.File.ReadFileEx("G:\test\游戏账号.txt") //读取文本内容
my = split(Text, "|") //分割每行文本内容
j = UBound(my) //计算数组元素几个
For i= 1 to j-1 //数组my（0）里存放的是提示信息，所以这里从my（1）开始
two = split(my(i), ",") //分割账号和密码
TracePrint "账号" & i & "：" & two(0)
//把读取的账号输入到游戏账号框
TracePrint "密码：" & two(1)
//把读取的密码输入到游戏密码框
Call Lib.文件.删除指定行文本内容("G:\test\游戏账号.txt", 2)
//删除指定行文本内容
Next

复制代码

注意：[backcolor=rgb(247, 247, 247)]Call Lib.文件.删除指定行文本内容("G:\test\游戏账号.txt", 2) 为什么是设置删除第二行呢？因为小编的文本里，第一行是作为提示信息的，所以从第二行开始删除，第二行删除之后，第三行进到第二行，所以每次都是删除第二行。

插入新的内容

【插入内容1】

例如，我一个账号登录过了，我想要在账号后面备注下，已登录，要如何实现？

: 您所在的用户组无法下载或查看附件

我们需要使用到命令库里的替换指定行内容的命令:

: 您所在的用户组无法下载或查看附件

步骤：

1、用join函数把被我们分割多的two数组在用分隔符逗号连接起来，还原他原来的样子，然后再&上“—已登录”这一字符串一起存放到变量m中。
2、用替换指定行内容命令，将原先的账号内容替换成变量m里的内容
（ * [backcolor=rgb(247, 247, 247)]我们要修改一行里的文本内容时，也可以运用替换指定行内容来实现，获取不需要修改的文本&上要修改的部分，然后替换掉原来的文本内容即可）

代码：

Text = Plugin.File.ReadFileEx("G:\test\游戏账号.txt") //读取文本内容
my = split(Text, "|") //分割每行文本内容
j = UBound(my) //计算数组元素几个
For i= 1 to j-1 //数组my（0）里存放的是提示信息，所以这里从my（1）开始
two = split(my(i), ",") //分割账号和密码
TracePrint "账号" & i & "：" & two(0)
//把读取的账号输入到游戏账号框
TracePrint "密码：" & two(1)
//把读取的密码输入到游戏密码框
m = Join(two,",")&"—已登录"
Call Lib.文件.替换指定行文本内容("G:\test\游戏账号.txt",m,i+1)
Next

复制代码

注意：[backcolor=rgb(247, 247, 247)]Call Lib.文件.替换指定行文本内容("G:\test\游戏账号.txt",m,i+1) 这里为什么是从i+1行开始呢？因为数组的下标是从0开始，而替换指定行内容的命令库里的行数是从1开始，所以要加上1

【插入内容2】

这种插入内容的方式，是在一行文本后面添加新的内容，如果我们要实现新起一行添加内容呢？
比如，我们设置一个按钮，用户点击添加之后，账号和密码就添加到我们的账号文本里
这里我们要用到命令库里的插入内容到指定行的命令

: 您所在的用户组无法下载或查看附件

步骤:

1、画两个输入框，[backcolor=rgb(247, 247, 247)]InputBox1用于输入账号，[backcolor=rgb(247, 247, 247)]InputBox2用于输入密码
2、画一个命令按钮，点击之后，将两个输入框里的账号密码插入到文本最末行

参考代码：

Event Form1.Button1.Click
Text = Plugin.File.ReadFileEx("G:\test\游戏账号.txt") //读取文本内容
my = split(Text, "|") //分割每行文本内容
j = UBound(my)//计算数组元素几个
m=Form1.InputBox1.Text &","& Form1.InputBox2.Text
Call Lib.文件.插入文本内容到指定行("G:\test\游戏账号.txt", m, j)
//数组共有五个元素，j=5 将内容插入到第五行后面，即在第六行写入 "新添加的账号"
End Event

复制代码

结果：

: 您所在的用户组无法下载或查看附件

如果童鞋们对于本帖里的内容有疑问或者有其它的思路，欢迎跟帖讨论~~

本文由按键学院提供技术支持

按键学院实战班（入驻最终幻想）火热招生

按键学院基础视频抢先观看

点评

times701 这才是实力教学发表于 2016/10/19 22:08:46

已有3评分我要评分查看所有评分

本主题由超级版主瑞祥幽冥狼于 2023/8/13 22:33:46 执行审核帖子操作

按键学院免费交流群：376122403

按键学院招生计划
按键学院系统教程

回顶部

发送短消息 UID 1277341 帖子 66 精华 0 鲜花 0 朵铜币 123 个银币 0 个性别在线时间 1880 注册时间 2012-08-17 最后登录 2020-09-16 12345 查看公共资料搜索主题搜索帖子 lizhong001 lizhong001 组别小学三年级 UID1277341 帖子66 精华0 鲜花0 朵铜币123 个银币0 个在线时间1880 注册时间2012-08-17	2^# 字体大小: t T 发表于 2016-10-20 15:33 \| \|只看该用户 22223


	回顶部

发送短消息 UID 3749983 帖子 52 精华 0 鲜花 0 朵铜币 107 个银币 1 个性别在线时间 1780 注册时间 2016-02-09 最后登录 2024-03-17 1175057271 查看公共资料搜索主题搜索帖子寻梦像扑火寻梦像扑火组别小学三年级 UID3749983 帖子52 精华0 鲜花0 朵铜币107 个银币1 个在线时间1780 注册时间2016-02-09	3^# 字体大小: t T 发表于 2016-10-21 09:40 \| \|只看该用户不错不错


	回顶部

发送短消息 UID 1407529 帖子 18 精华 0 鲜花 -2 朵铜币 83 个银币 -2 个性别在线时间 2280 注册时间 2012-11-05 最后登录 2022-11-02 403302780 查看公共资料搜索主题搜索帖子 chp0768 chp0768 组别小学一年级 UID1407529 帖子18 精华0 鲜花-2 朵铜币83 个银币-2 个在线时间2280 注册时间2012-11-05	4^# 字体大小: t T 发表于 2016-10-21 11:11 \| \|只看该用户多看看多学学


	回顶部

发送短消息 UID 3687774 帖子 176 精华 0 鲜花 13 朵铜币 672 个银币 232 个性别在线时间 4900 注册时间 2016-01-05 最后登录 2024-01-18 查看公共资料搜索主题搜索帖子萌萌小爱萌萌小爱组别初中一年级 UID3687774 帖子176 精华0 鲜花13 朵铜币672 个银币232 个在线时间4900 注册时间2016-01-05 过大年勋章俩小福娃给大家拜年啦！按键精灵开发者4级可通过提升认证等级来升级勋章：rz.anjian.com	5^# 字体大小: t T 发表于 2016-10-23 23:23 \| \|只看该用户大大大哇撒此次宣传中心


	回顶部

发送短消息 UID 2894277 帖子 39 精华 0 鲜花 0 朵铜币 123 个银币 0 个性别在线时间 1240 注册时间 2014-11-24 最后登录 2016-12-30 12345 查看公共资料搜索主题搜索帖子 mengms@qq.com mengms@qq.com 组别小学二年级 UID2894277 帖子39 精华0 鲜花0 朵铜币123 个银币0 个在线时间1240 注册时间2014-11-24	6^# 字体大小: t T 发表于 2016-10-24 17:27 \| \|只看该用户学习


	回顶部

发送短消息 UID 330896 帖子 11 精华 0 鲜花 0 朵铜币 30 个银币 0 个性别在线时间 300 注册时间 2009-11-16 最后登录 2021-11-17 310056610 查看公共资料搜索主题搜索帖子 asdfg3269 asdfg3269 组别幼儿园 UID330896 帖子11 精华0 鲜花0 朵铜币30 个银币0 个在线时间300 注册时间2009-11-16	7^# 字体大小: t T 发表于 2016-10-25 01:24 \| \|只看该用户学习


	回顶部

发送短消息 UID 1348935 帖子 61 精华 0 鲜花 5 朵铜币 124 个银币 57 个性别在线时间 1320 注册时间 2012-10-04 最后登录 2023-02-28 282904582 查看公共资料搜索主题搜索帖子 zhouchiyan83 zhouchiyan83 组别小学三年级 UID1348935 帖子61 精华0 鲜花5 朵铜币124 个银币57 个在线时间1320 注册时间2012-10-04	8^# 字体大小: t T 发表于 2016-10-25 15:31 \| \|只看该用户学习学习


	回顶部

发送短消息 UID 3045764 帖子 9 精华 0 鲜花 1 朵铜币 42 个银币 0 个性别在线时间 320 注册时间 2015-01-31 最后登录 2016-10-25 2992324292 查看公共资料搜索主题搜索帖子 a85856363 a85856363 组别幼儿园 UID3045764 帖子9 精华0 鲜花1 朵铜币42 个银币0 个在线时间320 注册时间2015-01-31	9^# 字体大小: t T 发表于 2016-10-25 19:21 \| \|只看该用户学习一下，这个很重要的


	回顶部

发送短消息 UID 3478016 帖子 368 精华 0 鲜花 2 朵铜币 1008 个银币 2 个性别在线时间 11980 注册时间 2015-09-20 最后登录 2022-06-11 查看公共资料搜索主题搜索帖子 jiahonghai 组别初中三年级 UID3478016 帖子368 精华0 鲜花2 朵铜币1008 个银币2 个在线时间11980 注册时间2015-09-20	10^# 字体大小: t T 发表于 2016-10-27 17:04 \| \|只看该用户 6666666666666


	回顶部

发送短消息 UID 4123121 帖子 283 精华 0 鲜花 2 朵铜币 973 个银币 -1 个性别在线时间 7820 注册时间 2016-09-17 最后登录 2019-06-24 545006344 查看公共资料搜索主题搜索帖子 18256017376 18256017376 组别初中二年级 UID4123121 帖子283 精华0 鲜花2 朵铜币973 个银币-1 个在线时间7820 注册时间2016-09-17 按键精灵开发者1级可通过提升认证等级来升级勋章：rz.anjian.com	11^# 字体大小: t T 发表于 2016-10-27 21:54 \| \|只看该用户司法官跌幅高达噶个


	回顶部

发送短消息 UID 4184872 帖子 111 精华 0 鲜花 0 朵铜币 367 个银币 0 个性别在线时间 3520 注册时间 2016-10-28 最后登录 2017-05-19 查看公共资料搜索主题搜索帖子 12611795 组别小学六年级 UID4184872 帖子111 精华0 鲜花0 朵铜币367 个银币0 个在线时间3520 注册时间2016-10-28	12^# 字体大小: t T 发表于 2016-10-28 22:05 \| \|只看该用户记事本风云之游戏批量登录账号


	回顶部

发送短消息 UID 4183347 帖子 14 精华 0 鲜花 0 朵铜币 33 个银币 0 个性别在线时间 120 注册时间 2016-10-27 最后登录 2016-11-01 12345 查看公共资料搜索主题搜索帖子 3107716846 3107716846 组别幼儿园 UID4183347 帖子14 精华0 鲜花0 朵铜币33 个银币0 个在线时间120 注册时间2016-10-27	13^# 字体大小: t T 发表于 2016-10-30 10:45 \| \|只看该用户带储藏室


	回顶部

发送短消息 UID 210277 帖子 188 精华 0 鲜花 5 朵铜币 743 个银币 -4 个性别在线时间 4020 注册时间 2008-12-15 最后登录 2019-11-24 查看公共资料搜索主题搜索帖子 ZCSRAY ZCSRAY 组别初中一年级 UID210277 帖子188 精华0 鲜花5 朵铜币743 个银币-4 个在线时间4020 注册时间2008-12-15	14^# 字体大小: t T 发表于 2016-10-31 11:00 \| \|只看该用户删除一个账号怎么实现


	回顶部

发送短消息 UID 3429726 帖子 22 精华 0 鲜花 0 朵铜币 77 个银币 0 个性别在线时间 800 注册时间 2015-08-26 最后登录 2018-01-16 查看公共资料搜索主题搜索帖子沈牧风沈牧风组别幼儿园 UID3429726 帖子22 精华0 鲜花0 朵铜币77 个银币0 个在线时间800 注册时间2015-08-26	15^# 字体大小: t T 发表于 2016-11-01 08:50 \| \|只看该用户不不不不不不不不不不不不不不不不不不不不不不不不不不不不不不不不不不不不


	回顶部

发送短消息 UID 4079441 帖子 58 精华 0 鲜花 1 朵铜币 113 个银币 6 个性别在线时间 1180 注册时间 2016-08-20 最后登录 2023-10-19 查看公共资料搜索主题搜索帖子 artroom 欢喜组别小学三年级 UID4079441 帖子58 精华0 鲜花1 朵铜币113 个银币6 个在线时间1180 注册时间2016-08-20	16^# 字体大小: t T 发表于 2016-11-01 09:57 \| \|只看该用户好好学习大神作品


	回顶部

发送短消息 UID 4099965 帖子 184 精华 0 鲜花 0 朵铜币 418 个银币 0 个性别在线时间 4260 注册时间 2016-09-01 最后登录 2016-11-25 查看公共资料搜索主题搜索帖子风之意组别初中一年级 UID4099965 帖子184 精华0 鲜花0 朵铜币418 个银币0 个在线时间4260 注册时间2016-09-01	17^# 字体大小: t T 发表于 2016-11-01 12:44 \| \|只看该用户 ???????????????


	回顶部

发送短消息 UID 4146782 帖子 356 精华 0 鲜花 -16 朵铜币 1125 个银币 -15 个性别在线时间 12200 注册时间 2016-10-04 最后登录 2023-12-22 查看公共资料搜索主题搜索帖子 aj12345678 组别初中三年级 UID4146782 帖子356 精华0 鲜花-16 朵铜币1125 个银币-15 个在线时间12200 注册时间2016-10-04	18^# 字体大小: t T 发表于 2016-11-01 18:53 \| \|只看该用户


	回顶部

发送短消息 UID 4186084 帖子 5 精华 0 鲜花 0 朵铜币 42 个银币 0 个性别在线时间 180 注册时间 2016-10-29 最后登录 2017-01-19 250925029 查看公共资料搜索主题搜索帖子 bbwcccxxzz bbwcccxxzz 组别幼儿园 UID4186084 帖子5 精华0 鲜花0 朵铜币42 个银币0 个在线时间180 注册时间2016-10-29	19^# 字体大小: t T 发表于 2016-11-02 15:52 \| \|只看该用户滴答滴答滴答滴答


	回顶部

发送短消息 UID 1777173 帖子 110 精华 0 鲜花 -1 朵铜币 196 个银币 -1 个性别在线时间 2340 注册时间 2013-05-01 最后登录 2017-10-10 85433693 查看公共资料搜索主题搜索帖子 wb13937441412 wb13937441412 组别小学六年级 UID1777173 帖子110 精华0 鲜花-1 朵铜币196 个银币-1 个在线时间2340 注册时间2013-05-01	20^# 字体大小: t T 发表于 2016-11-03 11:26 \| \|只看该用户大苏打撒旦撒旦


	回顶部

上一主题| 下一主题

[技术交流] 【院刊】-【201410期】记事本风云之游戏批量登录账号 [复制链接]

点评