Script ASP - File: Disk space - Morpheusweb.it - Webmaster resources: programming, asp script, using asp, file asp, asp, asp post, database asp, asp login, vb asp, asp access, asp download, asp script, formmail, area riservata, paginazione, scripts asp, mailform, asp script download

ABOUT >
WORKS >
CONTACT ME >
>

Home Page
> Script ASP
> Script ASP File
> Disk space

Disk space

To find the available space on a disk. (Of network ones too)



					
					<% 

					Set FSO = Server.CreateObject("Scripting.FileSystemObject") 

					set disk = FSO.GetDrive ("C") 

					'SPAZIO LIBERO 

					strFreeSpace = disk.FreeSpace 

					strFreeSpace = strFreeSpace/1024 ' in KB 

					strFreeSpace = FormatNumber(strFreeSpace, 0) 

					'SPAZIO TOTALE 

					strSpace = disk.TotalSize 

					strSpace = strSpace/1024 ' in KB 

					strSpace = FormatNumber(strSpace, 0) 

					response.write "<P>" & strFreeSpace 

					response.write " kb free space " 

					response.write strSpace & " kb total.</P>" 

					set disk = Nothing 

					Set FSO = Nothing 

					%>