@echo off CALL :Main %* 3>>%0 ECHO 运行过程中无法启动第二个此脚本 GOTO :Eof :Main setlocal enabledelayedexpansion set ms=mshta vbscript:CreateObject("Scripting.FileSystemObject").GetStandardStream(1).Write(msgbox("是否确定安装升级?",4096+64+4,"油气回收在线监控系统安装升级"))(window.close) for /f %%i in ('!ms!') do ( if "%%i"=="6" echo 选择了“是” if "%%i"=="7" exit ) taskkill /f /im VaporRecoveryMonitor.exe taskkill /f /im iniConfigTool.exe taskkill /f /im vrDaemon.exe taskkill /f /im StationInfoConfigTool.exe taskkill /f /im DatabaseUpdate.exe taskkill /f /im GasOffsetTool.exe taskkill /f /im AlarmHandler.exe taskkill /f /im DailyHandler.exe taskkill /f /im GunHandler.exe taskkill /f /im TankHandler.exe cd /d %~dp0 call .\files\bat\delete.bat cd /d %~dp0 call .\files\bat\copy.bat cd /d %~dp0 call .\files\bat\setting.bat cd /d %~dp0 call .\files\bat\shortcut.bat cd /d %~dp0 call .\files\bat\startup.bat cd /d %~dp0 call .\files\bat\startup_daemon.bat cd /d %~dp0 start .\files\bat\UpdateConn.exe ping -n 5 127.0.0.1>nul 2>nul cd /d %~dp0 call .\files\bat\databaseupdate.bat cd /d %~dp0 .\files\bat\skin_1366_768.vbs cd /d %~dp0 .\files\bat\soft.vbs mshta vbscript:msgbox("安装升级完成!",4096+64+4,"提示")(window.close) :Eof