批处理完美实现FTP远程备份数据

经过再次努力，终于完成了自己的比较满意的版本，大家多批评……

批处理功能：

          输入几个参数，让批处理代你完成烦琐的工作吧！远程ftp文件到本地计算机，你可以拖入开机启动或任务计划中，定时下载远程的指定数据，希望大家多测试，多提意见，多完善，谢谢！上代码！

举例说明：

      我需要每天早上从服务器202.33.22.102上下载指定目录的文件到本机，那么你需要指定以下几个参数即可

      一、远程ip，is not null

      二、ftp用户名,is not null

      三、远程密码,is not null

      四、下载哪个目录下的文件，如果是根目录则输入点点，即".."(没有双引号)

      五、子目录，你可能要下载一个文件夹下的多个目录吧？如果有，请用逗号隔开，如果没有则什么也不要设置(包括空格)，文件夹名请间量不要有空格，以免不必要的麻烦，当你指定了子目录时，程序只会下载该子目录下的文件，而对再下一级文件夹不做任何操作。

      六、本地目录，请指定一个已存在的目录，包括"\"，程序会自动在该文件夹下创建和服务器上相同的文件夹

      七、日志记录文件目录，也是已存在的。

好了，你现在可以双击这个批处理执行操作了！

@echo off
echo ********====================================================== 
echo ********====================================================== 
echo ++++++++  批处理功能： 远程数据ftp备份到本地
echo ++++++++  date:  %date:~0,4%-%date:~5,2%-%date:~8,2% 
echo ++++++++  author:  zc_0101         
echo ++++++++  email:  [e-mail]
echo ++++++++  qq：  275374095
echo ++++++++  mark:
echo ++++++++    请严格按照参数说明定义参数，输入参数
echo ++++++++    请尽量常规化，不要带特殊字符包括空格
echo ++++++++    如果文件已存在则跳过，不支持短点续传
echo ++++++++    不检测备份数据完整性，用户可自行修改
echo ++++++++  ps:  转载请注明出处(^_^),谢谢！
echo ********====================================================== 
echo ********====================================================== 
pause

rem 远程ip(请保证开启server_u)
set remote_ip=103.111.124.123

rem 远程登录用户名(如果有批处理符号，请进行转义)
set remote_user=test

rem 远程登录密码(如果有批处理符号，请进行转义)
set remote_pwd=fkhvbweos^!sd4al%%

rem 远程操作目录,如果是根目录，请填写".."(无双引号),否则直接填写目录名,如databaseback
set remote_path=databaseback 

rem 远程要下载的目录列表(注意:仅下载这些目录下的文件，不会下载子目录下的文件)，请用逗号隔开,如果没有子目录（确保当前目录下有文件可下载），请什么也不要填写(包括空格);另：文件夹请不要有空格
set remote_directory=db_hxxl,db_oa,master,model,msdb 

