这个不能直接文本c 读取文本出来吗 Call Plugin.File.ReadFileEx("E:\ooo.txt")

来源：蜘蛛抓取(WebSpider) 时间：2018-06-16 06:27 标签： c 读取文本
怎么逐行读取txt文本，用Ajax可以实现么_百度知道
怎么逐行读取txt文本，用Ajax可以实现么
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
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 上面是代码，你还得建一个图形界面。
有问题请追问。
采纳率：79%
为您推荐：
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。按键精灵读取txt内容并粘贴，求代码_百度知道
按键精灵读取txt内容并粘贴，求代码
按键精灵读取指定txt内容到剪切板，然后再粘贴，代码怎么写
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
代码如下Text = Plugin.File.ReadFileEx(&C:\Log.txt&)Call Plugin.Sys.SetCLB(Text)直接ctrl+v就可以粘贴记事本里面的内容了 全部内容
采纳率：65%
来自团队：
为您推荐：
其他类似问题
按键精灵的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。按键精灵 追加文本_百度知道
按键精灵 追加文本
比如原来1.txt 的内容是 123，我想要追加456，最终结果是123456，也就是在文件末尾添加。比如我用的是：t = Plugin.File.ReadFileEx(&C:\1.txt&)Call Plugin.File.WriteFileEx(&C:\1.txt&,t&&456&)而且原来那行还在同时会出现讨厌的 |
这个间隔符。结果就成这样了：123123|456我用的是按键8.0，谢谢。
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
不用ReadFile，直接追加写WriteFile，SeekFile用来设定读写位置，然后追加写。完整代码如下：fileLen=Plugin.File.GetFileLength(&C:\1.txt&)
handle=Plugin.File.OpenFile(&C:\1.txt&) Call Plugin.File.SeekFile(handle, fileLen)Call Plugin.File.WriteFile(handle, &456&)Call Plugin.File.CloseFile(handle)
采纳率：48%
来自团队：
为您推荐：
其他类似问题
按键精灵的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。怎么把TXT文本直接写入按键精灵_百度知道
怎么把TXT文本直接写入按键精灵
可能我上面的问题有错误，我也说不清是不是写入，而是我有一个TXT文本和按键精灵登录器，我想把他们组合在一起用。。求大神+Q1.0.9.5.5.1.8368细谈
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
你的意思是读txt文件内容吧。//下面这句是向目标文件(&C:\Config.txt&)读出文本内容到变量(Text)Text = Plugin.File.ReadFileEx(&C:\Config.txt&)Msgbox &向目标文件读出文本内容为：&& TextMyArray = Split(Text, &|&)If UBound(MyArray)&=0 Then
For i=0 To UBound(MyArray)
//下面这句是得到文本内容
Msgbox &第 & & i+1 && 行文本内容为：&& Cstr(MyArray(i))
NextEnd If
采纳率：79%
A1=5+5Call Plugin.File.WriteFileEx(&C:\Log.txt&, a1)Delay 1000RunApp &C:\Log.txt&//打开TXT看看希望对你能有所帮助。
要不加我Q详谈，我试你的的方法不行，我是要运行那个脚本
为您推荐：
其他类似问题
按键精灵的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。按键精灵文本操作写入换行符_百度知道
按键精灵文本操作写入换行符
KeyPress &F2&, 1
text = Plugin.File.ReadFileEx(&d:\1.txt&)
dim MyArray
MyArray = Split(Text, &|&)
If UBound(MyArray)&=0 Then
For UBound(MyArray)
//下面这句是得到文本内容
SayString Cstr(MyArray(i))
If i = 0 Then
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
newtext=newtext&Cstr(MyArray(i))改为newtext=newtext & MyArray(i) & vbcrlf
采纳率：82%
来自团队：
为您推荐：
其他类似问题
按键精灵的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。

我要回帖

更多关于 c 读取文本 的文章

 

随机推荐