① 按鍵精靈截圖後怎麼手動選擇保存路徑和保存文件名。
Text = Plugin.File.ReadFileEx("E:\111.txt")
MyArray = Split(Text, "|")
Text1 = Plugin.File.ReadFileEx("E:\222.txt")
MyArray1 = Split(Text1, "|")
Text2 = Plugin.File.ReadFileEx("E:\333.txt")
MyArray2 = Split(Text2, "|")
Text3 = Plugin.File.ReadFileEx("E:\444.txt")
MyArray3 = Split(Text3, "|")
For i=0 to UBound(MyArray)-1
SayString MyArray(i)
Set WshShell=CreateObject("WScript.Shell")
Set objFSO=CreateObject("Scripting.FileSystemObject")
Set objFile=objFSO.OpenTextFile("E:\111.txt",1)
strLine=objFile.Readline
KeyPress "Tab", 1
SayString MyArray1(0)
Delay 500
KeyPress "Tab", 1
SayString MyArray2(0)
Delay 500
KeyPress "Tab", 1
SayString MyArray2(0)
Delay 500
KeyPress "Tab", 1
SayString MyArray3(0)
Delay 500
KeyPress "Tab", 1
SayString MyArray3(0)
Delay 500
FindPic 0,0,1024,768,"E:\1.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX+20, intY+10
Delay 500
LeftClick 1
Delay 500
如果找到圖片4.bmp
在坐標50,50,100,100以剛才從E:\111.txt輸入的文本為名截圖,保存到E:\
如果找到圖片3.bmp
KeyPress "Enter", 1
Delay 500
FindPic 0,0,1024,768,"E:\2.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX+20, intY+15
LeftClick 1
Delay 300
End If
End If
Next
感謝各位大神
我剛接觸按鍵精靈,需要保存大量網頁,另存文件名那裡不會弄了。
積分奉上,謝謝幫忙。
//1.點右鍵查看源文件彈出記事本另存
RightClick 1
Delay 50
KeyPress "V", 1
Delay 50
KeyDown 18, 1
KeyPress 70, 1
KeyUp 18, 1
Delay 50
KeyPress "A", 1
Delay 50
//2.輸入文件名*.txt並且,每次循環一次*+1,*其實可定義。
//3.關閉記事本
② 按鍵精靈有什麼代碼可以刪除一個文件夾內的所有文件
FilePath="F:\" //這里寫文件夾的目錄
MyFile = AllFileName(FilePath)
For i = 0 To UBound(MyFile) - 1
Call Plugin.File.DeleteFile(FilePath & "\" & MyFile(i))
Next
Function AllFileName(FilePath)
Dim FileName,fso,folder,f,files
FileName = ""
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.getfolder(FilePath)
Set files = folder.files
For Each f In files
FileName = FileName & f.name & ","
Next
Set fso = Nothing
AllFileName = Split(FileName, ",")
End Function
上面代碼,第一行引號內寫文件夾目錄,就可以刪除文件夾內所有的文件,但是,文件夾裡面的文件夾是不刪除的,由於你只說刪除文件,我就寫了只刪除文件。
③ 求按鍵精靈剪切指定文件夾里的指定圖片到另一個文件夾里的命令
Dimfso
Setfso=CreateObject("Scripting.FileSystemObject")
fso.MoveFile"C:圖片1.jpg","D:新建文件夾"
fso.MoveFile"C:圖片2.jpg","D:新建文件夾(2)"
'其他的你不用改,MoveFile的第一個參數為文件的路徑,回第二個參數為要答移動到的路徑(注意:要移動到的路徑的後面一定要加一個"")
'………………
Setfso=Nothing
④ 按鍵精靈,怎麼把剪貼板中的圖片保存到指定位置
Text = Plugin.Sys.GetCLB()
arr = split(Text, "|")
For i = 0 To ubound(arr) - 1
Call Plugin.File.WriteFileEx(".\Log.txt", arr(i))
Next
//最好讓你剪切板上的文本有一些特點
//這樣方便一行一行的識別
//大概就這樣其他自己修改!~
⑤ 按鍵精靈 打開指定文件夾並新建一個文件夾
路徑 = "C:\Documents and Settings\Administrator\桌面\"
文件名 = "A-F-"
//創建一個文件夾版
Call Plugin.File.CreateFolder(路徑&文件名)
//這是直接創建一個文件夾,名稱可以在啟動腳本權前設定好.
⑥ 按鍵精靈中如何復制和移動文件夾!
Set fso = CreateObject("Scripting.FileSystemObject")
Fso.CopyFolder "源文件路徑", "復制的文件路徑", True //True:覆蓋,False:不覆蓋Fso.MoveFolder "源文件路徑", "復制的文件路徑" //這句話沒回有許可權,我本人不清楚答原因。
可以用復制文件,再刪除文件代替移動:
Set fso = CreateObject("Scripting.FileSystemObject")
Fso.CopyFolder "源文件路徑", "復制的文件路徑", True
Fso.DeleteFolder "源文件路徑"
上面代碼本人測試過,已經成功了。
⑦ 按鍵精靈,將剪貼板的圖片轉存到指定的文件夾里,該怎麼寫啊
沒別的辦法試試下面的
RunApp "mspaint.exe"
CTRL + V
在l另存為
在關閉。
⑧ 如何用按鍵精靈刪除一個文件夾
Dim fso
//聲明變數
set fso = CreateObject("Scripting.FileSystemObject")
//創建fileSystemObject對象
fso.DeleteFolder "c:\文件夾",True
//刪除指定來文件夾
你按調試看看自提示什麼,如果是提示不能創建對象的話,只要在「開始」「運行」里輸入regsvr32 scrrun.dll就可以了
vbscall runapp()的功能跟開始運行是一樣地,所以呢: vbscall runapp("regsvr32 scrrun.dll")
⑨ 按鍵精靈在文件里的圖片,如何移動到另一個文件夾上
調用系統MoveFileA,API命令可以實現文件移動。是庫名「kernel32.dll」中的命令。但是按鍵精靈自帶了文件移動插件命令
Call Plugin.File.MoveFile("C.\Log.txt", "D:\Log.txt")//在插件命令-File文件插件中
當然也可以手動調用api
Declare Function MoveFileA Lib "kernel32" Alias "MoveFileA" (ByVal A As String,ByVal B AS String) As Integer
aa = MoveFileA("C.\Log.txt", "D:\Log.txt")
專業游戲輔助作者回答。請採納
⑩ 按鍵精靈抓圖保存在哪個文件夾啦
都沒保存~~~~~~全在變數里。至於截屏的圖片,好像按鍵精靈沒這功能,要是找點也是放在變數里了。要是按Print就在剪切板里