m0nstar
Goto Top

Freie Laufwerksbuchstaben ausgeben mit WSH

Hallo,

ich habe einen Code um mir alle bereits aktiven Laufwerksbuchstaben auszugeben.

	set fs = Createobject("Scripting.filesystemobject")  
	leer = "  "  
	set drives = fs.drives
		for each drive in drives
		list = list & drive & leer
	next

Ich habe dann in einer Inputbox, via String die aktiven Laufwerksbuchstaben eingebaut, dass klappt auch alles diese werden mir auch angezeigt, aber wie kann ich denn jetzt noch überprüfen welche noch frei sind ( D:, E:, F:, ...) und diese mir Anzeigen lassen.

Also es sollen mir einmal die aktiven angezeigt werden und einmal die freien angezeigt werden, die aktiven habe ich ja wie gesagt bereits schon face-smile

Vllt kannt mir ja einer von euch weiterhelfen.

Gruß,
m0nstar

Content-Key: 120941

Url: https://administrator.de/contentid/120941

Printed on: April 19, 2024 at 05:04 o'clock

Member: bastla
bastla Jul 21, 2009 at 09:58:03 (UTC)
Goto Top
Hallo m0nstar!

Etwa so:
set fs = Createobject("Scripting.filesystemobject")  
frei = "D: E: F: G: H: I: J: K: L: M: N: O: P: Q: R: S: T: U: V: W: X: Y: Z: "  
leer = " "  
set drives = fs.drives
for each drive in drives
    list = list & drive & leer
    frei = replace(frei, drive & leer, "")  
next
Grüße
bastla
Member: m0nstar
m0nstar Jul 21, 2009 at 10:04:33 (UTC)
Goto Top
klasse, so in der art dacht ich mir das selber, wusste aber net wie ich es umsetzten soll....vielen dank nochmal!

Gruß
m0nstar
Member: m0nstar
m0nstar Jul 21, 2009 at 12:50:56 (UTC)
Goto Top
das programm klappt nun hiermit tadellos... thx