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

所属分类: 脚本专栏 / DOS/BAT 阅读数: 1323
收藏 0 赞 0 分享

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

批处理功能:

          输入几个参数,让批处理代你完成烦琐的工作吧!远程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:  zc_0101@163.com
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

更多精彩内容其他人还在看

XP下WORKSTATION启动慢导致系统启动时间过长问题的解决方法

通常安装过VMwareWorkstation导致系统启动过慢,经分析后,发现WORKSTATION服务启动时间较长,禁用后效果明显,可WORKSTATION是WINDOWS的共享基础服务,像我就离不开这个服务的,所以只需下面的脚本就可以解决问题了
收藏 0 赞 0 分享

IP动态切换bat脚本

因为公司办公室要设置固定IP才行,而家里的IP段和公司是不一样的,家里采用了DHCP机制,这样每次就得改IP设置,很是不方便,就写了这个脚本来动态切换,很流畅的说! WINXP,WIN7测试通过
收藏 0 赞 0 分享

奥汀管理员不切换bat脚本 V1.0-Design by Adobo

很多程序不能在管理员权限下运行,尤其是一些破解的程序。所以写了这个脚本,不影响正常的管理员,也不用切换到USERS账户~
收藏 0 赞 0 分享

cmd NTSD命令用法详解

ntsd 是一条dos命令,功能是用于结束一些常规下结束不了的死进程
收藏 0 赞 0 分享

win2003下杀任何进程的命令(taskkill,ntsd)

才能关掉一个用任务管理器关不了的进程?大多数人想到的都是专门工具,如IceSword。其实用Windows自带的工具就能杀大部分进程
收藏 0 赞 0 分享

Windows和 Linux下生成以当前时间命名文件的方法

在 Windows、Linux 操作系统,分别利用BAT批处理文件和Shell脚本,生成类似“20110228_082905.txt”以“年月日_时分秒”命名的文件
收藏 0 赞 0 分享

用批处理去掉快捷方式上的小箭头图案的代码

用批处理去掉快捷方式上的小箭头图案的代码,需要的朋友可以参考下。
收藏 0 赞 0 分享

xcopy 实现批处理拷贝文件或文件夹

xcopy 是一个很有用的doc命令,应该学习学习,XCOPY 还有众多的功能, 是加参数来完成的。上面的/s /e 参数的作用分别是把子目录和空目录都复制过去
收藏 0 赞 0 分享

安全工具netsh IPSec使用方法[ip安全策略]

IPSec的全称是Internet Protocol Security,翻译成中文就是Internet协议安全性。它的作用主要有两个:一个是保护 IP 数据包的内容,另外一点就是通过数据包筛选并实施受信任通讯来防御网络攻击
收藏 0 赞 0 分享

注册表危险组件删除功能批处理

用批处理实现的删除注册表危险组件的代码,主要应用于服务器,个人电脑不建议使用。
收藏 0 赞 0 分享
查看更多