FOR lni = 65 TO 90 lcdrive = CHR(lni) IF DRIVETYPE(lcdrive) # 1 ? lcdrive ENDIF NEXT
oFSO = CREATEOBJECT("Scripting.FileSystemObject") FOR EACH oDrive IN oFSO.Drives ? oDrive.DriveLetter NEXT