How to detect Disk Size (WXP)

[angie]

Hello, all:
I'm writing a program using WSH and VBScript to backup files from hardisk to DVD disk. My program needs to detect if the DVD disk is full, then pop a message to the user. I don't know how to dicide the disk size in WSH and VBScript, any suggestions will be greatly appreciated. Thanks.

<P ID="edit"><FONT class="small">Edited by angie on 01/10/03 11:15.</FONT></P>

[Jama]

Set fso = CreateObject("Scripting.FileSystemObject")
Set Drv = Fso.GetDrive("c:")
s = Drv.FreeSpace & " bytes" & vbNewline
s = s & Drv.FreeSpace / 1024 & " Kb" & vbNewline
s = s & Round(Drv.FreeSpace / 1048576, 0) & " MB"
wscript.echo s
Set Drv = Nothing

Jama

[angie]

Thanks, Jama.
Do you know how to detect the size of a file?

[Jama]

Set FSO = CreateObject("Scripting.FileSystemObject")
Set MyFile = FSO.GetFile("C:\TestFolder\New Text Document.txt")

s = "Name: " & MyFile.Name & vbNewline
s = s & "Size: " & MyFile.Size & " Bytes"
wscript.echo s

Set FSO = Nothing
Set MyFile = Nothing

<a target="_blank" href=http://www.devguru.com/Technologies/vbscript/quickref/file.html>http://www.devguru.com/Technologies/vbscript/quickref/file.html</a>


Jama

[angie]

Thanks!