【20240704更新】Alist+Rclone AlistPlus一键安装脚,本搭建本地影音共享...

fireye

前言
本人在网上折腾很多教程，以及用了论坛提供的提脚，有些是以SH，安装GIT工具来做为开机启动，有些是用VBS脚本来实现，总之特别麻烦。而且需要安装这安装那，我比较懒，干脆动手做一个批处理脚本解决。不多说，先放代码。本脚本是方便Alist搭建网盘，可以配置阿里云，123PAN，百度云等网盘挂载为本地，以WEBDAV的形式挂载。比网上的教程要方便好用。

本脚本的特色自动下载最新的Alist，并且以windows服务的方式启动自动下载最新的RaiDrive，全自动安装自动更新Alist为最新的，每隔三天左右更新一次，添加为计划任务。安装过程中完全自动化，无需手工，会自动显示Alist账号和密码。安装过程中会弹出web界面进行初始化设备会自动添加Alist的目录为环境变量，方便以后执行alist的相关命令，可以在cmd下执行alist --help查看需要设置的是两个地方，一个alistpath就是alist安装路径还有一个需要设置的就是alist服务名，也可以不用改，根据自己的爱好。

已经放弃RaiDrive，广告太多，使用Rclone，开源无广告好用。

ALIST目录下建立tools文件夹，用于放置各种工具，例如jq,sed,awk等工具
代码进行大量的优化和精简，模块化的操作，可阅读性极强。
解决修复了各种出错
分以下四种情况操作。全部自动选择处理。
重新安装：文件存在，但服务都不存在，需要重装。
全新安装：文件和服务都不存在，需要全新安装。
升级安装：文件存在，服务也安装过了，需要升级。
修复安装：文件不存在，但服务也安装过了，需要修复。
关于RaiDrive无法显示盘符的问题，
原因是开机后ALIST没有启动或者是RaiDrive服务比ALIST服务先启动了，导致这样的问题。解决方案就是，弄一个启动脚本即可。这样的话，Alist以服务方式安装后会比RaiDrive优先启动，这样就不会添加NAS盘符而无故消失的问题。

[PowerShell] 纯文本查看 复制代码

net stop RaiDrive.Service
TIMEOUT /t 15 >NUL
net start RaiDrive.Service

脚本说明

• 自动下载最新的Alist，并且以windows服务的方式启动
• 自动下载最新的RaiDrive，全自动安装
• 自动更新Alist为最新的，每隔三天左右更新一次，添加为计划任务。
• 安装过程中完全自动化，无需手工，会自动显示Alist账号和密码。
• 安装过程中会弹出web界面进行初始化设备
• 会自动添加Alist的目录为环境变量，方便以后执行alist的相关命令，可以在cmd下执行alist --help查看
• 需要设置的是两个地方，一个alistpath就是alist安装路径
• 还有一个需要设置的就是alist服务名，也可以不用改，根据自己的爱好。
  

视频播放效果



音频播放效果




RAIDRIVE的设置


附件下载


已经修复闪退、被误杀、被拦截、没有权限、需要重启等诸多的问题，并且自动将设置RaiDrive的启动方式设置为自动延迟启动，避免Alist还没启动。Raidrive先启动导致网盘重启后无法挂载的问题。
并且自动修复环境变量重复和排序先后的问题，解决卸载问题。

vip198926

fireye 发表于 2022-11-19 21:15
别放C盘，建议放D

没有放在C盘，放的就是D盘，只是缺少很多命令行的程序，自己用chocolatey安装好了，还有很多命令用的是XXX64 比如“jq64” WIN11 上面都报错了，我把64删除就好了
还有批处理的跟目标需要一个“nssm64.exe”文件

还有一点批处理放到“D:\SoftAPP\Alist”这个目录也会出错，应该是Alist目录和Alist.exe在名字上有冲空，我在后面加了个字母解决了