rem 本地备份目录，请填写一个已存在的目录(本程序将会自动在该目录下创建和远程服务器上同样的子目录,请勿带"\"斜杠)
set local_path=d:\dbback

rem 操作日志和临时文件存放路径(请务必带上"\"斜杠)
set log_path=d:\

rem 取得当前日期，作为日志文件名称,本例为日志存放目录加当日日期
set today="%log_path%%date:~0,4%-%date:~5,2%-%date:~8,2%-%time:~0,2%%time:~3,2%%time:~6,2%.txt"
echo 正在对您输入的参数进行基本检测…………
echo 正在检测输入参数…………>%today%
if "%remote_ip%" equ "" (
  echo 远程ip不能为空！请返回为remote_ip赋值
  echo 远程ip为空，程序退出。>>%today%
  pause
  exit
)
if "%remote_user%" equ "" (
  echo 远程登录名不能为空！请返回为remote_user赋值
  echo 远程登录名为空，程序退出。>>%today%
  pause
  exit
)
if "%remote_pwd%" equ "" (
  echo 远程登录密码不能为空！请返回为remote_pwd赋值
  echo 远程登录密码为空，程序退出。>>%today%
  pause
  exit
)
if "%remote_path%" equ "" (
  echo 远程操作目录不能为空！请返回为remote_path赋值,如果是对根目录操作，请输入^(点点^)，即".."
  echo 远程操作目录为空，程序退出。>>%today%
  pause
  exit
)
if "%remote_directory%" equ " " (
  echo 远程子目录有误！您是否为remote_directory误赋值为空格了？如果没有子目录请不要赋值，包括空格。
  echo 远程子目录有误，程序退出。>>%today%
  pause
  exit
)
if "%local_path%\" equ "" (
  echo 本地操作目录不能为空！请返回为local_path赋值 
  echo 本地操作目录为空，程序退出。>>%today%
  pause
  exit
)
if "%log_path%" equ "" (
  echo 本地日志存放目录不能为空！请返回为log_path赋值 
  echo 本地日志存放目录为空，程序退出。>>%today%
  pause
  exit
)
echo 参数基本检测通过，准备执行数据库备份
echo 参数基本检测通过，数据库备份现在开始>>%today%
echo 今天是%date%,时间是：%time:~0,2%:%time:~3,2%:%time:~6,2%,正在执行数据库备份…………
echo 今天是%date%,时间是：%time:~0,2%:%time:~3,2%:%time:~6,2%,正在执行数据库备份…………>>%today%

echo 正在创建生成文件列表的ftp文件，请稍候………
echo 正在创建生成文件列表的ftp文件，请稍候…………>>%today%
ping -n 3 127.1>nul

echo 正在将远程登录用户名写入ftp文件…………>>%today%
echo %remote_user%>%log_path%command.txt
echo 正在将远程登录密码写入ftp文件…………>>%today%
echo %remote_pwd%>>%log_path%command.txt
echo 正在将下载方式写入ftp文件…………>>%today%
echo type binary>>%log_path%command.txt
echo 正在判断远程父目录是否为根目录 …………>>%today%
if "%remote_path%" neq ".." (
  if "%remote_path%" neq "" (
    echo 正在将进入远程目录%remote_path%的语句写入ftp文件…………>>%today%
    echo cd %remote_path%>>%log_path%command.txt
  )
)
echo 正在判断远程子目录…………>>%today%
if "%remote_directory%" neq "" (
  echo 正在将子目录列表的生成语句写入ftp文件…………>>%today%
  for %%i in (%remote_directory%) do (
     echo 正在将子目录列表%%i的生成语句写入ftp文件…………>>%today%
     echo mls %%i %log_path%%%i_temp.txt>>%log_path%command.txt
  )
) else (
  echo 由于没有填写子目录，则将根目录下文件列表的生成语句写入ftp文件…………>>%today%
  echo mls - %log_path%filelist_temp.txt>>%log_path%command.txt
  
) 
echo close>>%log_path%command.txt 
echo quit>>%log_path%command.txt
echo 正在对command.txt文件进行判断
if not exist "%log_path%command.txt\" (
  if exist "%log_path%command.txt" (
    echo %log_path%command.txt文件创建成功
    echo %log_path%command.txt文件创建成功>>%today%
  ) else (
    echo %log_path%command.txt文件创建失败，程序将退出。
    echo %log_path%command.txt文件创建失败，程序退出>>%today%
    pause
    echo exit
  )
) else (
  echo 您输入的参数存放日志路径中有竟然有一个名为command.txt的文件夹，请手动删除后，重新运行程序。
  echo 您输入的参数存放日志路径中竟然有有一个名为command.txt的文件夹,程序退出。>>%today%
  pause
  exit
)

