lmnd.net
当前位置:首页 >> 按键精灵读取txt文件 >>

按键精灵读取txt文件

Text = Plugin.File.ReadFileEx("d:\我的文档\桌面\新建 文本文档.txt")//文档位置你自己改 dim MyArray MyArray = Split(Text, "|") If UBound(MyArray)>=0 Then i=0 For UBound(MyArray) //下面这句是得到文本内容 SayString Cstr(MyArray(i))...

Text1 = Plugin.File.ReadFileEx("d:\我的文档\桌面\新建 文本文档1.txt")//文档位置你自己改 Text2 = Plugin.File.ReadFileEx("d:\我的文档\桌面\新建 文本文档2.txt") dim MyArray MyArray1 = Split(Text1, "|") MyArray2 = Split(Text2, "|")...

为了与数组对应,图片也最好装到数组,或者图片名改成数字. 行="ABCD|1234|4242|8989|4545|1313|3232|" 分隔=split(行,"|") for i=1 to 2//i为图片名 FindPic 0,0,1024,768,"Attachment:\"&i&".bmp",0.9,intX,intY if intX>0 then //输入 分隔(i-1...

由于换行符与账号密码分隔符一样,都是"|",所以这里我把":"当做账号密码分隔符。 代码: Dim Path, Text, i, zm Path="C:\Documents and Settings\Administrator\桌面\新建 文本文档.txt" '填入文件路径 Text = Plugin.File.ReadFileEx(Path) '...

假设d:\001.txt 红记录格式为 帐号1 密码1 .... text = Plugin.File.ReadFileEx("d:\001.txt") arrZM = Split(text, "|") For i = 0 To UBound(arrZM) -1 Step 2 zhanghao = arrzm(i) mima = arrzm(i + 1) TracePrint "帐号是" & zhanghao & "密...

由于换行符与账号密码分隔符一样,都是"|",所以这里我把":"当做账号密码分隔符。 代码: Dim Path, Text, i, zm Path="C:\Documents and Settings\Administrator\桌面\新建 文本文档.txt" '填入文件路径 Text = Plugin.File.ReadFileEx(Path) '...

路径 = Form1.BrowseBox1.Path//得到路径 文本内容 = Plugin.File.ReadFileEx(路径)//获取文本全部内容,下面要用的话需要分拆出来.或者用字符串函数得到需要的值 昵称 = Form1.InputBox1.Text//从输入框获取的值都是字符串 SayString 昵称

For i = 1 To UBound(Split(Plugin.File.ReadFileEx("C:\123.txt"), "|")) If len(Lib.文件.读取指定行文本内容("C:\123.txt", i)) > 4 Then RunApp lib.文件.读取指定行文本内容("C:\123.txt", i) End If Delay 500 Next 复制上面代码,如果路...

下面这个是参考代码 可以自己在C盘生成【成功账号】记事本试试效果 研究下怎么制作吧 文本路径="C:\成功账号.txt" Text = Plugin.File.ReadFileEx(文本路径) Text=Split(Text,"|") 数量=UBound(Text)-1 行数=1 For 数量 内容= Lib.文件.读取指定...

//下面这句是向目标文件("C:\Config.txt")读出文本内容到变量(Text)Text = Plugin.File.ReadFileEx("C:\Config.txt")Msgbox "向目标文件读出文本内容为:"& Textdim MyArrayMyArray = Split(Text, "|")If UBound(MyArray)>=0 Then i=0 For UBoun...

网站首页 | 网站地图
All rights reserved Powered by www.lmnd.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com