安装时一定得是管理员运行，如果中途出错退出了，再次装的时候就只是更新安装了，所以没有完整安装的吾友可以改33行代码
IF %ISfirst%==11 GOTO Upgrade  将这里的“Upgrade”为“ReInstall”  “Install” “RepairInstall”其一等方式重新安装
我WIN11 可以运行所需要的文件和批处理修改后可以正常安装的文件下载： SoftAPP.zip (172.89 KB, 下载次数: 725)

2022-11-19 23:56 上传

点击文件名下载附件

不想改批处理里面的地址就解压出来放到D盘根目录再以管理员身份运行脚本

tzwdj01

大佬好，密码的文档只有账号admin 密码是空的怎么破

fireye

[Bash shell] 纯文本查看 复制代码

@ECHO OFF&(PUSHD "%~DP0")&(REG QUERY "HKU\S-1-5-19">NUL 2>&1)||(powershell -Command "Start-Process '%~sdpnx0' -Verb RunAs"&&EXIT)
SETlocal enabledelayedexpansion
title Alist安裝助手 V1.0 by Fireye
Echo  ========================== 使用說明，請仔細看清楚 =========================
Echo                        南無大願地藏王菩薩 地獄不空 誓不成佛
Echo 1、第一次安裝系統會自動退出一次，不要驚慌，請重新再咝幸淮危?
Echo 2、WIN7、WIN10、WIN11都測試正常，可以說目前比較完善。
Echo 3、自動更新、首次安裝彈出後臺，密碼在桌面，如果不想用可以卸載。
Echo 4、自動識別是否安裝過ALIST，並且傻瓜化的方式引導安裝。
Echo 5、若有問題，請聯繫微信：858099909，郵箱：[email]jilefo@outlook.com[/email]
Echo 6、若需要遠程協助，請提前安裝好向日葵遠程工具。
Echo 7、Alist如何掛載，幫助等請看官方文檔，本人非Alist作者。
Echo 8、本人花了大量的時間和精力研究測試，前前後後花了差不多一個月來編寫、修復、並且遠程幫助網友，但有些人竟然拿去騙錢。這太不好吧？尊重一下別人的勞動成果。
Echo 9、希望有些人多看一下Alist官方文檔，養成一個好習慣，掛載相關的問題，文檔寫的清清楚楚，別啥都來要求別人幫忙。
Echo  =========================================================================

   ::設置咝协h境
 SET AppUp=AlistPlus
 SET ServiceName=AlistDriveService
 SET AppName=alist
 SET ReposName=alist-org
 SET ReleasesUrl=https://api.github.com/repos/%ReposName%/%AppName%/releases
 SET RaiD=RaiDrive.Service
 SET AppUPath=%ALLUSERSPROFILE%\%AppUp%
[url=home.php?mod=space&uid=251666]@rem[/url]  SET Tools=%ALLUSERSPROFILE%\%AppUp%\Tools
 SET RunPath=%~dp0
 SET Gitee=https://gitee.com/jilefo/%AppUp%
 SET AlistUrl=http://127.0.0.1:5244

cls
Echo  ========================== Alist安裝管理器 V1.0 =========================
Echo                        南無大願地藏王菩薩 地獄不空 誓不成佛
Echo  =========================================================================
WMIC Process Get ExecutablePath | Findstr /i "%AppName%.exe" >NUL 2>NUL>%AppName%Path.txt&&Goto AlistFind||Goto FindPath

:AlistFind
        for /f "delims=" %%o in (%AppName%Path.txt) do (
        SET AListPath=%%o
        call set "AListPath=%%AListPath:!AppName!.exe=%%"
        call set "AListPath=%%AListPath: =%%"
      )
Goto AppPath

:FindPath
      ::沒有安裝過%AppName%
    echo 正在努力搜索系統是否安裝過Alist，請默念南無地藏王菩薩！
    set Num=0&&SET Nums=0
    for /f "delims=^" %%i in ('fsutil fsinfo drives') do set DrivesList=%%i
    for %%a in (%DrivesList%)  do (
        set /a Num+=1
        if !Num! GEQ 2 set /a Nums+=1&&@echo [!Nums!], %%a
    )
    set N=0&&set Ns=0
    set /p input="請輸入對應數字選擇安裝盤符:"
    for %%a in (%DrivesList%) do (
        set /a N+=1 
        if !N! GEQ 2 set /a Ns+=1
        if !Ns!==!input! set "DRiver=%%a"
    )
    SET AlistPath=!DRiver!SoftAPP\Alist\

