无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站投放广告、加入VIP会员,请联系 微信:wuyouceo
查看: 2093|回复: 36
打印 上一主题 下一主题

[原创] 批处理 - QQ在线静默安装

[复制链接]
跳转到指定楼层
1#
发表于 2024-6-12 13:19:05 | 只看该作者 |只看大图 回帖奖励 |正序浏览 |阅读模式
本帖最后由 BEIKING 于 2024-6-12 13:22 编辑

基于 curl.exe,Win10以前系统不能用该脚本。
适配桌面正常系统与PE系统。



  1. @echo off
  2. if /i "%UserName%" == "SYSTEM" (Goto GotAdmin) else (reg query "HKLM\SYSTEM\ControlSet001\Control\MiniNT" 1>nul 2>nul&&Goto GotAdmin)
  3. :BatchGotAdmin
  4. Set _Args=%*
  5. if `%1` neq `` Set "_Args=%_Args:"=""%"
  6. if exist %WinDir%\System32\fltMC.exe fltMC 1>nul 2>nul||mshta VBScript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c """"%~f0"" %_Args%""",,"runas",1)(Window.Close) 2>nul&&Exit /b

  7. :GotAdmin
  8. Pushd "%CD%"&cd /d "%~dp0"
  9. Title QQ在线静默安装&(if exist %WinDir%\System32\ureg.dll Mode 82,21 2>nul)&Color 2f
  10. if defined CommonProgramW6432 (Set "QQScLauncher=%ProgramFiles(x86)%\Tencent\QQ\Bin\QQScLauncher.exe") else Set "QQScLauncher=%ProgramFiles%\Tencent\QQ\Bin\QQScLauncher.exe"
  11. if exist "%QQScLauncher%" (Goto RunQQ) else Set n=0&Goto GetUrl

  12. :GetUrl
  13. Set /a n+=1
  14. chcp 65001 1>nul 2>nul
  15. Set url=&for /f "delims=" %%i in ('curl -s https://cdn-go.cn/qq-web/im.qq.com_new/latest/rainbow/windowsDownloadUrl.js') do for %%j in (%%i) do for /f "tokens=1,* delims=:" %%k in ('echo,"%%~j"') do if /i "%%~k" == "downloadUrl" Set "url=%%~l"
  16. if not defined url if %n% leq 20 (Set /p="_ ."<nul&Goto GetUrl) else chcp 936 1>nul 2>nul&Call :EchoX "cf.:_Download JS file error_"&Pause >nul&Exit /b
  17. chcp 936 1>nul 2>nul

  18. :DownQQ
  19. Cls&Call :EchoX "9f.: 正在下载QQ,请稍等 。。。"&echo.
  20. if not exist "%~dp0QQ.exe" (aria2c -h 1>nul 2>nul&&aria2c "%url%" -o QQ.exe||curl "%url%" -l -o QQ.exe) else Cls
  21. echo.&if not exist "%~dp0QQ.exe" (Call :EchoX "9f:: 下载链接: "&echo %url%&Call :EchoX "cf.: 下载出错!请检查下载链接。"&Pause >nul) else (Call :EchoX "9f.: 正在安装QQ,请稍等 。。。"&QQ.exe /s 1>nul 2>nul&del /q "%~dp0QQ.exe" 2>nul)
  22. Exit /b

  23. :RunQQ
  24. @start "" "%QQScLauncher%" 1>nul 2>nul
  25. Exit /b

  26. :EchoX
  27. Setlocal EnableDelayedExpansion
  28. Set echox=EchoX.exe&&!echox! 1>nul 2>nul||(Set echox=&mkdir "%TEMP%\EchoX" 2>nul&&attrib +s +h "%TEMP%\EchoX" 2>nul)
  29. for %%a in (%*) do (
  30.     Set "param=%%~a"&Set "color=!param:~0,2!"&(if not exist %WinDir%\System32\findstr.exe if not defined echox Set "color=xx")
  31.     Set n=0&(if "!param:~2,2!" == "::" Set n=1)&(if "!param:~2,2!" == ".:" Set n=2)
  32.     if !n! gtr 0 (
  33.         if /i "!color!" == "xx" (Set /p="_!param:~4!"<nul) else (Set param=%%~nxa&if defined echox (!echox! -c !color! -n "!param:~4!") else (Pushd "%TEMP%\EchoX" 2>nul&>"!param:~4!",Set /p= <nul&findstr /a:!color! .* "!param:~4!*"&del "!param:~4!"&Popd))
  34.         if !n! == 2 echo.
  35.     ) else if defined param Set /p="_!param!"<nul
  36. )
  37. Endlocal&Goto :eof
复制代码

复制代码到记事本保存,请务必保存为 ANSI 格式,UTF-8会报错

点评

辛苦了  发表于 2024-6-12 16:35

评分

参与人数 1无忧币 +2 收起 理由
yyz2191958 + 2 赞一个!

查看全部评分

33#
发表于 4 天前 来自手机 | 只看该作者
谢谢分享
回复

使用道具 举报

32#
发表于 2024-10-27 12:26:38 | 只看该作者
非常实用
回复

使用道具 举报

31#
发表于 2024-10-26 20:10:21 | 只看该作者
这里我改动了下,我只要64位的所以改成了“ntDownloadX64Url”


回复

使用道具 举报

30#
发表于 2024-10-26 20:04:06 | 只看该作者
我看到了aria2c 楼主为何没有把附件一块传上来呢!那样应该就支持所有win了吧
回复

