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

Oberste 2 Verzeichnisebenen einer Partition auslesen

Frage Entwicklung VB for Applications

Mitglied: TuXHunt3R

TuXHunt3R (Level 3) - Jetzt verbinden

10.08.2007, aktualisiert 11.08.2007, 4774 Aufrufe, 3 Kommentare

Guten Tag


Ich brauche ein VBScript, welches die ersten 2 Verzeichnisebenen einer Partition auflistet. Leider habe ich keine Idee, wie ich das anstellen soll.

Mir schwebt da etwas mit

For Each SubFolder In Folder.SubFolders

Next

im Kopf rum, ich komm allerdings nicht auf die Lösung.


Kann einer von euch VB-Göttern mir kurz helfen?
Mitglied: 16409
10.08.2007 um 16:08 Uhr
du hast dir doch schon selber die Antwort gegeben.
Du liest als erstes die 1 Ebene aus, speicherst die Werte in einem Array und gibst sie aus. Danach liest du dann das Array aus und gibst die die 2. Ebene mit For Each SubFolder In Folder.SubFolders für jeden Ordner im Array aus.

Hoffe das hilft dir schon.
Bitte warten ..
Mitglied: bastla
10.08.2007 um 23:46 Uhr
Hallo TuXHunt3R!

Rein schematisch würde das etwa so aussehen, wobei Du das Script zum Testen besser über
01.
cscript //nologo Scriptname.vbs
starten solltest :
01.
Root = "C:\" 
02.
For Each Folder In CreateObject("Scripting.FileSystemObject").GetFolder(Root).SubFolders 
03.
	WScript.Echo Folder.Path 
04.
	If Folder.Name <> "System Volume Information" Then 
05.
		For Each SubFolder In Folder.SubFolders 
06.
			WScript.Echo SubFolder.Path 
07.
		Next 
08.
	End If 
09.
Next
Ob Dir anstelle der Ausgabe des gesamten Pfades auch ein "Folder.Name" genügt, musst Du selbst wissen ...

Grüße
bastla
Bitte warten ..
Mitglied: TuXHunt3R
11.08.2007 um 16:50 Uhr
@ Bastla


Danke, so was habe ich gebraucht
Bitte warten ..
Ähnliche Inhalte
Debian
gelöst Bereitgestellter Speicher einer Boot-Partition zuweisen !? (5)

Frage von N4m3n7os3r zum Thema Debian ...

Windows Userverwaltung
Mit Powershell am AD Controller die aktiven Usersessions auslesen (1)

Frage von arduino zum Thema Windows Userverwaltung ...

Windows Installation
gelöst Vorinstalliertes Betriebssystem auslesen (BIOS) (14)

Frage von Yauhun zum Thema Windows Installation ...

Batch & Shell
gelöst Daten mit Mediainfo auslesen (17)

Frage von Dr.Byte zum Thema Batch & Shell ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Windows Update
gelöst MS: Update-Server-Adressen OHNE Wildcards (17)

Frage von mrserious73 zum Thema Windows Update ...

Viren und Trojaner
Ransomware .nm4 (14)

Frage von Zyklo92 zum Thema Viren und Trojaner ...

Microsoft Office
+1.000 Ordner in Outlook: Wie besser? (11)

Frage von Matsushita zum Thema Microsoft Office ...