:AppPath
    IF NOT EXIST !AlistPath! md !AlistPath!
    IF NOT EXIST !AlistPath!tools md !AlistPath!tools
    IF NOT EXIST !AlistPath!Cache md !AlistPath!Cache
    Echo 正在檢查環境組件....
    IF NOT EXIST "%SystemRoot%\System32\curl.exe" (PowerShell -c "Set-ExecutionPolicy -ExecutionPolicy RemoteSigned -Scope CurrentUser;Iwr -useb %Gitee%/raw/main/tools/curl.exe -outfile '%SystemRoot%\System32\curl.exe'") 
    IF NOT EXIST "%SystemRoot%\System32\7za.exe" (PowerShell -c "Set-ExecutionPolicy -ExecutionPolicy RemoteSigned -Scope CurrentUser;Iwr -useb %Gitee%/raw/main/tools/7za.exe -outfile '%SystemRoot%\System32\7za.exe'") 
    cd /d !AlistPath!tools

    Echo !AlistPath! | Findstr /ir "\\.$">NUL 2>NUL&&SET AppPath=!AlistPath!||set AppPath=!AlistPath!\
    Echo 安裝目錄：「%AppPath%」&TIMEOUT /t 5 >NUL

    @REM for /f "delims=" %%a in ('curl -sL %Gitee%/tools.txt') do (
    @REM IF NOT EXIST "!AlistPath!tools\%%a" curl -#Lo "!AlistPath!tools\%%a" %Gitee%/%%a
    @REM )
    
    IF NOT EXIST "!AlistPath!tools\tools.7z" (
      curl -#Lo "!AlistPath!tools\tools.7z" %Gitee%/releases/download/test/tools.7z
      7za x -y -o!AlistPath!tools !AlistPath!tools\tools.7z -aoa
   )

    @REM IF NOT EXIST "!AlistPath!tools\ConEmu64.exe" 7za x -y -o%SystemRoot% !AlistPath!tools\ConEmu64.7z -aoa >NUL 2>NUL

        ::環境變量去重
    Echo %path% | sed64 -e "s#;;#;#g" | sed64 -e "s#\/#\\#g" | sed64 -e "s/;/\n/g"| sed64 -e "/\"/s/"//g"|sed64 "s/\\$//g"| sed64 "/^[[:blank:]]*$/d" | sort64 -ufb >!AppPath!tools\NewPath.txt
      ::先提取windows爲主的關鍵詞
    Findstr /ir "windows"  !AppPath!tools\NewPath.txt>!AppPath!tools\PathWin.txt
      ::查找非windows爲主的關鍵詞導出來
    Findstr /ir "\:" !AppPath!tools\NewPath.txt | Findstr /irv "windows">!AppPath!tools\PathUsr.txt
      ::然後一起列印合並成新的檔, 以分號隔開
    copy !AppPath!tools\PathWin.txt+!AppPath!tools\PathUsr.txt temp.txt >NUL 2>NUL
    gawk64 "{printf $0\";\"}" !AppPath!tools\temp.txt>!AppPath!tools\NewPath.txt
      ::讀取檔到變量
    for /f "delims=" %%l in (!AppPath!tools\NewPath.txt) do SET EnvironmentPath=%%l
    if "%EnvironmentPath%" neq "%path%" echo ok && WMIC ENVIRONMENT Where "name='path' And username='<SYSTEM>'" Set VariableValue='%EnvironmentPath%;!AppPath!;!AppPath!tools'>NUL 2>NUL

      ::判斷是否為第一次安裝
    IF EXIST "%AppPath%!AppName!.exe" (SET ISexist=1) ELSE (SET ISexist=0)
      ::判斷檔是否存在
    WMIC Service GET name | Findstr /i "%ServiceName%" >NUL 2>NUL&&SET ISservs=1||SET ISservs=0

    SET ISfirst=%ISexist%%ISservs%
      ::根據當前系統存在各種情況進行判斷
    IF %ISfirst%==10 GOTO ReInstall
    IF %ISfirst%==00 GOTO Install
    IF %ISfirst%==01 GOTO RepairInstall
    IF %ISfirst%==11 GOTO Upgrade

