هذه وظيفة لـ ASP لعرض مساحة القرص المتبقية ويمكن للأصدقاء الذين يحتاجون إليها استخدامها مباشرة.
عرض الدالةFreeSpace(drvPath)
خافت FSO، د، ق
تعيين fso = CreateObject(Scripting.FileSystemObject)
تعيين د = fso.GetDrive(fso.GetDriveName(drvPath))
الصورة = محرك الأقراص&UCase(drvPath) & -
s = s & d.VolumeName &<BR>
s = s والمساحة الحرة: & FormatNumber(d.FreeSpace/1024, 0)
الصورة = الصورة&KB
ShowFreeSpace=s
وظيفة النهاية