经过努力终于实现了远程FTP下载文件到本地的批处理

61581229

　　
　　这几天由于业务需要，特此憋出了一个批处理供自己使用，由于以前自己一直没有写过这东西，所以断断续续大概
　　用了一天的时间，好笨，呵呵，先这么用着，再有空的话希望能完善成一个通用的，设置几个变量就可以实现远程ftp下载文件
　　的功能，自己也期待……
　　说明：如果本地已存在，则不予下载。

Code
@echo off
echo 正在创建生成文件列表的ftp文件，请稍候…………
ping -n 3 127.1>nul
echo FTP用户名>command.txt
echo FTP密码>>command.txt
echo type binary>>command.txt
echo cd DataBaseBack>>command.txt
echo mls DB_Hxxl d:\DB_Hxxl.txt>>command.txt
echo mls DB_OA d:\DB_OA.txt>>command.txt
echo mls master d:\master.txt>>command.txt
echo mls model d:\model.txt>>command.txt
echo mls msdb d:\msdb.txt>>command.txt
echo close>>command.txt
echo quit>>command.txt

echo 正在执行服务器目录文件列表创建,请稍候…………
ping -n 3 127.1>nul
echo.
ftp -i -s:command.txt 远程Server-U服务器IP
del command.txt


echo 正在下载DB_Hxxl文件夹备份,请稍候…………
ping -n 3 127.1>nul
for /f %%i in (d:\DB_Hxxl.txt) do (if not exist D:\DBBack\DB_Hxxl\%%i (
echo FTP用户名 >D:\GetFiles.txt
echo FTP密码>>D:\GetFiles.txt
echo type binary>>D:\GetFiles.txt
echo cd DataBaseBack>>D:\GetFiles.txt
echo cd DB_Hxxl>>D:\GetFiles.txt
echo lcd D:\DBBack\DB_Hxxl>>D:\GetFiles.txt
echo mget %%i>>D:\GetFiles.txt
echo close>>D:\GetFiles.txt
echo quit>>D:\GetFiles.txt
ftp -i -s:D:\GetFiles.txt 远程Server-U服务器IP
Del D:\GetFiles.txt
))


echo 正在下载DB_OA文件夹备份,请稍候…………
ping -n 3 127.1>nul
for /f %%i in (d:\DB_OA.txt) do (if not exist D:\DBBack\DB_OA\%%i (
echo FTP用户名 >D:\GetFiles.txt
echo FTP密码>>D:\GetFiles.txt
echo type binary>>D:\GetFiles.txt
echo cd DataBaseBack>>D:\GetFiles.txt
echo cd DB_OA>>D:\GetFiles.txt
echo lcd D:\DBBack\DB_OA>>D:\GetFiles.txt
echo mget %%i>>D:\GetFiles.txt
echo close>>D:\GetFiles.txt
echo quit>>D:\GetFiles.txt
ftp -i -s:D:\GetFiles.txt 远程Server-U服务器IP
Del D:\GetFiles.txt
))


echo 正在下载系统数据库Master文件夹备份,请稍候…………
ping -n 3 127.1>nul
for /f %%i in (d:\Master.txt) do (if not exist D:\DBBack\Master\%%i (
echo FTP用户名 >D:\GetFiles.txt
echo FTP密码>>D:\GetFiles.txt
echo type binary>>D:\GetFiles.txt
echo cd DataBaseBack>>D:\GetFiles.txt
echo cd Master>>D:\GetFiles.txt
echo lcd D:\DBBack\Master>>D:\GetFiles.txt
echo mget %%i>>D:\GetFiles.txt
echo close>>D:\GetFiles.txt
echo quit>>D:\GetFiles.txt
ftp -i -s:D:\GetFiles.txt 远程Server-U服务器IP
Del D:\GetFiles.txt
))



echo 正在下载系统数据库Model文件夹备份,请稍候…………
ping -n 3 127.1>nul
for /f %%i in (d:\Model.txt) do (if not exist D:\DBBack\Model\%%i (
echo FTP用户名 >D:\GetFiles.txt
echo FTP密码>>D:\GetFiles.txt
echo type binary>>D:\GetFiles.txt
echo cd DataBaseBack>>D:\GetFiles.txt
echo cd Model>>D:\GetFiles.txt
echo lcd D:\DBBack\Model>>D:\GetFiles.txt
echo mget %%i>>D:\GetFiles.txt
echo close>>D:\GetFiles.txt
echo quit>>D:\GetFiles.txt
ftp -i -s:D:\GetFiles.txt 远程Server-U服务器IP
Del D:\GetFiles.txt
))



echo 正在下载系统数据库Msdb文件夹备份,请稍候…………
ping -n 3 127.1>nul
for /f %%i in (d:\Msdb.txt) do (if not exist D:\DBBack\Msdb\%%i (
echo FTP用户名 >D:\GetFiles.txt
echo FTP密码>>D:\GetFiles.txt
echo type binary>>D:\GetFiles.txt
echo cd DataBaseBack>>D:\GetFiles.txt
echo cd Msdb>>D:\GetFiles.txt
echo lcd D:\DBBack\Msdb>>D:\GetFiles.txt
echo mget %%i>>D:\GetFiles.txt
echo close>>D:\GetFiles.txt
echo quit>>D:\GetFiles.txt
ftp -i -s:D:\GetFiles.txt 远程Server-U服务器IP
Del D:\GetFiles.txt
))