今天又朋友发帖问WINPE下创建外置工具快捷方式的批处理,
我写了一个,还不是很完善,没做路径是否存在等等的判断,
望高手指点,顺便完善。
谢谢zhaohj兄的抬举,今天重新写了下。
自动搜索所有盘符的根目录下的PETOOLS文件夹,然后创建快捷方式.
呵呵,自恋一下,转帖请注明作者和出处。
下载地址在一楼底。
2010-6-1日更新
批处理如下:
--------------------- For 中文PE & English PE (Beta版)--------------------------------------------------- - @echo off
- :: 自动搜索可见区根目录下的PETOOLS文件夹
- :: 在“「开始」菜单\程序”中创建程序的快捷方式
- :: 需要PECMD支持
- :: 2010-6-1更新(解决软驱无盘报错的情况)
- ::---------------------------------------
- :: It can work in English PE
- :: Currently, it needs PECMD
- :: However, I will let it work without PECMD
- :: It will automatically create shortcuts under the PETOOLS
- :: Copyright plantsoot, 2010-6-1
- :: --------- 中文PE ----------------
- if exist "%USERPROFILE%\「开始」菜单\程序" (
- echo 正在搜索根目录包含PETOOLS文件夹的盘符
- for %%a in (A B C D E F G H I G K L M N O P Q R S T U V W X Y Z) DO (
- dir /a %%a:\PETOOLS >nul 2>nul&&(
- echo 正在创建 %%a:\PETOOLS 的快捷方式,请稍候……
- for /f "delims=" %%b in ('dir %%a:\PETOOLS /a-d /b /s') do PECMD LINK %USERPROFILE%\「开始」菜单\程序\%%~pb\%%~nxb,%%b,shell32.dll#46
- echo %%a:\PETOOLS 的快捷方式创建完成,继续搜索……
- )||echo off
- )
- echo 全盘PETOOLS文件夹快捷方式创建完毕。
- start pecmd.exe mess 快捷方式创建完毕。@成功#OK*15000
- )
- :: --------- For English PE ----------------
- if exist "%USERPROFILE%\Start Menu\Programs" (
- echo Searching PETOOLS directory, please wait ... ...
- for %%a in (A B C D E F G H I G K L M N O P Q R S T U V W X Y Z) DO (
- dir /a %%a:\PETOOLS >nul 2>nul&&(
- echo Creating %%a:\PETOOLS directory shortcut, please wait ... ...
- for /f "delims=" %%b in ('dir %%a:\PETOOLS /a-d /b /s') do PECMD LINK %USERPROFILE%\Start Menu\Programs\%%~pb\%%~nxb,%%b,shell32.dll#46
- )||echo off
- )
- echo Create shortcuts success!
- start pecmd.exe mess Create shortcuts success! @Success#OK*15000
- )
复制代码
2010-6-1日纯英文PE截图
[ 本帖最后由 Plantsoot 于 2010-6-2 00:58 编辑 ] |