Spezialordner

Viele Ordner lassen sich anzeigen mit:

  1. Set wshShell = CreateObject("WScript.Shell")
  2. for each element In WshShell.SpecialFolders
  3. MsgBox element
  4. next

Die gezielte Ermittlung eines Ordners ist möglich mit:

  1. wshShell.SpecialFolders(tag)

Als tag sind zugelassen:

Beispiel zur Anzeige des Dokumentenordners:

  1. Set wshShell = CreateObject("WScript.Shell")
  2. Msgbox wshShell.SpecialFolders("MyDocuments")

Weitere Ordner sind zu ermitteln mit:

  1. Set objFS = CreateObject("Scripting.FileSystemObject")
  2. msgbox objFS.GetSpecialFolder(Kennung)

Zugelassene Kennungen sind: