[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] [已解决]从FTP上获取当前时间之前一段时间内信息的批处理

从FTP上获取当前时间之前一段时间内的信息。假设我的FTP上有一个a.txt文件,而且过一段时间FTP上会增加一个类似的*.txt文件,我如何获得本机当前时间的一段时间相应的*.txt文件?

[ 本帖最后由 lazygc520 于 2009-8-24 09:33 编辑 ]
1

评分人数

    • keen: 感谢主动给标题标注[已解决]字样PB + 2

看着这些代码就晕。。。

TOP

发现有人在baidu里贴于本内容无关的代码,所以我把不需要的代码重新编辑去除了,但是不影响阅读。

TOP

也好。昨天没上,今天刚看到的帖子。
代码如下:
  1. @echo off
  2. rem 指定FTP用户名
  3. set ftpUser=xxx
  4. rem 指定FTP密码
  5. set ftpPass=xxxxxxx
  6. rem 指定FTP服务器地址
  7. set ftpIP=xxx.xxx.xxx.xx
  8. rem 指定待下载的文件位于FTP服务器的什么位置
  9. set ftpFolder=/export/home/PROD/ntcdata
  10. rem 指定从FTP下载下来的文件存放到什么地方
  11. set DownFolder=E:\
  12. rem 指定下载几小时前的文件
  13. set MinsAgo=60
  14. set ftpDir=%temp%\TempDir2.txt
  15. set ftpDown=%temp%\TempDown2.txt
  16. rem 假设本机日期格式为yyyy-mm-dd-hh-nn        /*本段为时间问题的重点*/
  17. set FileY=%date:~0,4%
  18. if %time:~0,2% lss 10 (set hh=0%time:~1,1%) else (set hh=%time:~0,2%)
  19. call :DateToMins %date:~0,4% %date:~5,2% %date:~8,2% %hh% %time:~3,2% Mins
  20. set /a Mins-=MinsAgo
  21. call :MinsToDate %Mins% DstYear DstMonth DstDay DstHour DstMin
  22. >"%ftpDir%" echo.%ftpUser%
  23. >>"%ftpDir%" echo.%ftpPass%
  24. >>"%ftpDir%" echo bin
  25. >>"%ftpDir%" echo cd "%ftpFolder%"
  26. >>"%ftpDir%" echo dir * "%temp%\FileList2.txt"
  27. >>"%ftpDir%" echo bye
  28. start ftp -v -i -s:"%ftpDir%" %ftpIP%
  29. rem 根据实际情况自行调节延迟时间
  30. ping -n 350 127.1 >nul
  31. findstr /i ":*\.SWM$" "%temp%\FileList2.txt">"%temp%\FileDate2.txt"
  32. findstr /i ":*\.TWM$" "%temp%\FileList2.txt">>"%temp%\FileDate2.txt"
  33. findstr /i ":*\.OWM$" "%temp%\FileList2.txt">>"%temp%\FileDate2.txt"
  34. >"%ftpDown%" echo.%ftpUser%
  35. >>"%ftpDown%" echo.%ftpPass%
  36. >>"%ftpDown%" echo bin
  37. >>"%ftpDown%" echo cd "%ftpFolder%"
  38. (for /f "usebackq tokens=1-10 delims=: " %%a in ("%temp%\FileDate2.txt") do (   /*从filedate2.txt中获得包含时间信息的文件*/
  39.   setlocal enabledelayedexpansion
  40.   if "%%f" equ "Jan" (
  41.     set FileM=01
  42.   ) else if "%%f" equ "Feb" (
  43.     set FileM=02
  44.   ) else if "%%f" equ "Mar" (
  45.     set FileM=03
  46.   ) else if "%%f" equ "Apr" (
  47.     set FileM=04
  48.   ) else if "%%f" equ "May" (
  49.     set FileM=05
  50.   ) else if "%%f" equ "Jun" (
  51.     set FileM=06
  52.   ) else if "%%f" equ "Jul" (
  53.     set FileM=07
  54.   ) else if "%%f" equ "Aug" (
  55.     set FileM=08
  56.   ) else if "%%f" equ "Sep" (
  57.     set FileM=09
  58.   ) else if "%%f" equ "Oct" (
  59.     set FileM=10
  60.   ) else if "%%f" equ "Nov" (
  61.     set FileM=11
  62.   ) else if "%%f" equ "Dec" (
  63.     set FileM=12
  64.   )
  65.   set FileD=10%%g
  66.   set FileD=!FileD:~-2!
  67.   set FileH=10%%h
  68.   set FileH=!FileH:~-2!
  69.   if "!FileM!" equ "%DstMonth%" (        
  70.   if "!FileD!" equ "%DstDay%" (      
  71.     if "!FileH!" equ "%DstHour%" (
  72.      echo get "%%j" "%DownFolder%\%%j"
  73.     )
  74.   )
  75. )
  76.   endlocal
  77. ))>>"%ftpDown%"
  78. >>"%ftpDown%" echo bye
  79. start ftp -v -i -s:"%ftpDown%" %ftpIP%
  80. rem 根据实际情况自行调节延迟时间
  81. rem ping -n 700 127.1 >nul
  82. goto :eof
  83. :DateToMins %yy% %mm% %dd% %hh% %mm%               /*这两段为调用时间函数 日期转分钟和分钟转日期*/
  84. setlocal ENABLEEXTENSIONS
  85. set yy=%1&set mm=%2&set dd=%3&set hh=%4&set nn=%5
  86. if 1%yy% LSS 200 if 1%yy% LSS 170 (set yy=20%yy%) else (set yy=19%yy%)
  87. set /a dd=100%dd%%%100,mm=100%mm%%%100
  88. set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
  89. set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
  90. if 1%hh% LSS 20 set hh=0%hh%
  91. if {%nn:~2,1%} EQU {p} if "%hh%" NEQ "12" set hh=1%hh%&set/a hh-=88
  92. if {%nn:~2,1%} EQU {a} if "%hh%" EQU "12" set hh=00
  93. if {%nn:~2,1%} GEQ {a} set nn=%nn:~0,2%
  94. set /a hh=100%hh%%%100,nn=100%nn%%%100,j=j*1440+hh*60+nn
  95. endlocal&set %6=%j%&goto :EOF
  96. :MinsToDate %mins% yy mm dd hh nn
  97. setlocal ENABLEEXTENSIONS
  98. set /a i=%1,nn=i%%60,i/=60,hh=i%%24,dd=i/24,i/=24
  99. set /a a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
  100. set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
  101. set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
  102. (if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
  103. (if %hh% LSS 10 set hh=0%hh%)&(if %nn% LSS 10 set nn=0%nn%)
  104. endlocal&set %6=%nn%&set %5=%hh%&set %4=%dd%&^
  105. set %3=%mm%&set %2=%yy%&goto :EOF
复制代码

[ 本帖最后由 lazygc520 于 2009-8-26 14:22 编辑 ]
1

评分人数

    • Batcher: Good good study, day day up!PB + 10

TOP

既然问题解决了,何不把代码分享出来,也好让今后遇到此问题的人有个参考?
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

哦,多谢batcher提醒。我知道问题出在哪里了。因为没有搞清楚应用的关系。我再用以下代码试试:
  1. (for /f "usebackq tokens=1-10 delims=: " %%a in ("%temp%\FileDate2.txt") do (
  2.   setlocal enabledelayedexpansion
  3.   if "%%f" equ "Jan" (
  4.     set FileM=01
  5.   ) else if "%%f" equ "Feb" (
  6.     set FileM=02
  7.   ) else if "%%f" equ "Mar" (
  8.     set FileM=03
  9.   ) else if "%%f" equ "Apr" (
  10.     set FileM=04
  11.   ) else if "%%f" equ "May" (
  12.     set FileM=05
  13.   ) else if "%%f" equ "Jun" (
  14.     set FileM=06
  15.   ) else if "%%f" equ "Jul" (
  16.     set FileM=07
  17.   ) else if "%%f" equ "Aug" (
  18.     set FileM=08
  19.   ) else if "%%f" equ "Sep" (
  20.     set FileM=09
  21.   ) else if "%%f" equ "Oct" (
  22.     set FileM=10
  23.   ) else if "%%f" equ "Nov" (
  24.     set FileM=11
  25.   ) else if "%%f" equ "Dec" (
  26.     set FileM=12
  27.   )
  28.   set FileD=10%%g
  29.   set FileD=!FileD:~-2!
  30.   set FileH=10%%h
  31.   set FileH=!FileH:~-2!
  32.   if "!FileM!" equ "%DstMonth%" (        
  33.   if "!FileD!" equ "%DstDay%" (      
  34.     if "!FileH!" equ "%DstHour%" (
  35.      echo get "%%j" "%DownFolder%\%%j"
  36.     )
  37.   )
  38. )
  39.   endlocal
  40. ))>>"%ftpDown%"
复制代码

[ 本帖最后由 lazygc520 于 2009-8-24 09:32 编辑 ]

TOP

回复 42楼 的帖子

(for /f "usebackq tokens=1-9 delims=:, " %%a in ("FileDate2.txt") do (

这里为什么要把逗号作为列分隔符之一?

  set FileD=10%%g
  set FileD=!FileD:~-3!
  set FileH=10%%g
  set FileH=!FileH:~-2!

如果以冒号和空格作为列分隔符,日期在第7列,小时在第8列,对吧?那你的FileD和FileH为何都在%%g里面取呢?FileD截取后三位又是出于什么目的呢?
1

评分人数

    • lazygc520: 很好的矫正了错误。对for循环的利用有了更深 ...PB + 6 技术 + 1 + 1
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

set FileY=%date:~0,4%
下面一行,看第2页最下面的一楼。

TOP

结果这段代码应该插入到哪里呢?
if %time:~1,1% lss 10 (set hh=0%time:~1,1%) else (set hh=%time:~0,2%)

TOP

错误的结果(TempDown2.txt部分内容):
  1. C:\Documents and Settings\Admin\桌面>(
  2. setlocal enabledelayedexpansion  
  3. if "Jun" EQU "Jan" (set FileM=01 )  else if "Jun" EQU "Feb" (set FileM=02 )  else if "Jun" EQU "Mar" (set FileM=03 )  else if "Jun" EQU "Apr" (set FileM=04 )  else if "Jun" EQU "May" (set FileM=05 )  else if "Jun" EQU "Jun" (set FileM=06 )  else if "Jun" EQU "Jul" (set FileM=07 )  else if "Jun" EQU "Aug" (set FileM=08 )  else if "Jun" EQU "Sep" (set FileM=09 )  else if "Jun" EQU "Oct" (set FileM=10 )  else if "Jun" EQU "Nov" (set FileM=11 )  else if "Jun" EQU "Dec" (set FileM=12 )  
  4. set FileD=105  
  5. set FileD!FileD:~-3!  
  6. set FileH=105  
  7. set FileH=!FileH:~-2!  
  8. if "!FileM!" EQU "08" (if "!FileD!" EQU "21" (if "!FileH!" EQU "13" (echo get "59" "E:\\59" ) ) )  
  9. endlocal
  10. )
复制代码
正确的结果内容应该是以下格式:
  1. D:\batch>(
  2. setlocal enabledelayedexpansion  
  3. if "Jun" EQU "Jan" (set FileM=01 )  else if "Jun" EQU "Feb" (set FileM=02 )  else if "Jun" EQU "Mar" (set FileM=03 )  else if "Jun" EQU "Apr" (set FileM=04 )  else if "Jun" EQU "May" (set FileM=05 )  else if "Jun" EQU "Jun" (set FileM=06 )  else if "Jun" EQU "Jul" (set FileM=07 )  else if "Jun" EQU "Aug" (set FileM=08 )  else if "Jun" EQU "Sep" (set FileM=09 )  else if "Jun" EQU "Oct" (set FileM=10 )  else if "Jun" EQU "Nov" (set FileM=11 )  else if "Jun" EQU "Dec" (set FileM=12 )  
  4. set FileD=105  
  5. set FileD=!FileD:~-2!  
  6. if "!FileM!" EQU "08" (if "!FileD!" EQU "20" (if "!FileH!" EQU "hours"(echo get "F12345678K.SWM" "F:\\F12345678K.SWM" ) )  )
  7. endlocal
  8. )
复制代码

TOP

我现在是这样写的:
set FileD=10%%g
set FileD!FileD:~-3!
set FileH=10%%g
set FileH=!FileH:~-2!

然后就报错:环境变量 FileD0xx 没有定义

TOP

嗯。现在for循环那里还有些问题,你能不能帮我看看小时的信息如何获取?
FileDate2.txt的格式:
-rw-rw-rw-   1 100      100        22396 Apr 15 14:28 F12345600F.FT2
  1. (for /f "usebackq tokens=1-9 delims=:, " %%a in ("%temp%\FileDate2.txt") do (
  2.   setlocal enabledelayedexpansion /*获取14:28中14的信息*/
  3.   if "%%f" equ "Jan" (
  4.     set FileM=01
  5.   ) else if "%%f" equ "Feb" (
  6.     set FileM=02
  7.   ) else if "%%f" equ "Mar" (
  8.     set FileM=03
  9.   ) else if "%%f" equ "Apr" (
  10.     set FileM=04
  11.   ) else if "%%f" equ "May" (
  12.     set FileM=05
  13.   ) else if "%%f" equ "Jun" (
  14.     set FileM=06
  15.   ) else if "%%f" equ "Jul" (
  16.     set FileM=07
  17.   ) else if "%%f" equ "Aug" (
  18.     set FileM=08
  19.   ) else if "%%f" equ "Sep" (
  20.     set FileM=09
  21.   ) else if "%%f" equ "Oct" (
  22.     set FileM=10
  23.   ) else if "%%f" equ "Nov" (
  24.     set FileM=11
  25.   ) else if "%%f" equ "Dec" (
  26.     set FileM=12
  27.   )
  28.   set FileD=10%%g
  29.   set FileD=!FileD:~-3!
  30.   set FileH=10%%g
  31.   set FileH=!FileH:~-2!
  32.   if "!FileM!" equ "%DstMonth%" (        
  33.   if "!FileD!" equ "%DstDay%" (       /*判断条件是不是还要加上日期的信息?*/
  34.     if "!FileH!" equ "%DstHour%" (
  35.      echo get "%%i" "%DownFolder%\%%i"
  36.     )
  37.   )
  38. )
  39.   endlocal
  40. ))>>"%ftpDown%"
复制代码
主要是以上2点疑问,希望batcher解答一下。

[ 本帖最后由 lazygc520 于 2009-8-21 14:05 编辑 ]

TOP

既然时间截取没有问题了,那就继续检查代码里面有没有其它错误吧。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

哦,写错了!
  1. if %time:~0,2% lss 10 (set hh=0%time:~1,1%) else (set hh=%time:~0,2%)
  2. echo %hh%
  3. pause
复制代码

TOP

你到底运行的哪个代码?
C:\Test>type test.bat
if %time:~1,1% lss 10 (set hh=0%time:~1,1%) else (set hh=%time:~0,2%)
echo %hh%

C:\Test>test.bat

C:\Test>if 0 LSS 10 (set hh=00 )  else (set hh=10 )

C:\Test>echo 00
00
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表