:ReInstall
   ::10-重新安裝：檔存在，但服務都不存在，需要重裝。
    Echo ============重新安裝============

       ::調用服務安裝模組
    CALL :Service

       ::調用Alist配置模組
    CALL :AlistWeb

       ::調用計畫任務升級
    CALL :Taskschd

    goto :Rclone

:Install
   ::00-全新安裝：檔和服務都不存在，需要全新安裝。
    Echo ============全新安裝============

        ::調用下載和啟動服務模組
    CALL :Down

    CALL :Version

        ::調用服務安裝模組
    CALL :Service

        ::調用Alist配置模組
    CALL :AlistWeb

    Echo    ::調用計畫任務升級
    CALL :Taskschd

    goto :Rclone
    

:RepairInstall
   ::01-修復安裝：檔不存在，但服務也安裝過了，需要修復。
    Echo ============修復安裝============

    CALL :Version

       ::調用下載和啟動服務模組
    CALL :Down

       ::調用服務安裝模組
    CALL :Service

       ::調用Alist配置模組
    CALL :AlistWeb

    goto :Rclone

:Upgrade
   ::11-升級安裝：檔存在，服務也安裝過了，需要升級。
    Echo ============升級安裝============

       ::調用最新版本獲取模組
    CALL :Version

    Echo =====正在判斷是否需要升級===
    if "%CurrentVersion%" == "%LatestVersion%" (Echo %AppName%版本已經是最新的%LatestVersion%版，無需升級!) else (
      Echo %AppName%的當前為%CurrentVersion%版，最新是%LatestVersion%，需要升級!
      net stop %ServiceName%>NUL 2>NUL
      nssm64 stop %ServiceName%>NUL 2>NUL
      del /q !AppPath!%AppName%.exe
      Echo %AppName%正在升級中，請稍等

         ::調用下載和啟動服務模組
      CALL :Down
      nssm64 start %ServiceName%>NUL 2>NUL&TIMEOUT /t 2 >NUL
      TIMEOUT /t 2 >NUL
 
  )

goto :Rclone

:Service
       ::獲取服務的安裝狀態，判斷服務是否存在
    Echo 正在檢查Alist開機自啟服務。
    WMIC Service GET name | Findstr /i "%ServiceName%" >NUL 2>NUL&&Echo %ServiceName% 已經安裝過了 ||Echo 沒安裝，正在安裝Alist開機自啓&&nssm64 install %ServiceName% !AppPath!%AppName%.exe server&TIMEOUT /t 2 >NUL
    nssm64 restart %ServiceName%>NUL 2>NUL&TIMEOUT /t 2 >NUL
goto :EOF

:AlistWeb
    Echo 恭喜成功
    Echo =====請設置ALIST，按任意鍵繼續===
    Echo 恭喜恭喜，賀喜賀喜，Alist終於搞定了。>password.txt
    Echo 下麵是用戶和密碼>>password.txt
    Echo --------------以下是用戶名-------------->>password.txt
    Echo admin>>password.txt
    Echo --------------以下是密碼-------------->>password.txt
    cd /d !AppPath!
    !AppPath!%AppName%.exe admin set abc123
    echo abc123 >>password.txt
    mshta vbscript:msgbox("abc123",64,"Alist的密码")(window.close)
    cd /d !AppPath!tools
      ::配置防火牆，防止外網無法訪問
    net start MpsSvc>NUL 2>NUL
    sc config MpsSvc start=auto >NUL 2>NUL
    Netsh Advfirewall Set Allprofiles State ON>NUL 2>NUL
    Netsh Advfirewall Firewall Show Rule "%AppName%TCPIn" | Findstr /i "5244" >NUL 2>NUL||Netsh AdvFirewall Firewall Add Rule Name="%AppName%TCPIn" Protocol=TCP Dir=In Localport=5244 Action=Allow Enable=Yes&&Echo 添加防火牆成功
    Netsh Advfirewall Firewall Show Rule "%AppName%NetIn" | Findstr /i "NetIn" >NUL 2>NUL||Netsh AdvFirewall Firewall Add Rule Name="%AppName%NetIn" Dir=In Program="%AppPath%%AppName%.exe" Action=Allow Enable=yes
