wnlt.net
当前位置:首页 >> 按键精灵怎么逐行自动读取文本中的文字,并自动输... >>

按键精灵怎么逐行自动读取文本中的文字,并自动输...

我没有想到怎么把|符号替换成TAB键 但是这样可以达到你要的效果! Path = "C:\123.txt" '路径 text = Plugin.File.ReadF...

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

Text=Plugin.File.ReadFileEx("d:\我的文档\桌面\新建文本文档.txt")//文档位置你自己改dimMyArrayMyArray=Split(Text,"|")IfUBound(MyArray)>=0Theni=0ForUBound(MyArray)//下面这句是得到文本内容SayStringCstr(MyArray(i))Delay1000Msgbox"成...

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))...

Text = Plugin.File.ReadFileEx(文件路径)【把汉字替换为文件路径】 While text > "" //循环,直至读完所有内容为止 qa = InStr(text, "|") qs = Len(text) 本行内容 = Left(text, qa - 1)【一行一行读取,文本里只有账号就可以了,密码可以改成...

那个操作比较麻烦的,你还是去用下阿冲全能点击王软件吧,可以自动提取文本输入,而且是图形化界面很傻瓜化的!

那个实现起来比较麻烦,你可以借助“极速点击虎”这样的脚本软件完成,极速点击虎是全部图形化界面,支持自动文本内容提取,自动输入自动录入,点击按键模拟等很多功能。

fh = Lib.文件.读取指定行文本内容("C:\Users\Administrator\Desktop/565.txt",1)//这里是路径以及第几句 Dsmhisan = Split(fh, " ")//字符串进行分割 MessageBox "账号为:"&Dsmhisan(0)&"密码为:"&Dsmhisan(2)

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....

text = Plugin.File.ReadFileEx("C:\Users\lenovo\Desktop\1.txt") dim MyArray MyArray = Split(Text, "|") If UBound(MyArray)>=0 Then i=0 For UBound(MyArray) //下面这句是得到文本内容 SayString Cstr(MyArray(i)) Delay 1000 Msgbox "成...

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