创建10的10次方个文件夹，有简便方法吗！

来源：百度知道 编辑：UC知道 时间：2024/05/27 18:09:27
今天突发奇想，可不可像用密码一样获取文件
我想到了创建多个带数字的文件夹目录
以一个文件夹下来，每个文件夹里面放十个文件夹这样建十层
但是一个一个建文件夹速度很慢啊，有没有什么高招在短时间内建起这样一个盘大的文件夹分支，谢谢大家来讨论啊！

这个肯定要用循环语句的
vbs就可以实现
打开记事本，输入
str="D:\test\"
stra="D:\test\"
strb="D:\test\"
strc="D:\test\"
strd="D:\test\"
stre="D:\test\"
strf="D:\test\"
strg="D:\test\"
strh="D:\test\"
stri="D:\test\"
for a = 1 to 5
for b = 1 to 5
for c = 1 to 5
for d = 1 to 5
for e = 1 to 5
for f = 1 to 5
for g = 1 to 5
for h = 1 to 5
for i = 1 to 5
Set fso = CreateObject("Scripting.FileSystemObject")
Set fs = fso.CreateFolder(stri)
stri=strh & i & "\"
next
strh=strg & h & "\"
next
strg=strf & g & "\"
next
strf=stre & f & "\"
next
stre=strd & e & "\"
next
strd=strc & d & "\"