使用道具 举报

29#
发表于 2024-10-17 21:22:05 | 只看该作者
我写了一个自动默静安装目录下(soft)的所有exe文件,默认 /s   。不过还没想到自动获取最新版本
回复

使用道具 举报

28#
发表于 2024-10-17 20:31:54 | 只看该作者
本帖最后由 cls822001 于 2024-10-17 21:19 编辑
qrd8008 发表于 2024-10-17 20:16
这个批处理在线静默安装不错,希望楼主添加微信和企业微信,这样更加方便,感谢!

down.jywangluo.cn:88/一键安装/微信在线下载安装.exe
down.jywangluo.cn:88/一键安装/QQ在线静默安装.exe  真静默安装down.jywangluo.cn:88/一键安装/企业微信在线下载安装.exe

添加脚本中....脚本文件在目录


回复

使用道具 举报

27#
发表于 2024-10-17 20:23:18 | 只看该作者
感谢分享
回复

使用道具 举报

26#
发表于 2024-10-17 20:16:53 | 只看该作者
这个批处理在线静默安装不错,希望楼主添加微信和企业微信,这样更加方便,感谢!

点评

down.jywangluo.cn:88/一键安装/微信在线下载安装.exe 添加脚本中脚本文件在目录  详情 回复 发表于 2024-10-17 20:31
回复

使用道具 举报

25#
发表于 2024-10-17 19:13:53 | 只看该作者
为什么我测试下载的不是最新版本,程序获取的不是qq最新版本
回复

使用道具 举报

24#
发表于 2024-6-13 16:53:25 | 只看该作者
楼主,你是不是弄搜狗输入法的那位大佬?www删除.删除423down.com/13827.html[/url],这个版本13.0.0.6801好用,感谢,感谢,
回复

使用道具 举报

23#
发表于 2024-6-13 14:49:31 | 只看该作者
感谢分享,不错
回复

使用道具 举报

22#
发表于 2024-6-13 14:42:12 来自手机 | 只看该作者
感谢分享
回复

使用道具 举报

21#
发表于 2024-6-13 00:08:47 | 只看该作者
谢谢技术分享!
回复

使用道具 举报

20#
发表于 2024-6-12 23:44:48 | 只看该作者
谢谢分享
回复

使用道具 举报

19#
发表于 2024-6-12 22:17:05 | 只看该作者
666
回复

使用道具 举报

18#
发表于 2024-6-12 22:01:13 | 只看该作者
lgkun8 发表于 2024-6-12 14:20
以此类推,是不是可以制作:微信、酷狗等的在线静默安装?

curl https://dldir1v6.qq.com/weixin/Windows/WeChatSetup.exe -l -o WeChatSetup.exe
WeChatSetup.exe /S 1>nul 2>nul
del /q "%~dp0WeChatSetup.exe"
微信
回复

使用道具 举报

17#
发表于 2024-6-12 16:42:54 | 只看该作者
学到了,谢谢分享
回复

使用道具 举报

16#
发表于 2024-6-12 16:34:32 | 只看该作者

谢谢分享
回复

使用道具 举报

15#
发表于 2024-6-12 16:25:16 | 只看该作者
谢谢
回复

使用道具 举报

14#
 楼主| 发表于 2024-6-12 16:24:06 | 只看该作者
martin313 发表于 2024-6-12 16:21
与官方的比,啥区别

下载的就是官方版本,通过官方版本的静默参数,默认路径安装
回复

使用道具 举报

13#
发表于 2024-6-12 16:21:51 | 只看该作者
与官方的比,啥区别

点评

下载的就是官方版本,通过官方版本的静默参数,默认路径安装  详情 回复 发表于 2024-6-12 16:24
回复

使用道具 举报

12#
发表于 2024-6-12 14:59:19 | 只看该作者
感谢楼主分享。
回复

使用道具 举报

11#
发表于 2024-6-12 14:54:18 | 只看该作者
本帖最后由 cnerp 于 2024-6-12 14:55 编辑

win7下报错,说无法下载JS,是没有CURL吧,复制CURL果然不一样,可以用了
回复

使用道具 举报

10#
发表于 2024-6-12 14:38:00 来自手机 | 只看该作者
BEIKING 发表于 2024-6-12 14:01
通过js文件获取最新版地址

静默安装应该不显示批处理,而是显示“下载与安装”的进度条(进度条并附有进度百分比)。最后提示“安装完成”。
回复

使用道具 举报

9#
发表于 2024-6-12 14:32:48 | 只看该作者
谢谢分享
回复

使用道具 举报

8#
发表于 2024-6-12 14:31:13 | 只看该作者
只用TIM
回复

使用道具 举报

7#
发表于 2024-6-12 14:20:55 | 只看该作者
安装QQ用的?
回复

使用道具 举报

6#
发表于 2024-6-12 14:20:08 | 只看该作者
以此类推,是不是可以制作:微信、酷狗等的在线静默安装?

点评

curl https://dldir1v6.qq.com/weixin/Windows/WeChatSetup.exe -l -o WeChatSetup.exe WeChatSetup.exe /S 1>nul 2>nul del /q "%~dp0WeChatSetup.exe" 微信  详情 回复 发表于 2024-6-12 22:01
回复

使用道具 举报

5#
发表于 2024-6-12 14:04:06 | 只看该作者
感谢分享
回复

使用道具 举报

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

本版积分规则

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

闽公网安备 35020302032614号

GMT+8, 2024-11-12 11:48

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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