Ini fungsinya agar ASP menampilkan sisa ruang disk. Teman-teman yang membutuhkannya bisa langsung menggunakannya.
Fungsi TampilkanFreeSpace(drvPath)
Redupkan fso, d, s
Setel fso = CreateObject(Scripting.FileSystemObject)
Setel d = fso.GetDrive(fso.GetDriveName(drvPath))
s = mengemudi&UCase(drvPath) & -
s = s & d.VolumeName &<BR>
s = s & ruang kosong: & FormatNumber(d.FreeSpace/1024, 0)
s = s&KB
TampilkanFreeSpace=s
Fungsi Akhir