Top-Themen

Aktuelle Themen (A bis Z)

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 Pfad mit VB-Schnipsel an Batch übergeben

Mitglied: chainsaw

chainsaw (Level 1) - Jetzt verbinden

25.03.2010, aktualisiert 18.10.2012, 5005 Aufrufe, 4 Kommentare

Hallo Gemeinde,

Ich hab hier einen VB-Schnipsel gefunden, mit dem man Verzeichnisse öffnen kann.

01.
MsgBox BrowseForFile("C:\", "|All Files|*.*")  
02.
 
03.
Function BrowseForFile(pstrPath, pstrFilter)  
04.
Set objDialog = CreateObject("UserAccounts.CommonDialog")  
05.
objDialog.Filter = pstrFilter  
06.
objDialog.InitialDir = pstrPath  
07.
objDialog.Flags = &H80000 + &H4 + &H8  
08.
intResult = objDialog.ShowOpen  
09.
BrowseForFile = objDialog.FileName  
10.
End Function
Meine Frage:
Kann man dieses Script in eine Batch einbauen, damit ein ausgewählter Ordner als Variable im Batch weiterverarbeitet werden kann?

Hintergrund:
Ich benenne zahlreiche Dateien in einem festen Verzeichnis per Batch um - jetzt fände ich es ganz schick, wenn man
mit diesem VB-Schnipsel das Verzeichnis wechseln könnte. Vielleicht geht das ja.

Schöne Grüße
chainsaw
Mitglied: bastla
25.03.2010 um 13:23 Uhr
Hallo chainsaw!

Wäre zwar hier im Forum in diversen Batch-Beispielen zu finden, aber anyhow: Wenn Du die Zeile 1 des VBScripts auf
01.
WScript.Echo BrowseForFile("C:\", "|All Files|*.*")
änderst, könntest Du das Ergebnis etwa wie folgt in einen Batch übernehmen:
01.
set "Pfad=" 
02.
for /f "delims=" %%i in ('cscript //nologo D:\Pfadauswahl.vbs') do set "Pfad=%%i" 
03.
if not defined Pfad echo Kein Pfad gewählt! & goto :eof 
04.
echo %Pfad%
Grüße
bastla
Bitte warten ..
Mitglied: chainsaw
25.03.2010 um 15:29 Uhr
Zitat von bastla:
Wäre zwar hier im Forum in diversen Batch-Beispielen zu finden,

Sorry ich hab gesucht, aber vermutlich nach den falschen Fachbegriffen

Irgendwie scheint der VB-Schnipsel auch nicht zu stimmen - wenn ich auf öffnen klicke, passiert nichts.
na ja...

Trotzdem Danke
Gruß chainsaw
Bitte warten ..
Mitglied: bastla
25.03.2010, aktualisiert 18.10.2012
Hallo chainsaw!

Du kannst es ja mal mit Code aus der Nachbarschaft (bzw aus dem dort verlinkten Thread) versuchen - hinsichtlch der Übergabe an den Batch bedarf es jeweils nur eines "WScript.Echo" für den gewählten Pfad und der Batchzeilen von oben ...

Grüße
bastla
Bitte warten ..
Mitglied: chainsaw
25.03.2010 um 18:42 Uhr
Ok danke - hab`s gefunden!

Gruß chainsaw
Bitte warten ..
Ähnliche Inhalte
Batch & Shell

Win-Batch - warum wird falscher Pfad übergeben

Frage von jan999Batch & Shell4 Kommentare

Moin! ich habe noch einmal eine Frage - vermutlich etwas blind, oder es liegt am "fehlenden Kaffee" (Insider zum ...

VB for Applications

VB-Script in VB-Script starten und Parameter übergeben

gelöst Frage von denkisVB for Applications7 Kommentare

Hallo liebe Scriptgemeinde, ich muss mehrere Rechner für den Übergang in eine neue Domäne vorbereiten. Dafür sind drei wesentliche ...

Batch & Shell

BATCH: Leerzeichen im Registry Pfad

gelöst Frage von 118710Batch & Shell1 Kommentar

Hallo zusammen, dies ist mein erste Beitrag hier und ich hoffe ich bin richtig :P So! Erst ein mal ...

Basic

VB Script: Wenn Link vorhanden dann Pfad ersetzen

gelöst Frage von neotronBasic3 Kommentare

Hallo zusammen, wir haben bei uns ein Logonscript im betrieb, welches den Usern eine Verknüpfung auf dem Desktop anlegt. ...

Neue Wissensbeiträge
Sicherheit

Zero Day-Schwachstelle im Internet Explorer - wird von APT bereits ausgenutzt

Information von kgborn vor 1 StundeSicherheit

Im Kernel des Internet Explorer scheint es eine Zero Day-Lücke zu geben, die von staatlichen Akteuren (APT) im Rahmen ...

Microsoft
Folder Security Viewer-Lizenzen zu gewinnen
Information von kgborn vor 1 StundeMicrosoft

Ich nehme das Thema mal in Absprache mit Frank hier auf, da es für den einen oder anderen Administrator ...

Hardware

Feueralarm killt Festplatten in Rechenzentrum - führt zu größerem Ausfall

Information von kgborn vor 1 StundeHardware2 Kommentare

Noch ein kleiner Beitrag für Administratoren, die in Rechenzentren aktiv sind - so als Fingerzeig. Denn es gibt Szenarien, ...

MikroTik RouterOS

Mikrotik Advisory: Vulnerability exploiting the Winbox port

Information von colinardo vor 1 StundeMikroTik RouterOS

Brand aktuell: Eine Schwachstelle im Winbox-Port bei Mikrotik Routern erlaubt das Auslesen der User-Datenbank der Router. Patch ist aktuell ...

Heiß diskutierte Inhalte
Linux
Linux Server oder Windows Server - lohnt eine Umstellung auf Linux und ebenso basierende SW bei einer langfristigen Planung?
Frage von motus5Linux22 Kommentare

Wir brauchen bei uns einen neuen Server. Dieser wird als Fileserver, Domäne Controller sowie Exchange Server verwendet. Wir versuchen ...

Netzwerkgrundlagen
VLAN - Offene Fragen
Frage von KnettenbrechNetzwerkgrundlagen17 Kommentare

Hallo zusammen, ich befasse mich derzeit mit dem Thema VLAN. Hierzu habe ich schon einige Guides gelesen, einschließlich des ...

Windows Server
Domänencontroller trennen
Frage von Akit57Windows Server13 Kommentare

Hallo, ich hoffe das mir hier jemand meine Frage trotz der spärlichen Informationen die ich geben kann beantworten kann: ...

DSL, VDSL
ISP Wechsel auf Vodefone Koax, Gebäudeverkabelung nur per Cat 7
gelöst Frage von wusa88DSL, VDSL13 Kommentare

Hallo Zusammen, ich bin momentan bei Mnet als Glasfaser Kunde und möchte Preis/Leistungs-Technisch zu Kabel Deutschland / Vodafone wechseln. ...