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

写成后台脚本就是了!

文本路径 = "C:\Documents and Settings\Administrator\桌面\外挂.txt"输入文本坐标 = array(500, 100)Do If WaitKey = 115 Then Rem 读取 s = Lib.文件.读取指定行文本内容(文本路径, 行数 + 1) If s = "" Then 行数 = 行数 + 1 If a = 3 Then ...

File插件里面有读键值函数,你查看File插件里面的帮助文档就有例子用法。

Do x = WaitKey() If x = 97 Then KeyPress "T", 1 else If x = 98 Then KeyPress "Y", 1 else If x = 99 Then KeyPress "u", 1 else If x = 100 Then KeyPress "i",1 else If x = 101 Then KeyPress "o",1 else If x = 102 Then KeyPress "p",1...

text = Plugin.File.ReadFileEx("C:\1.txt") 当然要是你的txt处于打开状态的话,还可以直接后台复制,不过必须先要获取句柄 mh = Plugin.Window.GetKeyFocusWnd()//按下ctrl键Call Plugin.Bkgnd.KeyDown(mh, 17)Delay 500//按aCall Plugin.Bkgnd...

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

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

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