VBS / VBScript – Ordner von A-Z anlegen lassen

Falls jemand mal eine Ordnerstruktur von A bis Z braucht, um z.B. Dokumente zu sortieren und diese Ordner automatisch anlegen lassen will, dem kann mit diesem VBS-Script geholfen werden:

Option Explicit

Dim FSO, start, ende, asciiz

start = 65
ende = 90

Do While start <= ende
Set FSO = CreateObject(“Scripting.FileSystemObject”)
asciiz = Chr(CInt(start))
FSO.CreateFolder(asciiz)
start = start + 1
Loop

Gibts auch zum Download: ordnera-zanlegen.vbs

Leave a Comment