ftp 自动下载文件并解压

ftp 专栏收录该内容
2 篇文章 0 订阅

前几天为了工作想将Ftp文件自动下载解压然后将数据导入到excel,这样上班后就可以直接应用数据了,开始想看好多办法,比如PHP VB 等,但是最后都觉得不太好用,采用了系统自带的DOS 系命令,不过这个DOS 真是不太好用啊,研究了三天,就写了不到100 行的代码,但是最后还是成功了,跟大家分享一下


第一就是自动开机了,自动开机可以自电脑启动时进入主板设置,   电源管理 -> RTC 唤醒时间

第二 开机后自动运行bat 文件,这个设置直接百度吧,这个http://jingyan.baidu.com/article/bad08e1e9b06ee09c8512103.html  是别人写的

第三 cmd 实现rar 解压缩:首先下载安装winRAR软件,安装后默认安装在C:\Program Files\WinRAR 下了,或者安装时注意一下安装路径,安装完毕将安装路径下winRAR.exe  复制到  C:\Windows 下并将WinRAR.exe 重命名rar.exe         目的是为了在cmd 命令下能够应用WinRAR 软件,完成后再cmd命令下可以直接使用rar 命令,如图


第四 设置自动登录

这里针对有密码用户,没有密码跳过直接看下一步

自动登录方式有很多,经过大量的测试,最后选择自动登录,然后在bat 文件内锁定windows,这样不影响文件运行,也可以密码登录安全


选择本机登录用户,然后去掉对勾,应用,弹出密码框,输入密码,确定,下次重启登录,将会自动登录,但是密码依然存在



第五    ftp 网盘的文件 自动下载下来保存解压


上代码:

@echo off&setlocal enabledelayedexpansion
if  %time:~0,2% leq 9 (goto:next) else goto:finish  ##设置    当前时间小于9点执行,大于9点不在执行,目的是防止工作是必要重启电脑重复下载
:next
%windir%\System32\rundll32.exe user32.dll,LockWorkStation       ##锁定windows 目的是如果有密码前面设置了自动登录后直接登录了,这样登录后不安全,需要密码登录
set desktop=E:\Desktop                                                                            ##设置下载后的文件以及自动生成的excel 文件保存的位置
echo %time:~0,11%>c:\filename.txt                                                         ##输出时间到文件
echo WScript.sleep 5000 > sleep.vbs ##输出到文件
echo open 192.168.1.108>ftp.txt ##输出到文件  ftp ip地址
echo administrator>>ftp.txt ##输出到文件  ftp 用户名
echo 111>>ftp.txt ##输出到文件  ftp密码
echo dir / localfile.txt>>ftp.txt
echo quit>>ftp.txt
echo 欢迎使用ftp 自动下载工具
set /a t=4
:loop
set /a var=0
set d=%date:~0,10%
::set t=%time:~0,2%
echo %d%>tet.txt
if %t% leq 9 (set td=0%t%)else set td=%t%
echo 时间为%date:~2,8%-%time:~0,8%
for /f "tokens=1,2* delims=/" %%a in (tet.txt) do set d=xstz_%%a%%b%%c%td%
echo 文件名应为 %d%
echo 建立ftp 连接......
FTP -s:ftp.txt
echo 搜索要下载的文件....
for /f "tokens=1,2,3,4,5,7 delims=:- " %%a in (localfile.txt) do if "%%f"=="%d%.zip" (set /a var=1)
echo 搜索文件数为:%var%
echo %t%
Wscript sleep.vbs
if %var% geq 1 (goto:ftpDownLoad) else (if %t% leq 20 (set /a t=t+1) else set /a t=4 ) && goto:loop
echo 查找文件成功准备下载!!
:ftpDownLoad
echo 下载
echo open 192.168.1.108>ftps.txt
echo administrator>>ftps.txt
echo 111>>ftps.txt
echo lcd %desktop%>>ftps.txt
echo prompt>>ftps.txt
echo hash>>ftps.txt
echo bin>>ftps.txt
echo cd />>ftps.txt
echo mget %d%.zip>>ftps.txt
echo quit>>ftps.txt
echo %desktop%>>c:\filename.txt
echo ftp下载开始时间: %time:~0,8%>>c:\filename.txt
FTP -s:ftps.txt
del tet.txt
del localfile.txt
del ftp.txt
del ftps.txt
del sleep.vbs
mkdir %desktop%\%d%
echo ftp下载结束时间: %time:~0,8%>>c:\filename.txt
echo 100>>c:\filename.txt
echo %d%>>c:\filename.txt
echo 导入excel时间: %time:~0,8%>>c:\filename.txt
rar e -o+ %desktop%\%d%.zip %desktop%\%d%                            ##执行解压缩
1.xlsm
:finish

第六 excel 文件自动执行                                                                         excel 处理这里不写了,有需要的可以跟我联系

Private Sub Workbook_Open()
msgbox "哈哈,我是自动运行的呦"
End Sub

bat 文件以及excel 处理文件,在下面可以下载到,分享给大家,共同学习,但是大家不要转走去卖钱呀

链接: http://pan.baidu.com/s/1qYjOL7Q 密码: h3rr

  • 1
    点赞
  • 0
    评论
  • 0
    收藏
  • 一键三连
    一键三连
  • 扫一扫,分享海报

©️2021 CSDN 皮肤主题: 大白 设计师:CSDN官方博客 返回首页
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值