你的位置：
循环中输入变量的方法
09:03:28 |
来源: 按键精灵资源站
在一个循环中需要在网页的输入框内输入一个数字，该数字每次的值都不一样，且没有联系，所以不能使用公式，我的思路是从txt文档复制数字到网页输入框粘贴，txt文档写成每行一个数字，每循环一次复制一行，自动累加。例如：循环第一次复制第一行，循环第二次复制第二行......循环第一百次复制第一百行
问题：这样的脚本该使用什么？能写出脚本最好。谢谢！按键精灵怎么一次循环逐行调用文本,并输出._百度知道
按键精灵怎么一次循环逐行调用文本,并输出.
我有更好的答案
Text=Plugin.File.ReadFileEx(&d:\我的文档\桌面\新建文本文档.txt&)//文档位置你自己改dimMyArrayMyArray=Split(Text,&|&)IfUBound(MyArray)&=0Theni=0ForUBound(MyArray)//下面这句是得到文本内容SayStringCstr(MyArray(i))Delay1000Msgbox&成功输入第&&i+1&&行文本内容为：&&Cstr(MyArray(i))Delay1000i=i+1NextEndIf
为您推荐：
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。按键精灵怎么实现随便修改输入文本内容
用界面自定义一个变量.将文本保存这个变量里.代码 : SayString 变量 至于你说的那种方法就要使用Inputbox
fh = Lib.文件.读取指定行文本内容(&C:\Users\Administrator\Desktop/565.txt&,1)//这里是路径以及第几句Dsmhisan = Split(fh, & &)//字符串进行分割MessageBox &账号为：&&Dsmhisan(0)&&密码为：&&Dsmhisan(2)
文本路径=&C:\1.txt&内容 = Plugin.File.ReadFileEx(文本路径)
//使用方法 点击指定软件内容框 使之为出入状态 按f10启动软件 之后每按一次f11输入下一行内容Text = Plugin.File.ReadFileEx(&d:\haoma.txt&)x=1Do
M = WaitKey()
If M = 122 Then
MyVar = Mid(Text, x, 9) SayString MyVar
End IfLoop
木头软件里的一个网页自动提交监控工具就能实现读取指定的文本内容!
用数组拆分即可把你的记事本放C盘根目录，命名为log如下代码For s=1 to 3
返回值 = Lib.文件.读取指定行文本内容(&C:\log.txt&,s)
数组拆分=Split(返回值,&|&)
数量=UBound(数组拆分)
For i = 0 To 数量
TracePrint 数组拆分(i)'这边输出每个分隔符的内容 名字--账号--密码
如果是自动输入网页表单，应该用木头软件(mutousoft)网页自动操作通用工具(pageoperator)，自动读取txt文档内容，填写到网页中，每次读取一行。也可以连续提交多个表单。
给你个参考吧，如果你会按键精灵基本功应该会修改//假如C盘有个“测试.txt”文档，里面有账号：123
密码：321 G = Plugin.Sys.GetHDDSN()//MessageBox &硬盘序列号G=&&G
i=0Text = Plugin.File.ReadFileEx(&c:\测试.txt&)dim M,M1,M2M = Split(Text, &|&)M1 = Split(M(i), &账号：&)M2 = Split(M(i+1), &密码：&)If G=8 Then
MessageBox M1(1)
MessageBox M2(1)ElseIf G=G Then
M1 = Split(M(i), &账号：&)
M2 = Split(M(i+1), &密码：&)
MessageBox M1(1)
MessageBox M2(1)
i = Form1.BrowseBox1.Path//原txt文件o = Form1.BrowseBox2.Path//要生成的txt文件Text = Plugin.File.ReadFileEx(i)Dim MyArrayMyArray = Split(Text, &|&)i = 0For UBound(MyArray)
MyArray(i)= left((Cstr(MyArray(i))),6)Call Plugin.File.WriteFileEx(o, MyArray(i))i=i+1
Next上面是代码，你还得建一个图形界面。有问题请。
//下面这句是向目标文件(&C:\Config.txt&)读出文本内容到变量(Text)Text = Plugin.File.ReadFileEx(&C:\Config.txt&)Msgbox &向目标文件读出文本内容为：&& Textdim MyArrayMyArray = Split(Text, &|&)If UBound(MyArray)&=0 Then
For UBound(MyArray)
//下面这句是得到文本内容
Msgbox &第 & & i+1 && 行文本内容为：&& Cstr(MyArray(i))
NextEnd If这个是按键精灵自带的实例，应该是超完整了，哪里不懂
人的综合分
感谢您为社区的和谐贡献力量请选择举报类型
经过核实后将会做出处理感谢您为社区和谐做出贡献
确定要取消此次报名，退出该活动？急，帮帮忙，求助求助，如何循环输出变量【按键精灵吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：401,880贴子：
急，帮帮忙，求助求助，如何循环输出变量收藏
我做一个注册脚本，第一次账户名输入的是123456，我怎么能在第二次输入的账户名是123457呢？
乐清市领祥电子有限公司创建于2006年是一家有着专业开发和生产各种轻触开关等系列产品的厂家
登录百度帐号for循环累加的变量值，怎么才能输出呢？ _ 综合讨论 - 按键精灵论坛
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.2.9软件大小：62.5M更新时间：12-07
软件版本：1.3.1软件大小：29.2M更新时间：09-29
软件版本：1.1.0软件大小：12.3M更新时间：12-29
查看: 1140|回复: 16
Delay 3000i=2For 60 i= i + 1Delay 3000Moveto 212, 133Delay 3000LeftDoubleClick 1Delay 3000saystring iDelay 3000I的数值应该从1开始累加输出，为啥不能实现呢？求高手指点下，谢谢
按键精灵开发者6级（新浪V认证）通过新浪微博加V后自动发放，并替换普通的认证6级勋章。 微博达人（90天）完成新浪微博加V的奖励，结合活动不定期开放申请。
你第一个i=2了还怎么从1开始.i=0就好了
回复 改成0了。还是不行，这个i的值，我想把它输出。但在显示输出的地方。他没有输出
火山发电厂
按键精灵开发者4级可通过提升认证等级来升级勋章：rz.anjian.com
回复 Next?For...NextSaystring 适用时才有效吧试试CStr( i )
火山发电厂 最后编辑于
回复 不懂了，我就是想输出1，操作完后，继续输出2，一直到60这样的。操作在循环，就是输出的数值没变化
小红帽对论坛提出良好建议（可向管理员申请）按键精灵开发者3级可通过提升认证等级来升级勋章：rz.anjian.com
命令名称 SayString 输入文本 命令功能 在当前窗口输入文字 当前窗口中要有能输入文字的地方，如文本框，并且是激活状态才能用这个命令。如果你只是想观察变量的变化，建议使用弹出对话框msgbox,messagebox，TracePrint 调试输出，ＭＳＧ插件tips等。
按键精灵开发者6级可通过提升认证等级来升级勋章：rz.anjian.com
saystring不是什么地方都支持的
按键会友，共同进步，QQ 3766 9324地下城堡2辅助交流
抗战胜利70周年勋章抗战胜利70周年活动的专属勋章按键14周年庆纪念勋章按键14周年庆纪念勋章（360天）黄瓜勋章（永久）体验商业小精灵活动的奖励情人节勋章（30天）天下有情人终成眷属按键精灵开发者5级可通过提升认证等级来升级勋章：rz.anjian.com爱心大使积极帮助新手（可向管理员进行申请）学有所成学有所成勋章，新手步入按键学堂的第一枚勋章
试试这样Delay 3000
Delay 3000
Moveto 212, 133
Delay 3000
LeftDoubleClick 1
Delay 3000
KeyPress asc(i),1
Delay 3000
回复 非常感谢，非常完美，完全达到了目的
回复 刚才发现，用asc（i），等循环到两位数字时，比如10、11、12、13……60这样就只能显示第一位数字，等同于只能输出一位数字了
回复 Delay 5000For i=1 to 60Delay 3000Moveto 212, 133Delay 3000LeftDoubleClick 1Delay 3000SayString cstr(i)Delay 3000KeyPress &Enter&, 1Delay 5000FindPic 0,0,,&Attachment:\百度百科.bmp&,0.9,intX,intYDelay 3000If intX & 0 And intY & 0 ThenDelay 3000MoveTo intx+25, inty+6Delay 3000LeftClick 1Delay 3000End IfDelay 3000MoveTo 309, 11Delay 3000LeftDoubleClick 1next完整脚本如上，单纯测试输出，可以从1开始往上累加正常输出，为啥加了后面的找图点击等操作以后，输出的值一直都是1 呢？？请帮着看看，非常感谢
sycn_cn 最后编辑于
不写i=2这个 试试
一个男人最重要要保护四样东西 脚下的土地 家里的父母 怀里的女人 身边的兄弟
不写i=2这个 试试
一个男人最重要要保护四样东西 脚下的土地 家里的父母 怀里的女人 身边的兄弟
闽网文 (-037号