Re: change all files names to lower case.

new topic     » goto parent     » topic index » view thread      » older message » newer message
  • Posted by sergelli Aug 29, 2014
  • 1400 views

So, it worked.

I renamed twice.

The first time with a changed name

Later renamed to the correct name in lowercase 

ff= dir(dd)
 if atom(ff) then  
  ff= message_box("Folder " & dd &"\nNot found","","")  
  return  
 end if  
 for i=3 to length(ff) do  
  ll=dd&lower(ff[i][1])  
  mm=moveFile(dd&ff[i][1],ll & "1") -- I added something in the name, only to record with different name 
  mm=moveFile(ll & "1",ll)          -- Now, recorded with the correct name 
  if mm=w32False then  
   xx= message_box("The file \n" & dd & ff[i][1]&"\n has not been renamed to \n"&ll,"","")  
  end if  
 end for

But this seems a codig poorly done.

Does anyone have a better idea?

new topic     » goto parent     » topic index » view thread      » older message » newer message

Search



Quick Links

User menu

Not signed in.

Misc Menu