rem 关闭屏幕回显
@echo off

rem 设置延迟变量赋值
setlocal enabledelayedexpansion

rem 清屏
cls

rem 设置窗休最大高度和宽度
mode con: cols=70 lines=23

rem tt变量赋值
set tt=Mudbest. http://www.mdubest.com

rem 设置背景前景色，并设置显示窗休标题显示文字
color f9
title %tt%

rem 代码段标记
:_reChoose
cls

rem 空出一行
echo.

rem 打印屏幕交互菜单
echo     本脚本将导入指定IP信息，协助您高效完成IP地址等相关信息的设置。
echo.
echo         请选择网络环境：      
echo         1、私人住所
echo         2、单位办公室
echo         3、退出批处理
echo.

rem 等待用户输入
set /p chooseResult=请输入网络环境标识编号：【1/2】

rem 逻辑分支判断(/i参数表示勿略大小写)
if /i '%chooseResult%'=='' goto _reChoose
if %chooseResult% LSS 1 goto _reChoose
if %chooseResult% GTR 3 goto _reChoose

rem 选择环境编码1
if %chooseResult%==1 (
 echo.
 if exist d:/ipInfoBackUp_home.txt (
  netsh exec d:/ipInfoBackUp_home.txt
  echo IP地址等相关信息已成功导入--home环境
 ) else (
  echo 指定的IP地址信息文件不存在==》请确认是否执行过导出脚本。
 )
)

rem 选择环境编码2
if %chooseResult%==2 (
 echo.
 if exist d:/ipInfoBackUp_office.txt (
  netsh exec d:/ipInfoBackUp_office.txt
  echo IP地址等相关信息已成功导入--office环境
 ) else (
  echo 指定的IP地址信息文件不存在==》请确认是否执行过导出脚本。
 )
)

rem 选择环境编码3
if %chooseResult%==3 (
 echo.
 set /p answerResult=您确定要退出批处理吗?【Y/N】
 if /i "!answerResult!"=="Y" exit ::此处!号表示使用变量延迟赋值。
 if /i "!%answerResult!"=="N" goto _reChoose
 if /i not "!answerResult!"=="Y" if /i not "!answerResult!"=="N" echo 输入值非法!
)

:_reImp
echo.
set /p reImport=您是否还要继续导入?【Y/N】
if /i '!reImport!'=='Y' (
 goto _reChoose
) else if /i '!reImport!'=='N' (
 exit
) else (
 echo 输入值非法!--请重新输入...
        goto _reImp  
)

pause

rem 开启屏幕命令执行回显
@echo on

@echo off&setlocal enabledelayedexpansion
set path=%~dp0
for %%i in (%path%*.rar) do (
C:\Windows\System32\cscript.exe //B to.vbs %%i
for /f "tokens=3 delims=:" %%j in (temp.txt) do (
set s=%%j
)
if !c!=="" set c=0
set b=%%~ti
set b=!b:~0,4!!b:~5,2!!b:~8,2!!b:~11,2!!b:~14,2!
set b=!b!!s!
if !b! gtr !c! (set c=!b! & set d=%%~nxi & set e=%%~ni)
del temp.txt
)
echo !d!

to.vbs部分

Dim ls_File
Set objArgs = WScript.Arguments
set fso=createobject("scripting.filesystemobject")
set fw=fso.createtextfile("temp.txt",1)
ls_File = objArgs(0)
set f=fso.getfile( ls_File )
d=f.datelastmodified
fw.writeline(d)

最后输出最新的一个文件。

从最近的一个项目里看到了用到了批处理备份，就想尝试这种方法用到自己正在伤神的数据备份问题里。尝试了2种方法，最后考虑效率问题，还是用了另一种方法。

服务器A 数据存储
服务器B 数据备份

方案1：
直接在 服务器B上面进行操作，将FTP功能和列目录写到一个批处理，然后在服务器B里进行计划任务，每5分钟执行一次，它的效果是将服务器A的所有的文件进行一个一个的往自身里下载，从而达到了备份的效果。但是问题就来了，这5分钟要下载完上千个文件，可能下不完，这也是其次，主要是伤不起那复制的文件数量。所以后期放弃了这方案。

方案2：
和方案1差不多，就是更简洁了点。直接在服务器A上面进行Xcopy将目录复制到指定目录，然后利用windows的winRaR的功能处理一次，将要备份的文件xcopy出来之后，进行winRaR的命令行压缩文件，处理完压缩后并将Xcopy出来的文件夹删除。这时候在服务器A里产生了一个1204121244.rar（年月日时间分钟）的文件，由于硬盘是SSD，每5分钟执行一次这样的操作没任何压力，产生10个最新鲜的备份压缩包，将旧的删除。然后在服务器B上面进行FTP批处理操作，但只下载服务器A上面最新的一个备份压缩包，然后在服务器B上同样的只保留最新的10个文件，这样就达到了较理想的效果了，或许还有其他办法，但这方法够用了。

伤神的事情也就结束了。^_^