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

Mit VBScript alle Dateien (NUR DIE DATEIEN, keine Ordner) eines Laufwerks ausgeben

Frage Entwicklung VB for Applications

Mitglied: TuXHunt3R

TuXHunt3R (Level 3) - Jetzt verbinden

06.08.2007, aktualisiert 16:53 Uhr, 9835 Aufrufe, 5 Kommentare

Hallo Forum

Ich suche eine Möglichkeit, mit VBScript alle Dateien auf einem Laufwerk (d.h. alle Dateien in allen Unterordnern) auszugeben. Die Ordner sollen nicht ausgegeben werden, nur die Dateien mit den dazugehörigen Pfaden.
Mitglied: AndreasHoster
06.08.2007 um 13:36 Uhr
Z.B. so:
' * Benötigte Objekte erzeugen *
Set fs = CreateObject("Scripting.FileSystemObject")
Set Folder = fs.GetFolder("D:")
VerzDurchgang Folder

' *
'
* Funktionen & Prozeduren *
'
*

Sub VerzDurchgang(Verzeichnis)
On Error Resume Next
FilesDurchgang Verzeichnis
For each folder in Verzeichnis.Subfolders
If err.number = 0 then
VerzDurchgang folder
End If
Next
End Sub

Sub FilesDurchgang(Verzeichnis)
' * Fehlerhandling abschalten, wegen Zugriffsverletzungen
On Error Resume Next
For each file in Verzeichnis.files
' * Was jetzt tun?
wscript.echo file.Path
Next
End Sub

Zugriffs-Fehler werden allerdings nicht abgefangen, sondern nur ignoriert.

EDIT: Mal wieder in die fehlerhafte Code Anzeige reingelaufen, deswegen als normaler Text.
Bitte warten ..
Mitglied: TuXHunt3R
06.08.2007 um 13:42 Uhr
Der Code-Block hat momentan einen Bug, der Eintrag ist leer.

Falls du Code posten wolltest, poste diesen doch bitte schnell ohne code-Block
Bitte warten ..
Mitglied: TuXHunt3R
06.08.2007 um 13:57 Uhr
Herzlichen Dank für die schnelle Info.

Ein Problem ist noch:

Folgender Titel wird ebenfalls noch angezeigt:

Microsoft (R) Windows Script Host, Version 5.6
Copyright (C) Microsoft Corporation 1996-2001. Alle Rechte vorbehalten.


Den Titel kann ich aber nicht gebrauchen, gibt es eine Möglichkeit, diesen nicht anzuzeigen?
Bitte warten ..
Mitglied: AndreasHoster
06.08.2007 um 14:10 Uhr
Klar.
Starte das Script mit cscript //NoLogo Pfad_des_VBS_Skriptes
Bitte warten ..
Mitglied: TuXHunt3R
06.08.2007 um 16:53 Uhr
Herzlichen Dank!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Bitte warten ..
Neuester Wissensbeitrag
Microsoft

Lizenzwiederverkauf und seine Tücken

(5)

Erfahrungsbericht von DerWoWusste zum Thema Microsoft ...

Ähnliche Inhalte
Batch & Shell
gelöst Per Batch Dateien in einen Ordner - ext. Festplatte übertragen (2)

Frage von tocksick zum Thema Batch & Shell ...

Windows Server
gelöst Freigegebener Ordner "Eigene Dateien" (8)

Frage von JensDND zum Thema Windows Server ...

Windows 10
Löschen von Ordner mit Dateien (3)

Frage von jerry32 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...

Microsoft Office
Keine Updates für Office 2016 (13)

Frage von Motte990 zum Thema Microsoft Office ...

Grafikkarten & Monitore
Tonprobleme bei Fernseher mit angeschlossenem Laptop über HDMI (11)

Frage von Y3shix zum Thema Grafikkarten & Monitore ...