FILE( CHR( i ) + ":\NUL" )ISDISK( CHR( i ) )
#include "FiveWin.ch"
function Main()
XBrowser( ADrives() )
return nilAntonio Linares wrote:Enrico,
I just tested:
#include "FiveWin.ch" function Main() Â Â XBrowser( ADrives() ) Â Â return nil
And it is working fine with Windows 10 Pro, version 1703, OSBuild 15063.138
Antonio Linares wrote:What Windows 10 version are you using ?
Now I have the same Windows version of yours (1703 build 15063.138) and the problem is not fixed.
EMG
What is exactly the problem ?
The problem is that ADrives() should return (and did before the recent Windows updates) only the existing drives in the system. In my PC it did return C, D AND E while now it wrongly returns all the drives from C to Z. Using ISDISK() instead of the NUL trick fixed the problem for me.
EMG
Could you post your code using ISDISK() ?
many thanks
function ADrives( nType ) // Thanks to EMG
local aDisk := {}
local i
DEFAULT nType := 0
if nType = 0 .OR. nType = 1
for i = ASC( "A" ) TO ASC( "B" )
if ISDISKETTE( CHR( i ) + ":" )
AADD( aDisk, CHR( i ) + ":" )
endif
next
endif
if nType = 0 .OR. nType = 2
for i = ASC( "C" ) TO ASC( "Z" )
if ISCDROM( CHR( i ) + ":" ) .OR. ISDISK( CHR( i ) )
AADD( aDisk, CHR( i ) + ":" )
endif
next
endif
return aDiskmany thanks
Antonio,
you forgot to fix this in the latest FWH build. 
EMG
Enrico,
You are right
Already included for FWH 17.05
many thanks
Great, thank you!
EMG