|
if exist %windir%\system32\drivers\imdisk.sys goto :装载Ramdisk
imdisksetup.exe
:装载Ramdisk
.....
----------------------------------
另外,拟了一个跳过空盘驱动器的搜索,有兴趣的可以试试
搜索Petools下某个文件并执行它
----------------------------------------------------------------
On Error Resume Next
Dim fso, SubDrives, i,File
Set fso = CreateObject("Scripting.FileSystemObject")
Set SubDrives = fso.Drives
set ws=WScript.CreateObject("WScript.Shell")
For Each i In SubDrives
File=i.DriveLetter & "\petools\外置安装.cmd"
if i.IsReady=true then
if fso.FileExists(File) then
ws.Run File,0 :Exit For
End if
End if
Next
--------------------------------------------------------
只需要将\petools\外置安装.cmd换成你想执行的Petools目录下的一个cmd或程序即可。
ws.Run File,0 参数0表示隐藏执行。 调试时可以用 ws.Run File 显示出来看一下是否执行。
pedmd.ini 中可以用:Exec WScript.exe Findtool.vbs
[ 本帖最后由 2011mking 于 2012-5-8 17:07 编辑 ] |
|