全球第二發(fā),無(wú)憂(yōu)最完美的、真正單文件的PETOOLS掛載工具CMD(0725最后更新)一、無(wú)憂(yōu)上已經(jīng)有不少PEOOLS掛載工具,但是少存在問(wèn)題,
二、最無(wú)聊的是,明明是簡(jiǎn)單的一個(gè)CMD加INI,就有人非加密封裝成一個(gè)EXE文件,讓人看了就煩。
本CMD是在無(wú)憂(yōu)高手的基礎上進(jìn)行完美修改的(不知道是誰(shuí)最先搞出來(lái)的,知道的同學(xué),請跟貼說(shuō)一下表示感謝)
真正的單文件
和以前其他CMD相比,保證成功掛載,最大特點(diǎn)是:可以隱藏不需要的選項,可以?huà)燧d到正常的windows系統(綠色軟件常用方法)
可以自定義圖標
好了,不說(shuō),自己看看吧
------------------------------------------------------------------------------------
用法舉例:
1\搜索加載PETOOLS .cmd `直接點(diǎn)擊運行,自動(dòng)搜索PETOOLS并掛載到開(kāi)始菜單
2\exec !搜索加載PETOOLS.cmd `在ini中調用,功能同上
3、搜索加載PETOOLS .cmd “d:\綠色工具” `僅將 d:\綠色工具\ 下的程序掛到開(kāi)始菜單,非常適合外置程序,適合正常系統
4、沒(méi)了
-------------------------------------------------------------------------------------
===========以下不需要回復即可看見(jiàn)==============================================
@echo off
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
echo PETools擴展目錄搜索安裝程序...........................
title 搜索加載PETOOLS
echo 程序功能:自動(dòng)搜索加載外置\PETOOLS\下的程序,以快捷方式的形式,掛載到開(kāi)始菜單,免除LINK命令的繁瑣
echo 默認搜索:自動(dòng)搜索所有分區根目錄下 PETOOLS,以盤(pán)符區分
echo 定制掛載:帶指定目錄為參數,可以?xún)H掛載該目錄下的程序,如 搜索加載PETOOLS.CMD D:\綠化工具
echo PE\windows通用:本程序為獨立程序,可放于任意位置,支持XP\03\win7 PE,若有PECMD.exe,同時(shí)支持正?!INDOWS xp\w7 系統!
ECHO 在windows 下,如執行:搜索加載PETOOLS.CMD D:\綠化工具,會(huì )將綠化工具 掛載到開(kāi)始菜單(本程序目錄需有PECMD.EXE)
echo 本程序僅掛載 *.EXE\*.WIM\*.CMD\*說(shuō)明*.TXT等程序,自動(dòng)掛載PETOOLS及其下子目錄所有*EXE等可執行文件
echo 過(guò)濾功能:若不想顯示某些文件及子目錄,僅需將該文件或子目錄 屬性設為:隱藏即可,不影響使用,快捷菜單更加簡(jiǎn)潔
echo 注冊功能:能自動(dòng)執行PETOOLS及其下子目錄中的 _Setup.CMD,顯式執行,如將綠化、注冊、RegDoc等更名為:_setup.CMD即可
echo 自定義圖標:圖標ICO文件與執行文件名相同即可
echo.
echo 本程序在無(wú)憂(yōu)高手的基礎上進(jìn)行完美,真正的單文件,windows及PE通用,所掛軟件盡可能為綠色軟件
echo 無(wú)憂(yōu)啟動(dòng) 歌理 20120719
echo ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
echo PETools擴展目錄搜索安裝程序...........................
PUSHD %~dp0
SET TP=%CD%
set LNKinidir=%temp%
set petoolsdir=%~1
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Call :PETOOLS_LNK
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
if "%~1"=="" goto :eof
if not defined StartMenu goto :eof
if not exist "%~1" goto :eof
set PEdrv=%~d1
set 外置程序=PETools_%PEdrv::=%盤(pán)
SET 掛載位置=%%StartMenu%%\%外置程序%
if exist "%LNKinidir%\PETOOLS_LNT.tmp" SET 掛載位置=%%StartMenu%%
if not "%掛載位置%"=="%%StartMenu%%" IF EXIST "%StartMenu%\%外置程序%" RD /S /Q "%StartMenu%\%外置程序%"
set petoolsexe=%LNKinidir%\petoolsexe.lst
set petoolslnk=%LNKinidir%\petoolslnk.INI
set petoolsetup=%LNKinidir%\petoolsetup.lst
:START
DEL "%petoolsexe%" 2>nul
DEL "%petoolslnk%" 2>nul
DEL "%petoolsetup%" 2>nul
PUSHD "%~F1"
>"%petoolsexe%" dir /s/b *.wim *.cmd *.bat *.exe readme*.txt *說(shuō)明*.txt
POPD
for /f "usebackq delims=" %%i in ("%petoolsexe%") do CALL :MAKE_LINK "%%i"
PECMD LOAD %petoolslnk%
PUSHD "%~F1"
>"%petoolsetup%" dir /s/a/b _setup.CMD _setup.BAT 2>nul
if exist "%petoolsetup%" For /f "delims=" %%i in ('type "%petoolsetup%"') do (
PECMD EXEC =%%i
)
POPD
goto :eof
:MAKE_LINK
SETLOCAL
if "%~1"=="" goto :eof
set toolfile=%~1
if /i "%~n1"=="_setup" goto :eof
set myICO=
SET lnkname=%~dpn1
if exist "%lnkname%.ICO" set myICO=,,%lnkname%.ICO
call,set "lnkname=%%lnkname:%petoolsdir%\=%%"
>>"%PEtoolslnk%" echo.LINK %掛載位置%\%lnkname%,%toolfile%%myICO%
GOTO :EOF
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:PETOOLS_LNK
IF NOT EXIST "%SystemRoot%\system32\PECMD.exe" copy "%TP%\PECMD.exe" "%SystemRoot%\system32\PECMD.exe"
::直接帶目錄運行
set CMDfile=%~F0
set PETOOLS_LNK=\PEtools
if not "%petoolsdir%"#==""# set PETOOLS_LNK=%petoolsdir%
if PETOOLS_LNK==PETOOLS_LNK if exist "%LNKinidir%\PETOOLS_LNT.tmp" del "%LNKinidir%\PETOOLS_LNT.tmp"
if not "%petoolsdir%"#==""# >"%LNKinidir%\PETOOLS_LNT.tmp" echo %PETOOLS_LNK%
>"%LNKinidir%\PETOOLS_LNK.ini" echo FORX @%PETOOLS_LNK%,TOOLS,0,EXEC !="%LNKinidir%\PETOOLS_LNK.CMD" "%%TOOLS%%"
>>"%LNKinidir%\PETOOLS_LNK.ini" echo FILE "%LNKinidir%\PETOOLS*.*"
>>"%LNKinidir%\PETOOLS_LNK.ini" echo ifex %%TOOLS%%\,KILl explorer.exe
if not exist x:\ >>"%LNKinidir%\PETOOLS_LNK.ini" echo ifex %%TOOLS%%\,EXEC explorer.exe
>>"%LNKinidir%\PETOOLS_LNK.ini" echo ifex %%TOOLS%%\,!MESS 沒(méi)有搜索到 PETOOLS 文件夾!@PETOOLS_LNK通知 #ok *3000
>>"%LNKinidir%\PETOOLS_LNK.ini" echo ifex %%TOOLS%%\,MESS PETOOLS已經(jīng)被裝載到了開(kāi)始菜單。@PETOOLS_LNK通知 #ok *3000
>"%LNKinidir%\PETOOLS_LNK.CMD" echo @echo off
TYPE "%CMDfile%"|FIND /v /i "PETOOLS_LNK">>"%LNKinidir%\PETOOLS_LNK.CMD"
start PECMD LOAD %LNKinidir%\PETOOLS_LNK.ini
echo 正在搜索 PETOOLS.......
ping -n 5 127.0.0.1>nul
exit
GOTO :eof
================================================================================7.25是最后更新=====================================================
7.25更新:
首先感謝各位童鞋鼓勵及建議,作了如下改進(jìn):
1、取消了搜索A盤(pán),避免出現提示找不到A盤(pán)的錯誤
2、增加了參數 展開(kāi),功能是:默認掛載到開(kāi)始菜單的PETOOLS_x盤(pán),加此參數后,將直接掛載到開(kāi)始菜單,當然,更方便,開(kāi)始菜單也變得更長(cháng),自由選擇吧
3、重新優(yōu)化了代碼,運行效率更高
=================================================
@echo off
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
echo PETools擴展目錄搜索安裝程序...........................
title 搜索加載PETOOLS
echo 程序功能:自動(dòng)搜索加載外置\PETOOLS\下的程序,以快捷方式的形式,掛載到開(kāi)始菜單,免除LINK命令的繁瑣
echo 默認搜索:自動(dòng)搜索所有分區根目錄下 PETOOLS,以盤(pán)符區分
echo 特定掛載:帶指定目錄為參數,可以?xún)H掛載該目錄下的程序,如 搜索加載PETOOLS.CMD D:\綠化工具
echo 特定掛載時(shí),若再加參數 展開(kāi),如 D:\綠化工具 展開(kāi),則綠化工具下的程序將直接展開(kāi)到開(kāi)始菜單
echo PE\windows通用:本程序為獨立程序,可放于任意位置,支持XP\03\win7 PE,若有PECMD.exe,同時(shí)支持正?!INDOWS xp\w7 系統!
ECHO 在windows 下,如執行:搜索加載PETOOLS.CMD D:\綠化工具,會(huì )將綠化工具 掛載到開(kāi)始菜單(本程序目錄需有PECMD.EXE)
echo 本程序僅掛載 *.EXE\*.WIM\*.CMD\*說(shuō)明*.TXT等程序,自動(dòng)掛載PETOOLS及其下子目錄所有*EXE等可執行文件
echo 過(guò)濾功能:若不想顯示某些文件及子目錄,僅需將該文件或子目錄 屬性設為:隱藏即可,不影響使用,快捷菜單更加簡(jiǎn)潔
echo 注冊功能:能自動(dòng)執行PETOOLS及其下子目錄中的 _Setup.CMD,顯式執行,如將綠化、注冊、RegDoc等更名為:_setup.CMD即可
echo 自定義圖標:圖標ICO文件與執行文件名相同即可
echo.
echo 本程序在無(wú)憂(yōu)高手的基礎上進(jìn)行完美,真正的單文件,windows及PE通用,所掛軟件盡可能為綠色軟件
echo 無(wú)憂(yōu)啟動(dòng) 歌理 20120725
echo :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
echo.
PUSHD %~dp0
SET TP=%CD%
set LNKinidir=%temp%
set petoolsdir=%~1
set petools2=%2
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Call :PETOOLS_LNK
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
if "%~1"=="" goto :eof
if not defined StartMenu goto :eof
if not exist "%~1" goto :eof
set PEdrv=%~d1
set 外置程序=PETools_%PEdrv::=%盤(pán)
SET 掛載位置=%%StartMenu%%\%外置程序%
if %petools2%#==展開(kāi)# SET 掛載位置=%%StartMenu%%
if not "%掛載位置%"=="%%StartMenu%%" IF EXIST "%StartMenu%\%外置程序%" RD /S /Q "%StartMenu%\%外置程序%"
set petoolsexe=%LNKinidir%\petoolsexe.lst
set petoolslnk=%LNKinidir%\petoolslnk.INI
set petoolsetup=%LNKinidir%\petoolsetup.lst
:START
DEL "%petoolsexe%" 2>nul
DEL "%petoolslnk%" 2>nul
DEL "%petoolsetup%" 2>nul
PUSHD "%~F1"
>"%petoolsexe%" dir /s/b *.wim *.cmd *.bat *.exe readme*.txt *說(shuō)明*.txt
POPD
for /f "usebackq delims=" %%i in ("%petoolsexe%") do CALL :MAKE_LINK "%%i"
PECMD LOAD %petoolslnk%
PUSHD "%~F1"
>"%petoolsetup%" dir /s/a/b _setup.CMD _setup.BAT 2>nul
if exist "%petoolsetup%" For /f "delims=" %%i in ('type "%petoolsetup%"') do (
PECMD EXEC =%%i
)
POPD
goto :eof
:MAKE_LINK
SETLOCAL
if "%~1"=="" goto :eof
set toolfile=%~1
if /i "%~n1"=="_setup" goto :eof
set myICO=
SET lnkname=%~dpn1
if exist "%lnkname%.ICO" set myICO=,,%lnkname%.ICO
call,set "lnkname=%%lnkname:%petoolsdir%\=%%"
>>"%PEtoolslnk%" echo.LINK %掛載位置%\%lnkname%,%toolfile%%myICO%
GOTO :EOF
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:PETOOLS_LNK
IF NOT EXIST "%SystemRoot%\system32\PECMD.exe" if not EXIST "%TP%\PECMD.exe" echo 請將PECMD.EXE復制到本程序目錄下,再運行!&&pause&&exit
IF NOT EXIST "%SystemRoot%\system32\PECMD.exe" copy "%TP%\PECMD.exe" "%SystemRoot%\system32\PECMD.exe"
set CMDfile=%~F0
>"%LNKinidir%\PETOOLS_LNK.CMD" echo @echo off
TYPE "%CMDfile%"|FIND /v /i "PETOOLS_LNK">>"%LNKinidir%\PETOOLS_LNK.CMD"
echo 正在搜索 PETOOLS,請不要關(guān)閉本窗口,搜索完畢會(huì )自動(dòng)關(guān)閉.......
echo .
if not "%petoolsdir%"#==""# PECMD EXEC ="%LNKinidir%\PETOOLS_LNK.CMD" "%petoolsdir%" %petools2%
set drv=C D E F G H I J K L M N O P Q R S T U V W X Y Z
if "%petoolsdir%"#==""# FOR %%a in (%drv%) do (
if exist "%%a:\PETOOLS" set petoolsdir=%%a:\PETOOLS
if exist "%%a:\PETOOLS" PECMD EXEC !="%LNKinidir%\PETOOLS_LNK.CMD" "%%a:\PETOOLS"
)
echo .
if exist "%petoolsdir%" PECMD KILl explorer.exe
if exist "%petoolsdir%" if not exist x:\ PECMD EXEC explorer.exe
if exist "%petoolsdir%" echo PETOOLS已經(jīng)被裝載到了開(kāi)始菜單!!!!!
if not exist "%petoolsdir%" ECHO 沒(méi)有搜索到 PETOOLS 文件夾!!!
del "%LNKinidir%\PETOOLS*.*" 2>nul
pecmd wait -3000
exit
GOTO :eof
--------------------------------------------------
貼兩個(gè)圖吧,自動(dòng)搜索及展開(kāi)對比圖
[ 本帖最后由 歌理 于 2012-7-26 00:11 編輯 ]
本站僅提供存儲服務(wù),所有內容均由用戶(hù)發(fā)布,如發(fā)現有害或侵權內容,請
點(diǎn)擊舉報。