Hi all,

this stuff can be done, but in an insane mode.

This is the hacked solution:

kernel32.dll: load/library %/C/WINDOWS/system32/kernel32.dll
GetVolumeInfo: make routine! [
        disk [string!]
        lpVolumeNameBuffer [string!]
        size [integer!]
        lpVolumeSerialNumber [integer!]
        lpMaximumComponentLength [integer!]
        lpFileSystemFlags [integer!]
        lpFileSystemNameBuffer [string!]
        size2 [integer!]
        return: [integer!]
] kernel32.dll "GetVolumeInformationA"
st: make struct! [
        VolumeNameBuffer [string!]
        FileSystemNameBuffer [string!]
] reduce [VNB: make string! 100 FSNB: make string! 100]
GetVolumeInfo "C:\" VNB 20 0 0 0 FSNB 20
probe st/FileSystemNameBuffer
;"NTFS"

There are many points about my example code which should need a 
wish/issue/bug item in RAMBO.

-- 
To unsubscribe from the list, just send an email to rebol-request
at rebol.com with unsubscribe as the subject.

Reply via email to