设为首页收藏本站
切换到宽版

 找回密码
 注册
搜索
批处理之家»论坛 › 批处理专区: BAT CMD DOS › BAT求助&讨论 › [分享讨论] Total Uninstall 6 绿色安装脚本示例 ...
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发新帖
查看: 807|回复: 5

[系统相关] [分享讨论] Total Uninstall 6 绿色安装脚本示例

[复制链接]
chishingchan
发表于 2026-1-31 16:08:21 | 显示全部楼层 |阅读模式
示例：
安装目录：X:\Program Files\Total Uninstall 6

脚本位置：X:\Program Files\Setup Total Uninstall 6.cmd
  1. :: 以隐藏方式运行
  2. if "%1" == "hidden" goto begin
  3. mshta vbscript:createobject("wscript.shell").run("""%~nx0"" hidden",0)(window.close)&&exit
  4. :begin

  6. :: 以管理员身份运行
  7. fltmc >nul 2>&1 || PowerShell Start-Process -Verb RunAs -FilePath '%~s0'&&exit /b

  9. :: 检查系统代码页编号
  10. for /f "tokens=2 delims=: " %%i in ('chcp^|findstr ":"') do set Code=%%i
  11. if %Code%==936 (
  12.   set "MwTU=用 Total Uninstall 监视"
  13.   set "Group=Total Uninstall 6"
  14.   set "Program=Tu.exe"
  15.   set "Shortcut=快捷方式(&H)"
  16.   set "Version=6.22.1.505"
  17. )
  18. if %Code%==950 (
  19.   set "MwTU=使用 Total Uninstall 監控"
  20.   set "Group=Total Uninstall 6"
  21.   set "Program=Tu.exe"
  22.   set "Shortcut=捷徑(&H)"
  23.   set "Version=6.22.1.505"
  24. )
  25. if %Code%==437 (
  26.   set "MwTU=Monitor with Total Uninstall"
  27.   set "Group=Total Uninstall 6"
  28.   set "Program=Tu.exe"
  29.   set "Shortcut=S&hortcut"
  30.   set "Version=6.22.1.505"
  31. )
  32. if %Code%==932 (
  33.   set "MwTU=Total Uninstall で監視"
  34.   set "Group=Total Uninstall 6"
  35.   set "Program=Tu.exe"
  36.   set "Shortcut=ショートカット(&H)"
  37.   set "Version=6.22.1.505"
  38. )
  39. if %Code%==949 (
  40.   set "MwTU=Monitor with Total Uninstall"
  41.   set "Group=Total Uninstall 6"
  42.   set "Program=Tu.exe"
  43.   set "Shortcut=S&hortcut"
  44.   set "Version=6.22.1.505"
  45. )

  47. title %Group% %Version% 安装脚本

  49. :: 检查系统版本号
  50. for /f "tokens=4 delims=[.] " %%i in ('ver') do set V=%%i
  51. if %V% leq 5 mshta vbscript:CreateObject("Wscript.Shell").popup("请运行在 Windows XP 及以上系统版本！",4,"提示",64)(window.close)&&exit

  53. cd /d %~dp0

  55. :: 复制文件
  56. for /f "tokens=2*" %%i in ('REG QUERY "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v "Desktop" ^|findstr "Desktop"') do set "Desktop=%%j"
  57. copy /y "%~dp0%Group%\Program Options.xml" "%Desktop%\%Group%"

  59. :: 添加基本注册表
  60. reg add "HKCR\batfile\shell\TuMonitor" /f /ve /t REG_SZ /d "%MwTU%"
  61. reg add "HKCR\batfile\shell\TuMonitor" /f /v "Icon" /t REG_SZ /d "%~dp0%Group%\%Program%"
  62. reg add "HKCR\batfile\shell\TuMonitor\command" /f /ve /t REG_SZ /d ""%~dp0%Group%\%Program%"  /m"%%1""
  63. reg add "HKCR\exefile\shell\TuMonitor" /f /ve /t REG_SZ /d "%MwTU%"
  64. reg add "HKCR\exefile\shell\TuMonitor" /f /v "Icon" /t REG_SZ /d "%~dp0%Group%\%Program%"
  65. reg add "HKCR\exefile\shell\TuMonitor\command" /f /ve /t REG_SZ /d ""%~dp0%Group%\%Program%" /m"%%1""
  66. reg add "HKCR\Msi.Package\shell\TuMonitor" /f /ve /t REG_SZ /d "%MwTU%"
  67. reg add "HKCR\Msi.Package\shell\TuMonitor" /f /v "Icon" /t REG_SZ /d "%~dp0%Group%\%Program%"
  68. reg add "HKCR\Msi.Package\shell\TuMonitor\command" /f /ve /t REG_SZ /d ""%~dp0%Group%\%Program%" /m"%%1""

  70. :: 创建开始菜单快捷方式
  71. set "P=%APPDATA%\Microsoft\Windows\Start Menu\Programs\%Group%"
  72. md "%P%"
  73. set "N1=%Group%.lnk"
  74. set "D1=%~dp0%Group%\%Program%"
  75. set "A1="
  76. powershell -Command "$ws = New-Object -ComObject WScript.Shell; $s = $ws.CreateShortcut('%P%\%N1%'); $s.TargetPath = '%D1%'; $s.Arguments = '%A1%'; $s.Save()"

  78. :: 创建桌面快捷方式
  79. set "N2=%Group%.lnk"
  80. set "D2=%~dp0%Group%\%Program%"
  81. set "A2="
  82. powershell -Command "$ws = New-Object -ComObject WScript.Shell; $s = $ws.CreateShortcut('%Desktop%\%N2%'); $s.TargetPath = '%D2%'; $s.Arguments = '%A2%'; $s.Save()"

  84. :: 添加上下文快捷方式
  85. if %V% equ 6 (
  86. reg add "HKCR\DesktopBackground\Shell\UpdateInis" /f /v "Icon" /t REG_SZ /d "SHELL32.dll,-040"
  87. reg add "HKCR\DesktopBackground\Shell\UpdateInis" /f /v "MUIVerb" /t REG_SZ /d "%Shortcut%"
  88. reg add "HKCR\DesktopBackground\Shell\UpdateInis" /f /v "Position" /t REG_SZ /d "Bottom"
  89. reg add "HKCR\DesktopBackground\Shell\UpdateInis" /f /v "SubCommands" /t REG_SZ /d ""
  90. reg add "HKCR\DesktopBackground\Shell\UpdateInis\Shell\%Group%" /f /v "Icon" /t REG_SZ /d "%~dp0%Group%\%Program%"
  91. reg add "HKCR\DesktopBackground\Shell\UpdateInis\Shell\%Group%" /f /v "MUIVerb" /t REG_SZ /d "%Group%"
  92. reg add "HKCR\DesktopBackground\Shell\UpdateInis\Shell\%Group%\Command" /f /ve /t REG_SZ /d "%~dp0%Group%\%Program%"
  93. )
复制代码
试了几个隐藏运行的语句，只能用此 3 行才能正常创建到快捷方式！（即代表批处理运行到末尾了）。各位老大有什么看法？
批处理文件必须以 ANSI 编码才能正常运行，所以 %Code%==949 段没办法显示韩语！只能看见 简 繁 英 日。韩用英代替！这个能有办法解决吗？
回复

举报

chishingchan
 楼主| 发表于 2026-1-31 16:19:02 | 显示全部楼层
示例：
安装目录：X:\Program Files\Total Uninstall 6

脚本位置：X:\Program Files\Setup Total Uninstall 6.inf

  2. [Version]
  3. Signature="$CHICAGO$"

  5. [DefaultInstall]
  6. AddReg=AddReg
  7. AddReg=ShortcutMenu
  8. CopyFiles=CopyFiles
  9. UpdateInis=UpdateInis

  11. [DestinationDirs]
  12. CopyFiles=16389        ; X:\Users\Administrator\Documents

  14. [CopyFiles]
  15. Total Uninstall 6\Program Options.xml

  17. [UpdateInis]
  18. Setup.ini,Progman.Groups,,"Desktop=""%16384%"""
  19. Setup.ini,Desktop,,"""%Group%"",""""""%1%\%Group%\%Program%"""""",,,,""%1%\%Group%"",,"""""
  20. %1%\%Group%\Tu.ini,general,,ProgramDataPath=%16389%\%Group%

  22. [AddReg]
  23. HKCR,"batfile\shell\TuMonitor","Icon",,"%1%\%Group%\%Program%"
  24. HKCR,"batfile\shell\TuMonitor",,,"%MwTU%"
  25. HKCR,"batfile\shell\TuMonitor\command",,,"""%1%\%Group%\%Program%""  /m""%%1"""
  26. HKCR,"exefile\shell\TuMonitor","Icon",,"%1%\%Group%\%Program%"
  27. HKCR,"exefile\shell\TuMonitor",,,"%MwTU%"
  28. HKCR,"exefile\shell\TuMonitor\command",,,"""%1%\%Group%\%Program%"" /m""%%1"""
  29. HKCR,"Msi.Package\shell\TuMonitor","Icon",,"%1%\%Group%\%Program%"
  30. HKCR,"Msi.Package\shell\TuMonitor",,,"%MwTU%"
  31. HKCR,"Msi.Package\shell\TuMonitor\command",,,"""%1%\%Group%\%Program%"" /m""%%1"""

  33. [ShortcutMenu]
  34. HKCR,"DesktopBackground\Shell\UpdateInis","Icon",,"SHELL32.dll,-040"
  35. HKCR,"DesktopBackground\Shell\UpdateInis","MUIVerb",,"%Shortcut%"
  36. HKCR,"DesktopBackground\Shell\UpdateInis","Position",,"Bottom"
  37. HKCR,"DesktopBackground\Shell\UpdateInis","SubCommands",,""
  38. HKCR,"DesktopBackground\Shell\UpdateInis\Shell\%Group%","Icon",,"%1%\%Group%\%Program%"
  39. HKCR,"DesktopBackground\Shell\UpdateInis\Shell\%Group%","MUIVerb",,"%Group%"
  40. HKCR,"DesktopBackground\Shell\UpdateInis\Shell\%Group%\Command",,,"%1%\%Group%\%Program%"

  42. [Strings]
  43. MwTU="Monitor with Total Uninstall"
  44. Group=Total Uninstall 6
  45. Program=Tu.exe
  46. Shortcut=S&hortcut
  47. Version=6.22.1.505

  49. [Strings.0804]
  50. MwTU="用 Total Uninstall 监视"
  51. Group=Total Uninstall 6
  52. Program=Tu.exe
  53. Shortcut=快捷方式(&H)
  54. Version=6.22.1.505

  56. [Strings.0404]
  57. MwTU="使用 Total Uninstall 監控"
  58. Group=Total Uninstall 6
  59. Program=Tu.exe
  60. Shortcut=捷徑(&H)
  61. Version=6.22.1.505

  63. [Strings.0411]
  64. MwTU="Total Uninstall で監視"
  65. Group=Total Uninstall 6
  66. Program=Tu.exe
  67. Shortcut=ショートカット(&H)
  68. Version=6.22.1.505

  70. [Strings.0412]
  71. MwTU="Total Uninstall에서 모니터링"
  72. Group=Total Uninstall 6
  73. Program=Tu.exe
  74. Shortcut=바로가기(&H)
  75. Version=6.22.1.505
复制代码
Unicode 编码的 inf 脚本相对 cmd 脚本功能弱了点！因为不能运行某些可执行文件。
回复

举报

chishingchan
 楼主| 发表于 2026-1-31 16:21:54 | 显示全部楼层
本帖最后由 chishingchan 于 2026-1-31 16:23 编辑

inf 版在版本号判断的功能上差了点！也不是不能使用版本号，驱动上是可以的，这里就不清楚！

打算再写一个 VBScript 版！写好再上传。
VBScript 版应该比 cmd 版在功能上可能会更好。
回复

举报

aloha20200628
发表于 2026-1-31 19:35:23 | 显示全部楼层
本帖最后由 aloha20200628 于 2026-1-31 19:44 编辑

回复 1# chishingchan

   一。隐藏运行和提权运行可以用 powershell 一行流完成
   二。存为 utf-8 编码的批处脚本中的中英日韩字面量用 65001 码页可被正常处理，即一楼脚本代码须存为 utf-8 编码，且脚本头部先强制切换为 65001 码页
   据上可订正一楼脚本代码 1-7 行如下：

  2. @echo off
  3. ::提权+隐藏脚本
  4. fltmc>nul 2>nul || (PowerShell -c "start -file '%~f0' -verb runas -win hidden" &exit/b)
  5. ::切换当前码页
  6. chcp 65001>nul
  7. ...脚本其余部分...
复制代码
回复

举报

chishingchan
 楼主| 发表于 2026-1-31 23:35:58 | 显示全部楼层
本帖最后由 chishingchan 于 2026-1-31 23:53 编辑

回复 4# aloha20200628


    这行语句有没有提权不知道，但没有隐藏窗口！
DeepSeek 结果，测试可以：
  1. @echo off
  2. :: 隐藏窗口以管理员身份运行
  3. if "%1"=="hidden" goto :run_as_admin
  4. powershell -Command "Start-Process '%~f0' -ArgumentList 'hidden' -Verb RunAs -WindowStyle Hidden"&&exit /b
  5. :run_as_admin
复制代码
回复

举报

aloha20200628
发表于 2026-2-1 20:01:20 | 显示全部楼层
本帖最后由 aloha20200628 于 2026-2-1 20:14 编辑

回复 5# chishingchan

   还是两个问题，一是 '提权+隐藏一行流' 是否成功，我用 win8.1-10 测试以下两个句式均予通过，但二者用法却有区别，用 fltmc>nul 2>nul 是真实测试当前是否为提权状态，而 if "%~1" neq "hide" 则是仅用命令行参数来判断当前是否为提权状态，当然若 Powershell -c ... 运行结果足够可靠，二者是没有区别 ... 由楼主自择吧

  2. fltmc>nul 2>nul || (PowerShell -c "start -file '%~f0' -verb runas -win hidden" &exit/b)
复制代码

  2. if "%~1" neq "hide" (PowerShell -c "start -file '%~f0' -arg "hide" -verb runas -win hidden" &exit/b)
复制代码
第二个问题，是路径文件名包含韩文会导致创建快捷方式 *.lnk 失败，若采用 wscript.shell 方法创建，这确实是一个难过的梗，建议采用快捷方式的另一版本 *.url 以避之，可见如下的示例代码（须用 utf-8 编码存为 test.bat 运行）...

  2. @echo off & chcp 65001>nul
  3. set "uF=%userprofile%\Desktop\计算器ひらがな漢語선생.url"
  4. (for %%s in ("[internetShortCut]", "url=file:///c:\windows\system32\calc.exe") do echo,%%~s)>"%uF%"
  5. exit/b
复制代码
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 07:06 , Processed in 0.020861 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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