• 博客园logo
  • 会员
  • 周边
  • 众包
  • 新闻
  • 博问
  • 闪存
  • HarmonyOS
  • Chat2DB
    • 搜索
      所有博客
    • 搜索
      当前博客
  • 写随笔 我的博客 短消息 简洁模式
    用户头像
    我的博客 我的园子 账号设置 会员中心 简洁模式 ... 退出登录
    注册 登录
wjshan0808

Learn from yesterday, Live for today, For a better tomorrow.
 ————wjshan0808

博客园    首页    新随笔    联系   管理    订阅  订阅

BAT自动复制最新插件至运行程序

@echo off & PUSHD %~dp0 & TITLE ...

TITLE Formating ...
mode con lines=1 cols=64
color 0A

TITLE Variable ...
set BAT_UAC_DIR=%TMP%
set BAT_UAC_NAME=%random%.vbs
set BAT_UAC_FILE=%BAT_UAC_DIR%\%BAT_UAC_NAME%

TITLE Vbs ...
1>NUL 2>&1 reg query "HKU\S-1-5-19" || (
    echo set obj = CreateObject^("Shell.Application"^) >> "%BAT_UAC_FILE%"
    echo obj.ShellExecute "%~f0", "%1", "", "runas", 1 >> "%BAT_UAC_FILE%"
    "%BAT_UAC_FILE%"
    del /A /F /Q "%BAT_UAC_DIR%\*.vbs" 2>NUL
    exit /B
)

:LRetry
TITLE Copying ...
copy /Y "F:\workspace\*.dll" "C:\plugins\"

rem 
if %ERRORLEVEL% EQU 0 ( 
    goto LDone 
) ^
else (
    TITLE Retrying ...
    TIMEOUT /T 1 /NOBREAK
    TASKKILL /F /IM X.exe
    TASKKILL /F /IM XS.exe
    goto LRetry 
)

:LDone
TITLE Running ...
"C:\X.exe" & EXIT

rem pause

 


posted @ 2021-09-16 10:42  wjshan0808  阅读(104)  评论(0)    收藏  举报
刷新页面返回顶部
博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3