突然想到一个点子，让智能做了软件安装一串代码，帮忙看看可行不~谢谢

423dn

懒人菜鸟，突然想到一个问题，每次重装完系统都要安装好多软件，于是突然想到个问题，有木有软件，可以把文件夹里的自定义安装包，自动按顺序依次安装，就省着自己手动一个个找安装包安装了，嘿嘿。。


于是求助AI，给出了一行代码，俺复制代码，保存后，软件也改了对应名称，后缀改成bat格式，可是双击后，一闪而过，没有自动安装。
有木有大神看看，是不是代码哪里需要修改下。谢谢



按自己的要求找到了个办法，在这个帖子里哈
终于找到了这款软件，智能自动安装软件..重装系统后懒人福音 - 综合讨论区 - 无忧启动论坛 - Powered by Discuz!

redapple

需要这样操作吗？bat一行写个软件名就可以了

1. title "软件安装"
   
2. @echo off
   
3. echo "正在安装7Z"
   
4. 7zip.exe
   
5. echo "正在安装PDF软件"
   
6. AcroRdrDC1.exe
   
7. echo "正在安装VNC软件"
   
8. UltraVNC.exe
   
9. echo "正在安装杀毒软件"
   
10. 7Z.EXE x "cnnod_v12_64.zip" -y
    
11. cd cnnod_v12_64
    
12. setup_x64.bat

复制代码

2011lerv

我都是把绿色软件打包后自动批处理绿化的！

打样



https://www.123912.com/s/hng9-kmrTd?提取码:9Kxn

greatpeng

每个软件静默安装的参数不一样吧？

guong

来了解下

rgy

跟我这个帖子的想法有点像，可以看看：
http://bbs.wuyou.net/forum.php?m ... p;page=1#pid4544665

假大空

一般都是au3脚本

onlychinese

我都是能够绿色就绿色，直接放在D盘新建program files目录。

holley2008

哥啊，你这不是bat脚本啊，你这是Inno打包脚本啊

邪恶海盗

软件自动安装器SWAI v2测试版,可根据不同系统版本及位宽批量执行程序
http://bbs.wuyou.net/forum.php?mod=viewthread&tid=423999

phwike

想法不错

wwoldok

我用的都是绿色软件，但是需要一个一个右键固定到开始

ohte

备份注册表更简单

2013ertert

想法不错， 试试这样是不是可以，把需要安装 的程序放在一个文件夹，用批处理 或软件自动安装工具。
一个一个运行，前提是，要处理好每一个程序的静默执行 的参数。很多程序要手动 同意然后 一步一步确认才能安装的。

wind315

大神牛B说三遍

大大大板砖

mark一下，下次方便回看

wjgyz740526

ai给的明显不是bat代码

太湖哥

好想法

sf9608

2011lerv 发表于 2025-5-28 11:31
我都是把绿色软件打包后自动批处理绿化的！

打样

自己能把需要的软件加上吗？

2011lerv

sf9608 发表于 2025-5-28 16:06
自己能把需要的软件加上吗？

可以，不过我好像把批处理加密了~~

redapple

用这个软件查询

奈绪

2011lerv 发表于 2025-5-28 16:46
可以，不过我好像把批处理加密了~~

大佬，能传一个没有加密的吗？谢谢您。

2011lerv

奈绪 发表于 2025-5-28 17:28
大佬，能传一个没有加密的吗？谢谢您。

1. @echo off&color
   
2. if exist "%SystemRoot%\SysWOW64" path %path%;%windir%\SysNative;%SystemRoot%\SysWOW64;%~dp0
   
3. bcdedit >nul
   
4. if '%errorlevel%' NEQ '0' (goto UACPrompt) else (goto UACAdmin)
   
5. :UACPrompt
   
6. %1 start "" mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)&exit
   
7. exit /B
   
8. :UACAdmin
   
9. mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\卸载清理.lnk""):b.TargetPath=""%~sdp0tools\HiBitUninstaller-Portable.exe"":b.WorkingDirectory=""%~dp0"":b.Save:close")
   
10. mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\爱奇艺万能播放器.lnk""):b.TargetPath=""%~sdp0奇艺万能播放器\GeePlayer.exe"":b.WorkingDirectory=""%~dp0"":b.Save:close")
    
11. echo --创建桌面快捷方式--
    
12. start /B "" "%~sdp0office2010\office2010.cmd"
    
13. start /B "" "%~sdp02345pic\2345pic.bat"
    
14. start /B "" "%~sdp0QQ\QQ.bat"
    
15. start /B "" "%~sdp0Internet Download Manager\!绿化.bat"
    
16. start /B "" "%~sdp07-Zip\7ZIP.cmd"
    
17. start /B "" "%~sdp0Supermium\优化.bat"
    
18. start /B "" "%~sdp0Maye\Maye.exe"
    
19. start /B "" "%~sdp0WeChat\微信.bat"
    
20. exit

复制代码

明文奉上，可以自行修改，互相学习！

12qaz

学习学习

f020214

什么东西？不能一个个安装？

xst

想法不错

老只牛

主要现在安装的软件不是都用得上，就算重装了，也不一定装回原来的软件。

奈绪

2011lerv 发表于 2025-5-28 17:49
明文奉上，可以自行修改，互相学习！

谢谢分享，辛苦了。

2012huguoliang

redapple 发表于 2025-5-28 11:23
需要这样操作吗？bat一行写个软件名就可以了

你这应该要带静默安装参数更好

msold5

常装系统的人都用绿色静默安装版，其他放D盘的都用着次使用自动绿化的软件。