goto :EOF

:Version
       ::獲取雲上最新版本
        ::設置最新版本資訊為變量LatestVersion
    for /f "delims=" %%a in ('Curl64 --ssl-no-revoke -sL !ReleasesUrl! ^|jq -r ".[0].name" ') do SET LatestVersion=%%a
    for /f "delims=" %%b in ('curl64 -sL %AlistUrl%/api/public/settings ^|jq -r .data.version') do SET CurrentVersion=%%b
goto :EOF

:Down
       ::獲取下載地址
    SET AppFile=amd64.zip
    for /f "delims=" %%a in ('Curl64 --ssl-no-revoke -sL !ReleasesUrl! ^| jq -r ".[0].assets[].name" ^| findstr /ri "amd64.zip"') do SET AppFile=%%a
	for /f "delims=" %%d in ('Curl64 --ssl-no-revoke -sL !ReleasesUrl! ^| jq -r ".[0].assets[].browser_download_url" ^| findstr /ri "%AppFile%"') do SET AppUrl=%%d

  ::此处自动获取GITHUB高速下载的链接
    SET CurlSpeed=curl64 -Lo /dev/null -skw "%%{speed_download}\n"
    for /f "tokens=2,* delims='" %%a in ('curl64 -sL https://update.greasyfork.org/scripts/412245/Github%20%E5%A2%9E%E5%BC%BA%20-%20%E9%AB%98%E9%80%9F%E4%B8%8B%E8%BD%BD.user.js ^|sed -n "/const download_url_us =/,/, download_url =/p"') do (
        set ProxyHost=%%a
        call set "ProxyHosts=%%ProxyHost:/https://github.com=%%"
        call set "ProxyHosts=%%ProxyHosts:/github.com=%%"
        for /f %%b in ('%CurlSpeed% !ProxyHosts!/%AppUrl%') do Set DownSpeed=%%b
        SET sorts=!sorts!;!ProxyHosts!,!DownSpeed!
        echo !ProxyHosts! 下載速度=!DownSpeed!KB/s
    )

    for /f %%b in ('echo !sorts!^|sed64 "s/;/\n/g"^|sort64 -t "," -unrk2^|gawk64 -F"," "NR==1 {print $1}"') do Set FastProxy=%%b
    for /f %%b in ('echo !sorts!^|sed64 "s/;/\n/g"^|sort64 -t "," -unrk2^|gawk64 -F"," "NR==1 {print $2}"') do Set FastSpeed=%%b
    echo 經測試，當前速度最快的代{过}{滤}理爲%FastProxy%, 下載速度爲%FastSpeed%KB/s

       ::下載安裝
    Echo 正在下載中......
    @REM del /q !AppPath!%AppFile%">NUL 2>NUL
    if exist "!AppPath!Backup\%AppName%-%LatestVersion%.zip" (
    7za x -y -o!AppPath! !AppPath!Backup\%AppName%-%LatestVersion%.zip
    )  else (

    Curl64 -#Lo "!AppPath!%AppName%-%LatestVersion%.zip" %FastProxy%/%AppUrl%
    if exist "!AppPath!%AppName%-%LatestVersion%.zip" (
      for /f "delims=(" %%i in ('7za t !AppPath!%AppName%-%LatestVersion%.zip ^|findstr /ri "bytes" ^|gawk64 -F" " "{print $5}"') do set FileSize=%%i
      )
    if %FileSize% GEQ 20 (7za x -y -o!AppPath! !AppPath!%AppName%-%LatestVersion%.zip -aoa >NUL 2>NUL) else (
        del /q %AppFile%>NUL 2>NUL
        Curl64 -#Lo "!AppPath!%AppName%-%LatestVersion%.zip" %FastProxy%/%AppUrl%
        7za x -y -o!AppPath! !AppPath!%AppName%-%LatestVersion%.zip -aoa
    )
    move !AppPath!%AppName%-%LatestVersion%.zip !AppPath!Backup
    )

