title image


Smiley Re: Dateiauswahl-Dialog mit VBScript ?
Hi,

per Scripting geht das ganze so:



set shell = CreateObject("Shell.Application")

AuswahlTitel = "Ordner auswählen"

StartOrdner = "C:\"

Set retVal = shell.BrowseForFolder(0,AuswahlTitel, 16384,StartOrdner)

MsgBox retVal



Anstelle von einem Explizten Startordners gehen auch folgende Systemordener

Code Systemordner

0 Desktop

2 Programme

3 Systemsteuerung

4 Drucker

5 Eigene Dateien

6 Favoriten

7 Autostart

8 Recent (Inhalt des Dokumente-Menüs)

9 Senden an

10 Papierkorb

11 Startmenü

16 Desktop-Ordner

17 Arbeitsplatz

18 Netzwerkumgebung

19 Ordner Netzwerkumgebung

20 Schriftarten

21 Vorlagen

22 Startmenü für Alle Benutzer

23 Programme für Alle Benutzer

24 Startmenü für Alle Benutzer

25 Desktop für Alle Benutzer

26 Anwendungsdaten

27 PrintHood

31 Favoriten für Alle Benutzer

32 Temporäre Internetdateien

33 Cookies

34 Verlauf



Gruß

Markus

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: