dim fso,num
set fso=CreateObject("scripting.filesystemobject")
num =1
do until (x>100000000000000000000000000000000000000000000000000000000000000)
fso.CreateFolder ("C:\"&num)
num=num+1
loop
2
Contributors
1
Reply
3
Views
8 Years
Discussion Span
Last Post by Comatose
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.