goto :EOF

:Taskschd
    Echo 正在添加計畫任務，自動更新Alist
    SET var=0
       ::讀取任務計畫中的%AppUp%任務,如果有就顯示,如果沒有就報錯
    schtasks /query /tn %AppUp%  | Findstr /m "%AppUp%" >NUL 2>NUL&&SET var=1  
       ::檢查上一條指令是否產生與ABC有關的資訊,如果沒有就執行X;如過有就執行Y
    if ERRORLEVEL 1 (schtasks /create /ru system /tn "%AppUp%" /tr !AppPath!%AppUp%.bat /ST 21:30 /sc weekly /mo 1 /d FRI&&Echo 添加升級任務成功)else (Echo 升級任務已經存在)
    TIMEOUT /t 2 >NUL
    net start %RaiD% >NUL 2>NUL
 
goto :EOF
:Rclone
  !AppPath!tools\WinFsp.msi /qn
  ::配置rclone
  rclone config create AlistDrive webdav url %AlistUrl%/dav vendor webdav user admin pass abc123 pacer_min_sleep 0.01ms --config !AppPath!data\rclone.conf  >NUL 2>NUL

  ::获取可用挂载的盘符
  for %%i in (H I J K L M N O P Q R S T U V W X Y Z) do (
    echo %DrivesList%|findstr /ri %%i >nul 2>nul ||set LastDrives=%%i:
  )

  ::安装rclone为服务
  WMIC Service  GET name | Findstr /i "rclone" >NUL 2>NUL&&Echo rclone 已經安裝過了 ||Echo 沒安裝，正在安裝rclone開機自啓&&nssm64 install rclone !AppPath!tools\Rclone.exe mount AlistDrive:/ %LastDrives% --network-mode --vfs-disk-space-total-size 10T --vfs-fast-fingerprint --copy-links --no-gzip-encoding --no-check-certificate --use-mmap --dir-cache-time 48h --vfs-cache-max-age 72h --cache-dir=!AppPath!cache --vfs-cache-mode full --no-modtime --buffer-size 32M --vfs-read-chunk-size 64M --vfs-read-chunk-size-limit 1G --vfs-cache-max-size 10G --header \"Referer:\" --config !AppPath!data\rclone.conf
  echo 开始添加存储
  nircmd shexec "open" "https://alist.nn.ci/zh/guide/drivers/" 
  nircmd shexec "open" "https://alist.nn.ci/tool/aliyundrive/request.html" 
  nircmd shexec "open" "%AlistUrl%/@manage/storages" 
  nssm64 restart rclone

  :: 生成卸載文檔
    @REM curl -#Lo "!AppPath!tools.txt" %Gitee%/tools.txt
    Echo @Echo off>!AppPath!!AppName!卸載.cmd
    Echo set BakName=%%date:~0,4%%%%date:~5,2%%%%date:~8,2%%%%TIME:~0,2%%%%TIME:~3,2%%%%TIME:~6,2%%>>!AppPath!!AppName!卸載.cmd
    Echo SETlocal enabledelayedexpansion>>!AppPath!!AppName!卸載.cmd
    Echo SET AppName=alist>>!AppPath!!AppName!卸載.cmd
    Echo set AppPath=!AppPath!>>!AppPath!!AppName!卸載.cmd
    Echo Echo title Alist卸載工具 V1.0 by Fireye>>!AppPath!!AppName!卸載.cmd
    Echo Echo  ========================== Alist卸載工具 V1.0 =========================>>!AppPath!!AppName!卸載.cmd
    Echo Echo                        南無大願地藏王菩薩 地獄不空 誓不成佛                  >>!AppPath!!AppName!卸載.cmd
    Echo Echo  =========================================================================>>!AppPath!!AppName!卸載.cmd
    Echo Echo 正在備份相關數據........>>!AppPath!!AppName!卸載.cmd
    Echo nssm64 stop %ServiceName%>>!AppPath!!AppName!卸載.cmd
    Echo nssm64 remove %ServiceName% confirm>>!AppPath!!AppName!卸載.cmd
    Echo nssm64 stop Rclone>>!AppPath!!AppName!卸載.cmd
    Echo nssm64 remove Rclone confirm>>!AppPath!!AppName!卸載.cmd
    Echo "7za a -mx9 !AppPath!Backup\DataffffBakNamegggg.zip !AppPath!Data">>!AppPath!!AppName!卸載.cmd
    Echo "TIMEOUT /t 5 >NUL 2>NUL">>!AppPath!!AppName!卸載.cmd
        Echo WMIC ENVIRONMENT Where "qqqqname='path' And username='<SYSTEM>'wwww" set VariableValue='%DelPathVar%'>>!AppPath!!AppName!卸載.cmd

    Echo Echo 正在卸載........>>!AppPath!!AppName!卸載.cmd
    Echo schtasks /delete /tn "%AppUp%" /f>>!AppPath!!AppName!卸載.cmd
    Echo schtasks /delete /tn "AlistUpgrade" /f>>!AppPath!!AppName!卸載.cmd
    @REM Echo "for /f aaadelims=bbb %%%%%d in (tools.txt) do ( ">>!AppPath!!AppName!卸載.cmd
    @REM Echo del /q ffffSystemRootgggg\%%%%%d >>!AppPath!!AppName!卸載.cmd
    Echo )>>!AppPath!!AppName!卸載.cmd
    Echo echo 正在清理相關防火牆規則>>!AppPath!!AppName!卸載.cmd
    Echo Netsh AdvFirewall Firewall del rule %msedgewebview2>>!AppPath!!AppName!卸載.cmd
    Echo Netsh AdvFirewall Firewall del rule %AppName%NetIn>>!AppPath!!AppName!卸載.cmd
    Echo Netsh AdvFirewall Firewall del rule %AppName%TCPIn>>!AppPath!!AppName!卸載.cmd
    Echo RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters>>!AppPath!!AppName!卸載.cmd
    Echo gpupdate /force>>!AppPath!!AppName!卸載.cmd
    Echo "taskkill /f /im explorer.exe&&start explorer.exe">>!AppPath!!AppName!卸載.cmd
    sed64 -ri "s/^\"//g" !AppPath!!AppName!卸載.cmd
    sed64 -ri "s/\"$//g" !AppPath!!AppName!卸載.cmd
    sed64 -ri "s/aaa/\"/g" !AppPath!!AppName!卸載.cmd
    sed64 -ri "s/bbb/\"/g" !AppPath!!AppName!卸載.cmd
    sed64 -ri "s/ffff/\%%/g" !AppPath!!AppName!卸載.cmd
    sed64 -ri "s/gggg/\%%/g" !AppPath!!AppName!卸載.cmd
    sed64 -ri "s/qqqq/\"/g" !AppPath!!AppName!卸載.cmd
    sed64 -ri "s/wwww/\"/g" !AppPath!!7za!卸載.cmd
