按键精灵要怎么做复制txt文件里东西粘贴到别的窗口。(求代码) 50
要求1:提取txt第一行粘帖,2次Tab后,再提取第二行粘帖。要求2:要有一个记录窗口,可选择在第几行开始的选项。(因为,这个是常用工具,要是关机重新启动还是从第一开始的...
要求1:提取txt第一行粘帖,2次Tab后,再提取第二行粘帖。
要求2:要有一个记录窗口,可选择在第几行开始的选项。(因为,这个是常用工具,要是关机重新启动还是从第一开始的话,就很麻烦)。谢谢大神给上代码最好不要vb等等。
6月18日,修改,上面都没人里,这个有没有人帮的。(其实还是这个问题就是换了方法也简化了)
path = "d:\1.txt"
fileHandle=Plugin.File.OpenFile(path)
//file20byte=Plugin.File.ReadFile(fileHandle,20)
Rem 标记
key1 = WaitKey()
If key1 = 115 Then
fileline = Plugin.File.ReadLine(fileHandle)
// Call Plugin.Sys.SetCLB(fileline)
// KeyDown 17, 1
//KeyPress 86, 1
//KeyUp 17, 1
SayString fileline
End If
Delay 200
Goto 标记
Sub OnScriptExit()
Call Plugin.File.CloseFile(fileHandle)
MessageBox "脚本已经停止!"
End Sub
能不能把读取的内容删除或是替换或是剪切掉。留行不留内容 展开
要求2:要有一个记录窗口,可选择在第几行开始的选项。(因为,这个是常用工具,要是关机重新启动还是从第一开始的话,就很麻烦)。谢谢大神给上代码最好不要vb等等。
6月18日,修改,上面都没人里,这个有没有人帮的。(其实还是这个问题就是换了方法也简化了)
path = "d:\1.txt"
fileHandle=Plugin.File.OpenFile(path)
//file20byte=Plugin.File.ReadFile(fileHandle,20)
Rem 标记
key1 = WaitKey()
If key1 = 115 Then
fileline = Plugin.File.ReadLine(fileHandle)
// Call Plugin.Sys.SetCLB(fileline)
// KeyDown 17, 1
//KeyPress 86, 1
//KeyUp 17, 1
SayString fileline
End If
Delay 200
Goto 标记
Sub OnScriptExit()
Call Plugin.File.CloseFile(fileHandle)
MessageBox "脚本已经停止!"
End Sub
能不能把读取的内容删除或是替换或是剪切掉。留行不留内容 展开
展开全部
Plugin Clipboard = Sys.GetCLB()
Plugin File.WriteFileEx("E:\zwszjs.txt", Clipboard)
Plugin File.WriteFileEx("E:\\zwszjs.txt", "")
复制剪贴板内容到指定写字板,然后写字板按下回车键。
读取excel内容,写入当前位置
//下面这句是打开Excel文档工作表
Plugin Office.OpenXls("D:\Backup\我的文档\工资收入明细.xls")
x=1
For 7
//文档工作表(1)单元格(x, 2)读出内容存入(Text)变量
Plugin Text = Office.ReadXls(1, x, 2)
SayString Text
KeyPress 13,1
//按enter一次
x=x+1
EndFor
Plugin Office.CloseXls()
在按键精灵--全部命令--按键精灵插件命令---office办公文档,直接复制WORD的我还没找到。你自己找找。
Plugin File.WriteFileEx("E:\zwszjs.txt", Clipboard)
Plugin File.WriteFileEx("E:\\zwszjs.txt", "")
复制剪贴板内容到指定写字板,然后写字板按下回车键。
读取excel内容,写入当前位置
//下面这句是打开Excel文档工作表
Plugin Office.OpenXls("D:\Backup\我的文档\工资收入明细.xls")
x=1
For 7
//文档工作表(1)单元格(x, 2)读出内容存入(Text)变量
Plugin Text = Office.ReadXls(1, x, 2)
SayString Text
KeyPress 13,1
//按enter一次
x=x+1
EndFor
Plugin Office.CloseXls()
在按键精灵--全部命令--按键精灵插件命令---office办公文档,直接复制WORD的我还没找到。你自己找找。
追问
文不对题好不。我要求有2次tab的动作呢。别用网上复制来的忽悠人。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |