Hi Claudio,

You have to follow doc's to get it to work. :)

#Define MAX_FILENAME_LEN 256
SET PROCEDURE TO CALL32
SET LIBRARY TO home()+"FOXTOOLS" ADDITIVE
lhcall32 = Reg32("GetVolumeInformation", "Kernel32.dll", "ppippppi") 
lhGV = RegFP("C@CL@L@L@L@CL", "L") 
Store 0 to ser,i,j
Store space(256) to s,s2
lcVolume = "C:\"
= CallFn(lhGV, lcVolume, @s, MAX_FILENAME_LEN, @ser, @i, @j, @s2, MAX_FILENAME_LEN, lhcall32)
? ser

>Here is the code (with Rick's stuffs)
>
>

>
>*** Front end routines for Call32 Interface
>set defa to f:\temp3\tests\
>
>SET PROCEDURE TO CALL32
>
>SET LIBRARY TO home()+"FOXTOOLS" ADDITIVE
>CLEAR
>
>cVolume=Reg32("GetVolumeInformation", "CCI@@@CI", "I") && it hangs here
>
>=CallFn(cVolume, "C:\", s, MAX_FILENAME_LEN, @ser, @i, @j, s2, MAX_FILENAME_LEN)
>return
>