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

Rank: 1

帖子
11 
积分
29 
技术
0  
捐助
0  
注册时间
2011-5-30 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2015-6-18 13:00 | 只看该作者

[日期时间] [已解决]批处理如何根据时间生成日期+白天夜晚的文件夹？

本帖最后由 okobe0 于 2015-7-10 19:22 编辑

怎么才能以每天的8点和18点为界，生成以白天和夜晚为名的两个文件夹？
比如今天是6月18日，根据需求要生成两个文件夹，6月18日8点到18点的生成一个名为“6月18日白天”；6月18日的18点到6月19日的八点，生成一个名为“6月18日晚上”的文件夹。
比如现在是6月18日的22点，或者是6月19日的3点，这时候执行批处理，就能生成命名为“6月18日晚上”的文件夹。
我记得以前听一位老兄说过，因为要跨越0点，生成文件夹的代码一次不好实现，那也可以以18-0点，0-8点分两次实现。
现在还一个问题，如果时间上存在重合，比如8点这个分界点，怎么处理呢？
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2
收藏 分享

gawk

Rank: 8Rank: 8

帖子
1088 
积分
5421 
技术
98  
捐助
30  
注册时间
2011-10-9 
2楼
发表于 2015-6-18 13:10 | 只看该作者
如果时间上存在重合，比如8点这个分界点，怎么处理呢？

大于等于8认为是当天
小于8认为是昨天
Talk is cheap. Show me the code.
没事不要瞎扯淡，有能耐就把代码贴出来给我看。

TOP

pcl_test

Rank: 8Rank: 8

帖子
3041 
积分
5333 
技术
685  
捐助
0  
注册时间
2014-10-19 
3楼
发表于 2015-6-18 14:39 | 只看该作者
bat+vbs，直接保存为批处理文件即可
  1. '&cls&@echo off&for /f %%a in ('cscript -nologo -e:vbscript %~fs0') do md %%a&pause&exit /b

  2. h=hour(now)

  3. d=date()

  4. if h>=0 and h<8 then

  5. d=date()-1

  6. z="晚上"

  7. elseif h>=8 and h<18 then

  8. z="白天"

  9. else

  10. z="晚上"

  11. end if

  12. wscript.echo month(d)&"月"&day(d)&"日"&z
复制代码
1

评分人数

    • okobe0: 很不错，完美实现技术 + 1

TOP

okobe0

Rank: 1

帖子
11 
积分
29 
技术
0  
捐助
0  
注册时间
2011-5-30 
4楼
发表于 2015-6-18 21:19 | 只看该作者
回复 3# pcl_test


    哥，你牛啊，完美实现我的想法。不过我新手，有些地方实现不了。比如，我想把文件拷贝到这个目录下，用你的代码可以实现生成文件夹，然后我就用代码把文件拷贝到这个目录，第一次拷贝没问题，第二次因为有之前已经生成了文件夹，代码会提示已经有同名文件夹。我想在复制之前加一条if检测代码，如果有这个文件夹直接复制，如果没有就创建，可是我不懂VB，调试了好久，if语句都加不上，显示语法错误，大哥帮忙解决一下好吗？

TOP

pcl_test

Rank: 8Rank: 8

帖子
3041 
积分
5333 
技术
685  
捐助
0  
注册时间
2014-10-19 
5楼
发表于 2015-6-18 21:47 | 只看该作者
本帖最后由 pcl_test 于 2015-6-21 19:40 编辑

回复 4# okobe0
改为
  1. '&cls&@echo off

  2. '&cls&for /f %%a in ('cscript -nologo -e:vbscript %~fs0') do set "folder=%%a"&if not exist "E:\%%a" md "E:\%%a"

  3. '&cls&for /f "delims=" %%i in ('dir /ad /b I:\') do xcopy "I:\%%i" "E:\%folder%\%%i\" /s

  4. '&cls&pause&exit /b
复制代码
1

评分人数

TOP

okobe0

Rank: 1

帖子
11 
积分
29 
技术
0  
捐助
0  
注册时间
2011-5-30 
6楼
发表于 2015-6-19 17:55 | 只看该作者
本帖最后由 okobe0 于 2015-6-19 17:56 编辑

回复 5# pcl_test

因为要复制根目录下的文件夹，任意名称的，下面这句话怎样加进你之前写的代码中去呢？
    for /f "delims=" %%i in ('"dir /ad /b I:"') do copy "I:\%%i" "E:\%%a\"

'&cls&@echo off
'&cls&for /f %%a in ('cscript -nologo -e:vbscript %~fs0') do (if not exist "E:\%%a\" md "E:\%%a\"&copy "I:\%%i" "E:\%%a\")
h=hour(now)
d=date()
if h>=0 and h<8 then
d=date()-1
z="晚上"
elseif h>=8 and h<18 then
z="白天"
else
z="晚上"
end if
wscript.echo month(d)&"月"&day(d)&"日"&z

TOP

pcl_test

Rank: 8Rank: 8

帖子
3041 
积分
5333 
技术
685  
捐助
0  
注册时间
2014-10-19 
7楼
发表于 2015-6-21 19:38 | 只看该作者
回复 6# okobe0

5楼已改
1

评分人数

TOP

okobe0

Rank: 1

帖子
11 
积分
29 
技术
0  
捐助
0  
注册时间
2011-5-30 
8楼
发表于 2015-7-10 19:22 | 只看该作者
回复 7# pcl_test


    谢谢你的回复，完美。

TOP

返回列表