VBScript-Scriptdatei
Hallo zusammen

Eigentlich bin ich im Programmier Forum falsch, heute aber nicht . ich habe ein VBS Script das mir auf meinem Localen oder entfernten System die grösse des Freien Speicherplatzes zeigt. Nun sollte es die Ausgabe nicht in bytes sondern Prozent anzeigen... nun da die Datei in meinem Augen recht ausführlich ist weiss ich nicht wie ich das anstellen kann... jemand eine idee?

greez
8)

<font size="4"> Code </font> -> LINK

Versuch´s mal hiermit:

Dim fso, drv, Total, Free, Proz, Lw
Lw = "D:"
Set fso = CreateObject("Scripting.FileSystemObject")
Set drv = fso.GetDrive(fso.GetDriveName(Lw))
Total = drv.TotalSize
Free = drv.FreeSpace
Proz = Total / 100
Proz = "Auf Laufwerk " & Lw & " sind " & FormatNumber(Free / Proz,2) & "% frei"
MsgBox Proz