>myVar = STUFF(someExpression,3,0,"-") >><pre> >>gnDbcnumber=ADIR(MyAllFiles,"d:\picture2002\*.*") >> FOR i = 1 TO m.gnDbcnumber && Loop for number of databases >> lcOK = "d:\picture2002\"+MyAllFiles(m.i,1) >> NewName=CHRTRAN(m.lcok,"ÇÈ Ê Ë Ì Í Î Ï Ð Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ý Þ ß á ã ä å æ í É Â Ä ì Æ Ã Á","") >> NewName=""+left(m.NewName,4)+right(m.NewName,len(m.NewName)-4) >> Rename (M.lcOK) to (m.NewName) >> ENDFOR >>>>thanks