1、TracePrint "开始",TracePrint 全盘搜索文件("1.txt")'根据返回值 自行编写判断。
2、Function 全盘搜索文件(文件名),Dim fso, fw,.bat, fr, wsh, 有效盘符。
3、有效盘符 = 获取存在磁盘(),Set fso = CreateObject,If fso.FileExists("全盘搜索.txt") Then fso.DeleteFile ("全盘搜索.txt")。
4、Set fw = fso.OpenTextFile("全盘搜索.bat", 2, True)。bat = "@echo off " & vbCrLf。
5、bat = bat &"set ""FileName=" & 文件名 & """ " & vbCrLf ,bat = bat &"echo 正在搜索,请稍候... " & vbCrLf。
6、bat = bat &" if /i ""%%~nxb"" equ ""%FileName%"" ( " & vbCrLf 。bat = bat &" echo.%%b >> 全盘搜索.txt )))) " & vbCrLf 。
例子1:
//判断条件(0:等于 1:不等于 2:近似等于)
IfColor 860,27,"e1b072",0 Then
RightDown 1//按下右键
Else
RightUp 1//弹起右键
End If
//判断坐标点(860,27)的颜色是否等于e1b072
//你用按键自带的抓抓 看一下你要那个位置变成绿色时的颜色 把这里的e1b072改掉 860,27为你这个点的坐标
//这个只能运行一次 如果要一直判断 下面这样写:
do
IfColor 860,27,"e1b072",0 Then
RightDown 1//按下右键
Else
RightUp 1//弹起右键
End If
loop
好心人告诉下