无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站广告联系 微信:wuyouceo QQ:184822951
查看: 13450|回复: 36
打印 上一主题 下一主题

[已解决] 求一个将应用程序的快捷方式创建并挂载到PE的桌面的批处理

[复制链接]
1#
发表于 2018-1-10 21:11:14 | 显示全部楼层
论坛里有这个批处理。搜PETOOL就出来了 很多
贴 一个
PETOOLS.INI 由PECMD调用

  1. TIPS 加载PETOOLS工具,到开始菜单...,3000,1,#1
  2. FORX *ab @\PETOOLS,TOOLS,0,EXEC !%Windir%\SYSTEM32\PETOOLS.cmd %TOOLS%
复制代码


PETOOLS.CMD 可以把指定目录下包括子目录下的外置程序添加到菜单和桌面

  1. @echo off
  2. if "%~1"=="" goto :eof
  3. if not defined StartMenu goto :eof
  4. if "%~1"=="merge" goto :merge
  5. if not exist "%~1" goto :eof
  6. SET "BASE_DIR=%~1"
  7. SET "外置程序=%~d1盘_外置程序"
  8. SET "外置程序=%StartMenu%\%外置程序::=%"
  9. CALL,SET "附到桌面=%%外置程序:%StartMenu%=%Desktop%%%"
  10. SET "_TF=%WinDir%\T_PETOOLS_%base_dir:~0,1%_"
  11. IF EXIST "%外置程序%" RD /S /Q "%外置程序%" 2>nul
  12. IF EXIST "%附到桌面%" RD /S /Q "%附到桌面%" 2>nul
  13. :START
  14. DEL "%_TF%*.*" 2>nul
  15. PUSHD "%~F1"
  16. >%_TF%LST.lst dir /s/a/b *.wim *.cmd *.bat *.exe readme*.txt 使用说明*.txt
  17. POPD
  18. PUSHD "%WinDir%"
  19. for /f "usebackq delims=" %%i in (%_TF%LST.lst) do CALL :MAKE_LINK "%%i"
  20. ECHO.EXEC !%~F0 merge "%外置程序%" >>%_TF%LNK.INI
  21. ECHO.EXEC !%~F0 merge "%附到桌面%" >>%_TF%LNK.INI
  22. ECHO.FILE %_TF%LNK.INI>>%_TF%LNK.INI
  23. START PECMD LOAD %_TF%LNK.INI
  24. PUSHD "%~F1"
  25. >"%_TF%SETUP.lst" dir /s/a/b setup.cmd 2>nul
  26. >>"%_TF%SETUP.lst" dir /s/a/b setup.bat 2>nul
  27. POPD
  28. if exist "%_TF%SETUP.lst" For /f "delims=" %%i in ('type "%_TF%SETUP.lst"') do CALL :PETOOLS_REG %%i
  29. DEL %_TF%*.lst
  30. POPD
  31. goto :eof
  32. :MAKE_LINK
  33. SETLOCAL
  34. if "%~1"=="" goto :eof
  35. if /i "%~n1"=="setup" goto :eof
  36. SET ".=%~1"
  37. SET ".=%.:&=^&%"
  38. SET "PETOOLS=%~dpn1"
  39. call,SET "PETOOLS=%%PETOOLS:%BASE_DIR%=%外置程序%%%"
  40. SET "PETOOLS=%PETOOLS:&=^&%"
  41. echo.LINK %PETOOLS%,%.%>>%_TF%LNK.INI
  42. call,SET "PETOOLS=%%PETOOLS:%外置程序%=%附到桌面%%%"
  43. echo.LINK %PETOOLS%,%.%>>%_TF%LNK.INI
  44. GOTO :EOF
  45. :PETOOLS_REG
  46. pushd "%~dp1"
  47. PECMD EXEC !%~nx1
  48. POPD
  49. goto :eof
  50. :merge
  51. PUSHD %2||GOTO :EOF
  52. for /d %%i in ("%~2\*") do call :merge_lnk "%%i"
  53. POPD
  54. goto :eof
  55. :merge_lnk
  56. CD /D %1||GOTO :EOF
  57. for /d %%i in ("%~f1\*") do call %0 "%%i"
  58. CD /D %1||GOTO :EOF
  59. set n=
  60. for /f %%i in ('dir /a/b') do (
  61.     if defined n goto :eof
  62.     set n=1
  63. )
  64. for /f "usebackq delims=" %%i in (`dir /a/b`) do move /y "%%i" ..\
  65. cd..&&rd %1
  66. goto :eof
复制代码

点评

谢谢!不大合我的需要,PETOOLS文件夹要求挂载在PE的桌面,此批处理挂载在PE的开始菜单,而且我还要同时挂载许多其它应用程序和bat的快捷方式到PE的桌面......  详情 回复 发表于 2018-1-10 21:30

评分

参与人数 1无忧币 +5 收起 理由
有阴也有阳 + 5 谢谢!!!

查看全部评分

回复

使用道具 举报

2#
发表于 2018-1-10 21:33:23 | 显示全部楼层
这个是同时挂到桌面和开始菜单。

点评

抱歉!没有细看,很感谢你的热心提供,谢谢!!!但我自己弄得更简单方便——一双击“打开PETOOLS文件夹.bat”,PETOOLS文件夹就打开了......  详情 回复 发表于 2018-1-10 21:37
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2024-5-8 09:20

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表