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

[日期时间] BAT批处理调用ftp怎样计算时间?

  1. rem 获取一个小时前的时间
  2. >"%temp%/MyDate.vbs" echo strLastHours=DateAdd("h", -1, time)
  3. >>"%temp%/MyDate.vbs" echo strFmtDate=Right(Year(date()),4) ^& Right("0" ^& Month(date()),2) ^& Right("0" ^& Day(date()),2) ^& Right("0" ^& Hour(strLastHours),2)
  4. >>"%temp%/MyDate.vbs" echo WScript.Echo strFmtDate
  5. for /f %%a in ('cscript /nologo "%temp%/MyDate.vbs"') do (set ys=%%a)
复制代码
(不能显示15的上一天14号的23点)
  1. rem 获取前一小时的日期
  2. >"%temp%\MyDate.vbs" echo LastDate=date()-1
  3. >>"%temp%\MyDate.vbs" echo FmtDate=right(year(LastDate),4) ^& right("0" ^& month(LastDate),2) ^& right("0" ^& day(LastDate),2)
  4. >>"%temp%\MyDate.vbs" echo wscript.echo FmtDate
  5. for /f %%a in ('cscript /nologo "%temp%\MyDate.vbs"') do (
  6.   set DstDate=%%a
  7. )
  8. set /a h=%time:~0,2%-1
  9. if %time:~0,2% gtr 10 (set ys=%date:~0,4%%date:~5,2%%date:~8,2%%h%)
  10. if %time:~0,2% lss 10 (set ys=%date:~0,4%%date:~5,2%%date:~8,2%0%h%)
  11. if %time:~0,2% equ 0 (set ys=%DstDate:~0,4%%DstDate:~4,2%%DstDate:~6,2%23)
复制代码
(不能显示10点的上一个小时9点)

本脚本显示的是当前时间的前一天 2014031714
第一个脚本0-1点时间不能自动减去1天
第二个脚本10点不能自动跳到9点

   大家最好能推荐一个支持被动的ftp工具,nat里面ftp服务器。用命令行客户端是不支持被动的,

回复 13# PowerShell


    是ftp在没有公网的情况下,中间有路由器做了nat,cmd命令行(注意:cmd命令行)不支持被动模式啊

TOP

powershell送你把,解决日期计算类问题的金钥匙!   http://www.bathome.net/thread-25932-1-3.html
powershell代码
  1. (get-date).adddays(-1)     --------减去一天
  2. (get-date).AddHours(-2)  --------减去二小时
复制代码
用powershell即比vbs语法简单,又绝对无错,
不会有什么
不能自动减去1天
不能自动跳到9点
用了powershell 等于
刷 !问题全不见了

然后再powershell。exe中调用微软的ftp客户端   ftp。exe 都是老旧稳定的程序。
命令行客户端是不支持被动的----这句话是错误的。
被动的ftp端口号一要大于1024,这是win linux默认规定,另外这个端口要开放,ftp。exe  ip 端口要能连上,即可。
1

评分人数

脚本是写给人看的,是写给用户看的,而不是写给机子看的
用户能看懂、会修改的脚本,才是好脚本。
写易懂的powershell脚本帮人解决问题,进而让用户学会自渔,吾所愿也

TOP

可以了,谢谢

TOP

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

TOP

[attach]7123[/attach][img][/img]

TOP

[img][/img]

TOP

我复制的就是你那个代码·
  前面的数字1899123016

TOP

回复 5# chejh


    请直接复制2楼的代码,不要在你原来的代码上修改。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 3# chejh


    把那串乱七八糟的数字贴出来看看
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

2014031714要以为这样的格式显示啊
  晚上12点过了之后0-1点之间要显示头一天比如今天是17号显示2014031623,
其他时间点正常显示2014031601,

TOP

线面显示的年月不正确啊·

TOP

日期不正确啊
  怎么会是一串乱七八糟的数字呢-  -

TOP

【方案一】BAT调用PowerShell
  1. @echo off
  2. REM Win7/Win8/Win10等系统自带PowerShell
  3. REM 指定小时数
  4. set "HoursAgo=1"
  5. for /f "delims=" %%i in ('powershell -c "Get-Date (Get-Date).AddHours(-%HoursAgo%) -uformat '%%Y-%%m-%%d %%H:%%M:%%S'"') do (
  6.     set "DstTime=%%i"
  7. )
  8. echo,%DstTime%
  9. pause
