>indwgno = '842239'
> Set Default To &prfiles &&Look in Prerel to get files
> dtt2 = ADir(gnLODModels,AllT(indwgno) + '*.*')
> =Asort(gnLODModels)
> Set Default to &defpath
> dtt3 = Int(ALen(gnLODModels)/5)
> ? dtt3
Steve,
-You don't need to change default
-Macro substition is dangerous where path might contain a space, use name expression instead
indwgno = '842239'
lcPath = addbs(prFiles)
dtt2 = ADir(gnLODModels, lcPath + indwgno + '*.*')
? dtt2
? 'Files listing'
? '-------------'
for ix=1 to dtt2
? lcPath+gnLODModels[ix,1], ;
gnLODModels[ix,2], ;
gnLODModels[ix,3], ;
gnLODModels[ix,4]
endfor
Cetin