201504131247 华盛系统更新程序源码
9年前 (2015-04-13) 作者:iMoke 分类:原创·技术 阅读次数:3758 评论(0)批处理文件,可以实现通用的程序升级。
原理是先删除原程序文件,然后从共享中复制新文件到指定位置,解压缩,自动启动新程序。
批处理文件,可以实现通用的程序升级。
原理是先删除原程序文件,然后从共享中复制新文件到指定位置,解压缩,自动启动新程序。
@echo off MODE con: COLS=50 LINES=20 Set timu=华盛系统升级程序 By M build 150407 lite title %timu% color 0f ::定义域,结尾不要加\ Set HSupdatapath=\\192.168.2.199\HS Set HSpath=D:\HS for /f "tokens=1* delims=_" %%1 in ('%HSupdatapath%\rar\reg query "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v "Desktop" ^| findstr /i "Desktop"') do for /f "tokens=1*" %%3 in ("%%~2")do Set "deskpath=%%4" Set deskfolder=华盛6.0 :updata cls echo. echo %timu% echo. echo 请选择要更新的程序 echo. echo. echo 1.客房程序 2.报表程序 echo. echo. echo 3.通用收银 4.夜审程序 echo. echo. echo 5.系统设置 e.退出程序 echo. echo. echo 7.练习版客房 8.练习版餐饮 echo. echo ↑ 促销软件练习版 ↑ Set choose=aaa Set /p choose= 请选择您要更新的程序的编号(1-5),按回车键确认: If "%choose%"=="e" exit If "%choose%"=="1" ( Set d=客房 Set jc=front_office Set ver=150203 Goto down ) If "%choose%"=="2" ( Set d=报表 Set jc=report Set ver=150316 Goto down ) If "%choose%"=="3" ( Set d=通用收银 Set jc=res_pos Set ver=140710 Goto down ) If "%choose%"=="4" ( Set d=夜审 Set jc=audit Set ver=5.x Goto down ) If "%choose%"=="5" ( Set d=系统设置 Set jc=config Set ver=5.x Goto down ) If "%choose%"=="7" ( Set d=客房_练习版 Set jc=front_office Set ver=150203 Goto down ) If "%choose%"=="8" ( Set d=通用收银_练习版 Set jc=res_pos Set ver=140710 Goto down ) If "%choose%"=="" Goto updata If not "%choose%"=="" Goto updata :down cls if not exist %HSupdatapath%\updata\%d%%ver%.rar (goto nodata) else (echo.) echo. echo. echo. echo 是否确定更新“%d%”程序? echo. echo. echo. set sure=y Set /p sure=确定请按“回车”,输入其它“任意键”取消: If "%sure%"=="y" Goto sure If not "%sure%"=="y" Goto updata :sure taskkill /im %jc%.exe /f del/s/q %HSpath%\%d%\*.* rd/s/q %HSpath%\%d% %HSupdatapath%\rar\rar.exe x %HSupdatapath%\updata\%d%%ver%.rar %HSpath%\%d%\ -y if not exist %HSpath%\%d%\dbmssocn.dll (copy %HSupdatapath%\updata\dbmssocn.dll %HSpath%\%d%\) ::创建快捷方式 echo "%deskpath%\%deskfolder%" if not exist "%deskpath%\%deskfolder%" (md "%deskpath%\%deskfolder%") copy %HSupdatapath%\%deskfolder%\%d%.lnk "%deskpath%\%deskfolder%" /y cls echo. echo. echo “%d%”程序 版本“%ver%”已经安装完毕. echo. echo 是否还要升级其它程序? echo. echo. 程序快捷方式已放到桌面的【%deskfolder%】中 echo. echo. echo 退出请直接按“回车”, echo. set sure2=y Set /p sure2=仍需要更新其它程序请回复任意键后回车: If "%sure2%"=="y" goto logout If not "%sure2%"=="y" Goto updata exit :logout echo. echo 正在为您启动刚更新好的程序“%d%”程序,请稍候 start "" "%HSpath%\%d%\%jc%.exe" exit :nodata cls echo. echo Checking.. echo. echo. echo 无法升级,原因可能是: echo. echo. echo “%d%”程序的升级文件没有准备好; echo. echo. echo 请联系电脑房处理 3818 3848 echo. echo. echo 按任意键返回目录 echo. pause>nul goto updata
除非注明,发表在“傲孤漠客”的文章『201504131247 华盛系统更新程序源码』版权归iMoke所有。
转载请注明出处为“本文转载于『傲孤漠客』原地址https://www.imoke.org/post/20150413406HSupdate.html”
评论
发表评论