批处理之家 - Powered by Discuz! Board

标题: [文本处理] 求助批处理批量创建文件夹 [打印本页]

作者: guanqi945a 时间: 2023-5-30 12:28 标题: 求助批处理批量创建文件夹

我想求助大神，有没有可以按要求批量创建文件夹的方法？比如我想创建序号为20－50的30个文件夹，我就输入20－50创建出来的文件夹就是0020、0021、0022……0050这种，在线求助各位大神帮忙啊！谢谢了！

作者: qixiaobin0715 时间: 2023-5-30 12:51

你的栗子中应当是31个文件夹：

@echo off
set InValue=20
set FiValue=50
setlocal enabledelayedexpansion
for /l %%i in (%InValue%,1,%FiValue%) do (
    set str=0000%%i
    md !str:~-4!
)
pause
复制代码

作者: guanqi945a 时间: 2023-5-30 20:51

谢谢大神指导，但是有没有更简便的方法啊？比如我就输入前后两个序号，就可以批量完成什么的！

作者: jyswjjgdwtdtj 时间: 2023-5-30 21:19

回复 3# guanqi945a

set fso=createobject("scripting.filesystemobject")
s=cint(inputbox("开始"))
e=cint(inputbox("结束"))
b=cint(inputbox("总位数"))
i=cint(inpubox("间隔"))
for j=s to e step i
fso.createfolder(string(b-len(j),"0")&j)
next
复制代码

作者: chen007 时间: 2023-5-30 21:22

回复 3# guanqi945a

@echo off
set/p InValue=起始文件夹
set/p FiValue=截止文件夹
setlocal enabledelayedexpansion
for /l %%i in (%InValue%,1,%FiValue%) do (
set str=0000%%i
md !str:~-4!
)
pause

作者: LTSC1809 时间: 2023-5-30 21:24

本帖最后由 LTSC1809 于 2023-5-30 21:25 编辑

回复 1# guanqi945a

@echo off
set /p user_input1=请输入最小值：
set /p user_input2=请输入最大值：
for /l %%i in (%user_input1%,1,%user_input2%) do md %cd%\00%%i
pause
复制代码

作者: LTSC1809 时间: 2023-5-30 21:27

回复 4# jyswjjgdwtdtj 你这不是vbs吗

作者: jyswjjgdwtdtj 时间: 2023-5-30 21:40

本帖最后由 jyswjjgdwtdtj 于 2023-5-30 21:41 编辑

回复 7# LTSC1809

昂楼主也没要求bat啊说实话我觉得vbs比bat靠谱

作者: 77七 时间: 2023-5-30 22:10

回复 6# LTSC1809

md %cd%\00%%i
复制代码

要带引号
比如

md a b
复制代码

这样会创建两个文件夹

作者: LTSC1809 时间: 2023-5-30 23:14

回复 8# jyswjjgdwtdtj 确实，但是vbs语法严格一点，你可能没体验过运行报错，改完问题以后又变成新的报错，改完又变成新报错，真的好难受啊

作者: LTSC1809 时间: 2023-5-30 23:16

回复 9# 77七
用引号是把从%cd%前面到%%i后面括起来吗

作者: 77七 时间: 2023-5-30 23:24

回复 11# LTSC1809

是，你试一下

作者: guanqi945a 时间: 2023-5-31 07:59

回复 6# LTSC1809

感谢大神相助

作者: qixiaobin0715 时间: 2023-5-31 09:17

本帖最后由 qixiaobin0715 于 2023-5-31 10:46 编辑

回复 3# guanqi945a
代码保存为ANSI编码：

@echo off
set /p Interval=输入区间值（格式如20-50，英文连接符）：
for /f "tokens=1,2 delims=-" %%a in ("%Interval%") do (
    set InValue=%%a
    set FiValue=%%b
)
for /l %%i in (%InValue%,1,%FiValue%) do (
    setlocal enabledelayedexpansion
    set str=0000%%i
    md !str:~-4!
)
pause
复制代码

作者: guanqi945a 时间: 2023-6-1 22:30

回复 5# chen007

感谢大神相助！！

作者: guanqi945a 时间: 2023-6-1 22:34

回复 14# qixiaobin0715

感谢大神帮忙！！

欢迎光临批处理之家 (http://www.bathome.net/)