echo 正在执行服务器目录文件列表创建,请稍候…………
echo 正在执行服务器目录文件列表创建,请稍候…………>>%today%
ping -n 3 127.1>nul
ftp -i -s:%log_path%command.txt %remote_ip%
echo 正在检查已创建的服务器目录文件列表，请稍候…………
echo 正在检查已创建的服务器目录文件列表，请稍候…………>>%today%
if "%remote_directory%" neq "" (
  for %%i in (%remote_directory%) do (
    if not exist "%log_path%%%i.txt\" (
      if exist "%log_path%\%%i_temp.txt" (
        mshta "javascript:var fso=new activexobject('scripting.filesystemobject');fso.opentextfile('%log_path%\temp1.txt',2,true).write(fso.opentextfile('%log_path%\%%i_temp.txt').readall().replace(/\r\n/g, '\n\n'));close()"
        mshta "javascript:var fso=new activexobject('scripting.filesystemobject');fso.opentextfile('%log_path%\temp2.txt',2,true).write(fso.opentextfile('%log_path%\temp1.txt').readall().replace(/\r/g, ''));close()"
        mshta "javascript:var fso=new activexobject('scripting.filesystemobject');fso.opentextfile('%log_path%\%%i.txt',2,true).write(fso.opentextfile('%log_path%\temp2.txt').readall().replace(/\n\n/g, '\r\n'));close()"
      )  
      if exist "%log_path%%%i.txt" (
        echo %log_path%%%i.txt文件创建成功！
        echo %log_path%%%i.txt文件创建成功！>>%today%
      ) else (
        echo 对不起，%log_path%%%i.txt文件创建失败！程序将退出！
        echo %log_path%%%i.txt文件创建失败！程序终止>>%today%
        pause
        exit      
      )
    ) else (
      echo 您输入的参数存放日志路径%log_path%中有竟然有一个名为%%i.txt的文件夹，请手动删除后，重新运行程序。
      echo 您输入的参数存放日志路径%log_path%中竟然有有一个名为%%i.txt的文件夹,程序退出。>>%today%
      pause
      exit
    )
  )
) else (
  if not exist "%log_path%filelist.txt\" (
    if exist "%log_path%\filelist_temp.txt" (
      mshta "javascript:var fso=new activexobject('scripting.filesystemobject');fso.opentextfile('%log_path%\temp1.txt',2,true).write(fso.opentextfile('%log_path%\filelist_temp.txt').readall().replace(/\r\n/g, '\n\n'));close()"
      mshta "javascript:var fso=new activexobject('scripting.filesystemobject');fso.opentextfile('%log_path%\temp2.txt',2,true).write(fso.opentextfile('%log_path%\temp1.txt').readall().replace(/\r/g, ''));close()"
      mshta "javascript:var fso=new activexobject('scripting.filesystemobject');fso.opentextfile('%log_path%\filelist.txt',2,true).write(fso.opentextfile('%log_path%\temp2.txt').readall().replace(/\n\n/g, '\r\n'));close()"
    )
    if exist "%log_path%filelist.txt" (
    echo %log_path%filelist.txt文件创建成功！
      echo %log_path%filelist.txt文件创建成功！>>%today%
    ) else (
      echo 对不起，%log_path%filelist.txt文件创建失败！
      echo %log_path%filelist.txt文件创建失败！程序终止>>%today%
      pause
      exit
    )
  ) else (
    echo 您输入的参数存放日志路径%log_path%中有竟然有一个名为filelist.txt的文件夹，请手动删除后，重新运行程序。
    echo 您输入的参数存放日志路径%log_path%中竟然有有一个名为filelist.txt的文件夹,程序退出。>>%today%
    pause
    exit
  )
)

