|
回复 #632 2010nmb 的帖子
我不是发了附件吗?还有一个是我以前写的批处理
- @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
- )
复制代码 |
|