Finding drive size 1

[beedubau]

I am using

oFSO = CREATEOBJ('Scripting.FileSystemObject')
oDrive = oFSO.GetDrive(CHR(I)+":")
oSize = TRANSFORM(oDrive.TotalSize)

to find drive sizes ( with some further processing to get say 35.6 GB.

The value of oSize for my 250GB drive is

**********.*********

Is there any way to get this value which is shown in Windows explorer as 232 GB usable?

Regards

Bryan

 

[Mike Lewis]

Bryan,

Instead of this:

oSize = TRANSFORM(oDrive.TotalSize)

do this:

oSize = TRANSFORM(oDrive.TotalSize, "999,999,999,999")

Alternatively, divide oDrive.TotalSize by 1,048,576 to get it to megabytes.

Mike


__________________________________
Mike Lewis (Edinburgh, Scotland)

My Visual FoxPro site: www.ml-consult.co.uk

 

[beedubau]

Hi Mike,

Thanks again.

I used oSize = TRANSFORM(oDrive.TotalSize, "999999999999") so I could do my maths later

I now get 250048479232 which is correct.


Regards

Bryan