复制代码
【方案二】BAT调用VBS
  1. @echo off
  2. REM 指定小时数
  3. set "HoursAgo=1"
  4. >"%temp%\MyDate.vbs" echo strLastHours=DateAdd("h", -%HoursAgo%, now)
  5. >>"%temp%\MyDate.vbs" echo strFmtDate=Right(Year(strLastHours),4) ^& Right("0" ^& Month(strLastHours),2) ^& Right("0" ^& Day(strLastHours),2) ^& Right("0" ^& Hour(strLastHours),2) ^& Right("0" ^& Minute(strLastHours),2) ^& Right("0" ^& Second(strLastHours),2)
  6. >>"%temp%\MyDate.vbs" echo WScript.Echo strFmtDate
  7. for /f "delims=" %%i in ('cscript /nologo "%temp%\MyDate.vbs"') do (
  8.     set "DstTime=%%i"
  9. )
  10. set DstTime=%DstTime:~0,4%-%DstTime:~4,2%-%DstTime:~6,2% %DstTime:~8,2%:%DstTime:~10,2%:%DstTime:~12,2%
  11. echo,%DstTime%
  12. pause
复制代码
【方案三】BAT调用日期时间函数
  1. @echo off
  2. REM 此类方法的关键在于如何获取标准化的当前系统日期
  3. REM 请参考http://bbs.bathome.cn/thread-3328-1-1.html
  4. REM 然后调用 Ritchie Lawrence 的日期函数,便可扩展出很多种方法,此处不再赘述。
  5. REM 日期转换的核心算法请参考http://bbs.bathome.cn/thread-3056-1-1.html
  6. REM 指定小时数
  7. set "HoursAgo=1"
  8. for /f "tokens=3" %%a in ('reg query "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate ^| findstr "sShortDate"') do (
  9.     set RegDateOld=%%a
  10. )
  11. set RegDateOld=%RegDateOld:~-8%
  12. reg add "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate /t REG_SZ /d yyyy-M-d /f >nul
  13. call :DateToSecs %date:~0,4% %date:~5,2% %date:~8,2% %time:~0,2% %time:~3,2% %time:~6,2% PassSeconds
  14. reg add "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate /t REG_SZ /d %RegDateOld% /f >nul
  15. set /a PassSeconds-=HoursAgo*60*60
  16. call :SecsToDate %PassSeconds% DstYear DstMonth DstDay DstHour DstMinute DstSecond
  17. set DstTime=%DstYear%-%DstMonth%-%DstDay% %DstHour%:%DstMinute%:%DstSecond%
  18. echo,%DstTime%
  19. pause
  20. goto :eof
  21. :DateToSecs %yy% %mm% %dd% %hh% %nn% %ss% secs
  22. setlocal ENABLEEXTENSIONS
  23. set yy=%1&set mm=%2&set dd=%3&set hh=%4&set nn=%5&set ss=%6
  24. if 1%yy% LSS 200 if 1%yy% LSS 170 (set yy=20%yy%) else (set yy=19%yy%)
  25. set /a dd=100%dd%%%100,mm=100%mm%%%100
  26. set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
  27. set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
  28. if 1%hh% LSS 20 set hh=0%hh%
  29. if {%nn:~2,1%} EQU {p} if "%hh%" NEQ "12" set hh=1%hh%&set/a hh-=88
  30. if {%nn:~2,1%} EQU {a} if "%hh%" EQU "12" set hh=00
  31. if {%nn:~2,1%} GEQ {a} set nn=%nn:~0,2%
  32. set /a hh=100%hh%%%100,nn=100%nn%%%100,ss=100%ss%%%100
  33. set /a j=j*86400+hh*3600+nn*60+ss
  34. endlocal&set %7=%j%&goto :EOF
  35. :SecsToDate %secs% yy mm dd hh nn ss
  36. setlocal ENABLEEXTENSIONS
  37. set /a i=%1,ss=i%%60,i/=60,nn=i%%60,i/=60,hh=i%%24,dd=i/24,i/=24
  38. set /a a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
  39. 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
  40. set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
  41. (if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
  42. (if %hh% LSS 10 set hh=0%hh%)&(if %nn% LSS 10 set nn=0%nn%)
  43. if %ss% LSS 10 set ss=0%ss%
  44. endlocal&set %7=%ss%&set %6=%nn%&set %5=%hh%&^
  45. set %4=%dd%&set %3=%mm%&set %2=%yy%&goto :EOF
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表