mwbr.net
当前位置:首页 >> 按键精灵 帮助文件 >>

按键精灵 帮助文件

Call Plugin.Pic.PrintScreen(0,0,1023,767,“C:\"&X&","&Y&".bmp”)

//下面这句是向目标文件("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...

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

你那是直接分出逗号部分,这写不符合逻辑,建议先分出段落,再分出逗号部分, 比如里面有三行数字: 123456,aaa 987654,bbb 653214,ccc 可以先分出段落 Text = Plugin.File.ReadFileEx("D:\1.txt") arr = split(text, "|") //数组arr是未知数,...

Call Lib.文件.替换指定行文本内容("D:\1.txt", "这不是第9行", 9)

我的思路是首先用快捷键调用b,b执行完后在当前目录创建一个文件作为讯号,a则在这段时间内一直监测这个文件,一旦文件出现,立即运行接下来的脚本。 ======= b开始处写: Call Plugin.File.DeleteFolder(".\msg") b结束了写: Call Plugin.File...

你的需求基本是自动喊话的雏形,逐行读取c:\1.txt文件,逐行黏贴出来,脚本见截图:

1、打开脚本, 2、点附件, 3、选择要复制的脚本, 4、然后点击释放附件的按钮,释放附件到指定的文件夹, 5、然后在新脚本里面的附件里面选择释放出来的附件添加进去就行。

帮你写好啦,直接copy上去运行即可,表太谢我~ ======================================= //读取txt word = Plugin.File.ReadFileEx("C:\1.txt") //分割为行 Dim hang hang = split(hang, "|") //循环打出每一行 For i = 0 To UBound(hang) SayS...

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

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