Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VBS Ordnerauswahl und Dateiauswahl mit Rückgabe des kompletten Pfades

Frage Entwicklung VB for Applications

Mitglied: 49443

49443 (Level 1)

02.07.2007, aktualisiert 18.10.2012, 20753 Aufrufe, 2 Kommentare

Hallo zusammen,

vielleicht kann mir jemand weiterhelfen.

In einem Script soll der "Ordnerauswahldialog" aufgehen in dem man eine Datei oder einen Ordner auswählen kann. Als Rückgabewert soll der komplette Pfad erscheinen + wenn eine Datei ausgewählt wurde, der Dateinamen.

01.
AuswahlTitel = "Bitte Datei oder Verzeichnis auswählen" 
02.
StartOrdner = "17"  'Arbeitsplatz 
03.
Set dateiauswahl = objappshell.BrowseForFolder(0,AuswahlTitel,16384,StartOrdner) 
04.
wscript.echo dateiauswahl

Derzeit wird mir nur der Name ohne Pfad ausgegeben.....

Gruß
Christian
Mitglied: bastla
02.07.2007, aktualisiert 18.10.2012
Hallo lauti1!

Dass Du mit dem von Dir geposteten Auswahldialog auch nur den Namen einer Datei erhältst, überrascht mich ...

Um zumindest eine Ordnerauswahl mit vollem Pfad durchzuführen, könnte das etwa so aussehen:
01.
AuswahlTitel = "Bitte Datei oder Verzeichnis auswählen" 
02.
StartOrdner = "17"  'Arbeitsplatz 
03.
Set Dateiauswahl = CreateObject("Shell.Application").BrowseForFolder(0,AuswahlTitel,16,StartOrdner) 
04.
Set Ordner = Dateiauswahl.Self 
05.
WScript.Echo Ordner.Path
Zum Thema Datei auswählen: http://www.administrator.de/forum/vbs-datei-ausw%c3%a4hlen-55751.html

Grüße
bastla
Bitte warten ..
Mitglied: 49443
02.07.2007 um 15:05 Uhr
Alles klar. Danke für die Hilfe!!

Funktioniert jetzt so wie ich mir das vorgestellt habe!
Bitte warten ..
Ähnliche Inhalte
Entwicklung
gelöst Grafische Darstellung - Fortschrittsanzeige VBS Skript (7)

Frage von Komoran12 zum Thema Entwicklung ...

Batch & Shell
gelöst Vbs programm unabhängig vom Speicherort ausführen (2)

Frage von Markus2016 zum Thema Batch & Shell ...

Windows 10
gelöst Vbs oder batch zum Ändern von Dateinamen ab Zeichenkette (13)

Frage von vbaGast zum Thema Windows 10 ...

Batch & Shell
Cpl Dateien per Batch oder VBS öffnen (1)

Frage von Angelo131095 zum Thema Batch & Shell ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
iOS
16 iPads zentrall verwalten (16)

Frage von simonlohr zum Thema iOS ...

Viren und Trojaner
Ransomware .nm4 (15)

Frage von Zyklo92 zum Thema Viren und Trojaner ...

Zusammenarbeit
Administrator Verhalten nach Vertragskündigung (13)

Frage von sysbone zum Thema Zusammenarbeit ...

Windows 7
Freeware MSI Tool (12)

Frage von uridium69 zum Thema Windows 7 ...