rem )

    copy %RunPath%\%AppUp%.CMD !AppPath! /y>%RunPath%\copycmd.bat
     ::創建桌面快捷方式
    nircmd shortcut "!AppPath!!AppName!PLUS.CMD" "~$folder.desktop$" "Alist更新">NUL 2>NUL
    nircmd shortcut "!AppPath!!AppName!卸載.cmd" "~$folder.desktop$" "Alist卸載">NUL 2>NUL
    nircmd cmdshortcut "~$folder.desktop$" "Alist重啟" service restart %ServiceName%
    nircmd cmdshortcut "~$folder.startup$" "Alist重啟" service restart %ServiceName%
    nircmd shortcut "!AppPath!!AppName!.exe" "~$folder.windir$" "Alist">NUL 2>NUL
    nircmd urlshortcut "%AlistUrl%" "~$folder.desktop$" "Alist後臺">NUL 2>NUL
    nircmd shortcut "!AppPath!password.txt" "~$folder.desktop$" "Alist密碼">NUL 2>NUL
    nircmd urlshortcut "https://alist.nn.ci/zh/guide/#what-s-this" "~$folder.desktop$" "Alist幫助文檔">NUL 2>NUL
    nircmd shortcut "!AppPath!!AppName!.exe" "~$folder.windows$" "Alist">NUL 2>NUL
    copy %WinDir%/alist.lnk !AppPath!\tools>NUL 2>NUL

    ::自動清靜之前的VBS啟動試