echo 程序开始下载文件，请耐心等待…………
echo 程序开始下载文件，请耐心等待…………>>%today%
if "%remote_directory%" neq "" (
  for %%i in (%remote_directory%) do (
    echo 正在创建目录%local_path%\%%i…………
    echo 创建目录%local_path%\%%i…………>>%today%
    md %local_path%\%%i
    echo 正在下载%remote_path%\%%i文件夹备份,请稍候…………
    echo 正在下载%remote_path%\%%i文件夹备份,请稍候…………>>%today%
    ping -n 3 127.1>nul
    for /f "delims=. tokens=1,2" %%j in (%log_path%%%i.txt) do (
      if not exist "%local_path%\%%i\%%j.%%k\" (
        if not exist "%local_path%\%%i\%%j.%%k" (
          echo 正在创建下载文件%%j.%%k的脚本,请稍候…………
          echo 正在创建下载文件%%j.%%k的脚本,请稍候…………>>%today%
          echo %remote_user%>%log_path%getfiles.txt
          echo %remote_pwd%>>%log_path%getfiles.txt
          echo type binary>>%log_path%getfiles.txt
          if "%remote_path%" neq "" (
            if "%remote_path%" neq ".." ( 
              echo cd %remote_path%>>%log_path%getfiles.txt
            )
          )
          echo cd %%i>>%log_path%getfiles.txt
          echo lcd %local_path%\%%i>>%log_path%getfiles.txt
          echo mget "%%j.%%k">>%log_path%getfiles.txt
          echo close>>%log_path%getfiles.txt
          echo quit>>%log_path%getfiles.txt
          ftp -i -s:%log_path%getfiles.txt %remote_ip%
          echo 正在检查文件%local_path%\%%i\%%j.%%k，请稍候……
          echo 正在检查文件%local_path%\%%i\%%j.%%k，请稍候……>>%today%
          if exist "%local_path%\%%i\%%j.%%k\" (
            echo ————下载%local_path%\%%i\%%j.%%k成功！
            echo ————下载%local_path%\%%i\%%j.%%k成功！>>%today%
          ) else (
            echo ——由于未知原因，下载%local_path%\%%i\%%j.%%k失败！
            echo ——由于未知原因，下载%local_path%\%%i\%%j.%%k失败！>>%today%
          )
        ) else (
          echo %local_path%\%%i\%%j.%%k已存在，正在跳过————
          echo %local_path%\%%i\%%j.%%k已存在，正在跳过————>>%today%
        )
      ) else (
        echo 您输入的参数存放备份路径%local_path%\%%i中有竟然有一个名为%%j.%%k的文件夹，请手动删除后，重新运行程序。
        echo 您输入的参数存放备份路径%local_path%\%%i中竟然有有一个名为%%j.%%k的文件夹,程序退出。>>%today%
        pause
        exit
      )
    )
  )
) else (
  echo 由于没有指定服务器子目录，程序将把服务器父目录下的文件备份到您指定的本地目录中…………
  echo 由于没有指定服务器子目录，程序将把服务器父目录下的文件备份到您指定的本地目录中…………>>%today%
  for /f "delims=. tokens=1,2" %%j in (%log_path%filelist.txt) do (
    if not exist "%local_path%\%%j.%%k\" (
      if not exist "%local_path%\%%j.%%k" (
        echo 正在创建下载文件%%j.%%k的脚本,请稍候…………
        echo 正在创建下载文件%%j.%%k的脚本,请稍候…………>>%today%
        echo %remote_user%>%log_path%getfiles.txt
        echo %remote_pwd%>>%log_path%getfiles.txt
        echo type binary>>%log_path%getfiles.txt
        if "%remote_path%" neq "" (
          if "%remote_path%" neq ".." ( 
            echo cd %remote_path%>>%log_path%getfiles.txt
          )
        )
        echo lcd %local_path%>>%log_path%getfiles.txt
        echo mget "%%j.%%k">>%log_path%getfiles.txt
        echo close>>%log_path%getfiles.txt
        echo quit>>%log_path%getfiles.txt
        ftp -i -s:%log_path%getfiles.txt %remote_ip%
        echo 正在检查文件%local_path%\%%j.%%k，请稍候……
        echo 正在检查文件%local_path%\%%j.%%k，请稍候……>>%today%
        if exist "%local_path%\%%j.%%k" (
          echo ————下载%local_path%\%%j.%%k成功！
          echo ————下载%local_path%\%%j.%%k成功！>>%today%
        ) else (
          echo ——由于未知原因，下载%local_path%\%%j.%%k失败！
          echo ——由于未知原因，下载%local_path%\%%j.%%k失败！>>%today%
        )
      ) else (
        echo %local_path%\%%j.%%k已存在，正在跳过————
        echo %local_path%\%%j.%%k已存在，正在跳过————>>%today%
      )
    ) else (
      echo 您输入的参数存放备份路径%local_path%\中有竟然有一个名为%%j.%%k的文件夹，请手动删除后，重新运行程序。
      echo 您输入的参数存放备份路径%local_path%\中竟然有有一个名为%%j.%%k的文件夹,程序退出。>>%today%
      pause
      exit
    )
  )
)

echo 程序正在清除临时文件，请稍候…………
set temp_str=command.txt,temp1.txt,temp2.txt,getfiles.txt
for %%i in (%temp_str%) do (
  echo 程序将删除%log_path%%%i文件…………>>%today%
  del %log_path%%%i
  if exist "%log_path%%%i" (
    echo %log_path%%%i文件删除失败，程序继续运行
    echo %log_path%%%i文件删除失败，程序继续运行>>%today%
  ) else (
    echo %log_path%%%i文件删除成功
    echo %log_path%%%i文件删除成功>>%today%
  )
)

echo 程序正在删除临时文件列表文件，请稍候…………
echo 程序正在删除临时文件列表文件，请稍候…………>>%today%
if "%remote_directory%" neq "" (
  for %%i in (%remote_directory%) do (
    del %log_path%%%i.txt,%log_path%%%i_temp.txt
    if exist "%log_path%%%i.txt" (
      echo %log_path%%%i.txt文件删除失败，程序继续运行
      echo %log_path%%%i.txt文件删除失败，程序继续运行>>%today%
    ) else (
      echo %log_path%%%i.txt文件删除成功 
      echo %log_path%%%i.txt文件删除成功 >>%today%
    )
  )
) else (
  del %log_path%filelist.txt,%log_path%filelist_temp.txt
  if exist "%log_path%filelist.txt" (
    echo %log_path%filelist.txt文件删除失败，程序继续运行
    echo %log_path%filelist.txt文件删除失败，程序继续运行>>%today%
  ) else (
    echo %log_path%filelist.txt文件删除成功
    echo %log_path%filelist.txt文件删除成功>>%today%
  )
)
echo 恭喜您，本次备份工作已经圆满完成！详情请查看%today%日志文件！
echo 恭喜您，本次备份工作已经圆满完成！>>%today%
echo 数据已被备份到%local_path%\目录中。>>%today%
echo 完成时间：%time:~0,2%:%time:~3,2%:%time:~6,2%>>%today%
pause
exit