批处理请教

来源：百度知道 编辑：UC知道 时间：2024/06/17 10:07:26
我想做以下批
从2008-01-14到今天，以日期为文件夹名，建立每天的文件夹。请问如何写批。
2008-01-14，2008-01-15，2008-01-16..........今天

On Error Resume Next '如果出现错误（文件夹已存在），则继续执行
temp=int(now()-cdate("2008-01-14")) '获得2008-09-24减于2008-01-14的天数，取整为254天
Set fs = CreateObject("Scripting.FileSystemObject") '调用组件
for i=1 to temp '以间隔天数作为循环次数（254次）
fs.CreateFolder(cdate("2008-01-14")+i) '创建以2008-01-14的日期递增i天的文件夹名
next

保存为test.vbs，双击即可。