Echo 自動清理之前設置過ALIST開機，刪除之前先進行備份....
set Startup=%APPDATA%\Microsoft\Windows\Start Menu\Programs\Startup\
md !AppPath!Backup>NUL 2>NUL
xcopy "%Startup%" "!AppPath!Backup\" /e /h /y /c /r >NUL 2>NUL
rem del /s /q %Startup%*.bat %Startup%*.vbs %Startup%*.cmd %Startup%*.lnk
      ::複製本腳本到安裝目錄
  Echo IF NOT EXIST "!AppPath!%AppUp%.CMD" copy %RunPath%\%AppUp%.CMD !AppPath! /y>%RunPath%\copycmd.bat
  nircmd execmd %RunPath%\copycmd.bat

CLS
Echo.&Echo 恭喜完成 
Echo  ========================== 製作不易，請勿拿去騙錢 =========================
Echo                        南無大願地藏王菩薩 地獄不空 誓不成佛
Echo 不用感謝我，如果真想謝的話，請真盏哪�念三遍【南無大慈大悲地藏王菩薩】
Echo=========================================================================
TIMEOUT /t 30 >NUL&EXIT

goto :EOF

安遇予而欢

哥，我的WIN11闪一下就没了好像什么也没发生...

vip198926

fireye 发表于 2022-11-16 16:43
不会用的同志，下载这个放任何一个目录，记得使用前修改文件里的路径为你自己的。

WIN11闪退

PS C:\Users\adminw\Desktop\AlistUpgrade> .\AlistUpgrade.bat
============升级安装============
'nssm64' 不是内部或外部命令，也不是可运行的程序
或批处理文件。
'jq64' 不是内部或外部命令，也不是可运行的程序
或批处理文件。

chaes

请问下载这个程序放在D盘运行后，自动布署所有的配置，是这个意思吗？

光之守护天使

恭喜恭喜，賀喜賀喜，Alist終於搞定了。
下麵是用戶和密碼，用於登錄後臺和設置RaiDrive
--------------以下是用戶名--------------
admin
--------------以下是密碼--------------


密码是空的，要填什么

脚本小子

如果要卸载要怎么搞

fireye

tyz1050 发表于 2023-2-6 20:11
我放到D盘根目录了，到这步一直卡着一小时了

远程看一下

yingchengfeng

学习了，涨姿势

安遇予而欢

哥...不会用...救救

ZKFF1010

脑袋开始晕了

fireye

不会用的同志，下载这个放任何一个目录，记得使用前修改文件里的路径为你自己的。

bufeiyan1011

不修改文件的路径可以运行吗？下载完成会有什么提示吗？

fireye

bufeiyan1011 发表于 2022-11-16 16:57
不修改文件的路径可以运行吗？下载完成会有什么提示吗？

可以，在d:\softapp\alist里，会自动弹出网页，http://127.0.0.1:5244

fireye

安遇予而欢 发表于 2022-11-16 16:56
哥，我的WIN11闪一下就没了好像什么也没发生...

以管理用身份运行