fso = CREATEOBJECT("Scripting.FileSystemObject") lnNum =adir(ladir,'c:\Backup\FP*','D') asort(ladir,3) FOR nCount = 1 TO lnNum && Loop for number of databases ? LADIR(nCount,1) ? FDATE(LADIR(nCount,1)) endfor