lcCD = "" FOR i=0 TO 25 IF DRIVETYPE( CHR(ASC("A")+i) ) = 5 lcCD = lcCD + CHR(ASC("A")+i) ENDIF ENDFOR ? lcCD