01-10-2006, 12:49 PM
forget it.
str directorio
if(!BrowseForFolder(directorio)) ret
directorio+"\*"
Dir d; str filename sPath path nombre extension temp arr1 arr2
foreach(d directorio FE_Dir)
,filename=d.FileName
,sPath=d.FileName(1)
,arr1.formata("%s[]" sPath)
,path.getpath(sPath)
,nombre.getfilename(sPath)
,extension.get(sPath findcr(sPath ".")+1)
,;out path
,;out nombre
,;out extension
,temp.from(path nombre "abc" "." extension)
,arr2.formata("%s[]" temp)
,out temp
ren* arr1 arr2