นี่เป็นฟังก์ชันสำหรับ ASP เพื่อแสดงพื้นที่ดิสก์ที่เหลืออยู่ เพื่อน ๆ ที่ต้องการก็สามารถใช้งานได้โดยตรง
ฟังก์ชั่น ShowFreeSpace(drvPath)
หรี่ fso, d, s
ตั้งค่า fso = CreateObject (Scripting.FileSystemObject)
ชุด d = fso.GetDrive(fso.GetDriveName(drvPath))
s = ไดรฟ์&UCase (drvPath) & -
s = s & d.VolumeName &<BR>
s = s & พื้นที่ว่าง: & FormatNumber(d.FreeSpace/1024, 0)
s = s&KB
ShowFreeSpace=s
ฟังก์ชันสิ้นสุด