Mycrosoft Posted February 3, 2011 Share Posted February 3, 2011 Elimde 250'den fazla klasör var ve klasör isimlerinde [color="#FF0000"]- DVDRip'ten HD MP4[/color] kelime grubu geçiyor. Klasör isimlerinden bu kelime grubunu kolayca nasıl silebilirim? Quote Link to comment Share on other sites More sharing options...
bates54 Posted February 3, 2011 Share Posted February 3, 2011 [quote name='MyCroSofT' date='03 Şubat 2011 - 12:39 ' timestamp='1296737395' post='956779'] Elimde 250'den fazla klasör var ve klasör isimlerinde [color="#FF0000"]- DVDRip'ten HD MP4[/color] kelime grubu geçiyor. Klasör isimlerinden bu kelime grubunu kolayca nasıl silebilirim? [/quote] rename master programını dene http://download.chip.eu/tr/Rename-Master_1361442.html Quote Link to comment Share on other sites More sharing options...
Mycrosoft Posted February 3, 2011 Author Share Posted February 3, 2011 denedim ama çok fazla seçenek var hangisini seçeyim bilmiyorum. Quote Link to comment Share on other sites More sharing options...
KintaRo Posted February 3, 2011 Share Posted February 3, 2011 AMS ile küçük bir uygulama hazırladım, metin kutusuna klasör isimlerinden silinmesi gereken metni girip başla tuşuna basarak o klasorlerin içinde bulunduğu dizini gösterin. Bu kadar. [img]http://img218.imageshack.us/img218/9738/qttemphp3664.png[/img] [code]http://www.mediafire.com/?1q73sw84h9612r2[/code] Geliştirmek isteyenler için kaynak kodları: [codebox]sText = Input.GetText("Input1") if sText ~= "" then sGozat = Dialog.FolderBrowse("İsmi değişecek klasörlerin bulunduğu dizini seçin:", _DesktopFolder) if sGozat ~= "CANCEL" then tAra = File.Find(sGozat, "*.*", false, true, nil, nil) if tAra then for i,v in pairs(tAra) do bFolder = Folder.DoesExist(v) if bFolder then nAra = String.Find(v, sText, 1, false) if nAra ~= -1 then sDegistir = String.Replace(v, sText, "", false) Folder.Rename(v, sDegistir) end end end end Dialog.Message("OK", "İsim Değiştirme Bitti.") end end[/codebox] Quote Link to comment Share on other sites More sharing options...
Mycrosoft Posted February 3, 2011 Author Share Posted February 3, 2011 işe yaradı gerçekten çok teşekkürler. geliştirecek arkadaşlara da şimdiden başarılar Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.