Türkçe Karakterleri Replace Yapma
-
Merhaba arkadaşlar dosya isminde çşö gibi harfleri cos gibi yapmak istiyorum yani bir klasörün içinde diyelim 100 tane böyle ismi karışık dosya var onların tümünde yarasın istiyorum işe autoit script ile yapmak istiyorum bana kod verebilirmisiniz acep :D istediğim şey X klasörde Türkçe Karakterli Dosya İsmi Olan dosyalar olucak tamam lanan adlı klasöre yeniden oluşturcak dosya isimlerini replace yapıcak çö gibi kelimeler türkçe karakterler varsa bunları sc gibi karakterlere çevircek
-
http://www.sherrodcomputers.com/products_filerenamer.cfm
bunu kullaniyorum guzel kullanisli
klasoru alt klasorleriyle tarayip ister sadece dosyalari ister sadece klasorlerin isimlerini degistirebiliyorsun, basina sonunan kelime ekleyebiliyorsun, xx olanlari yy olsun diyebiliyorsun
bayaa kullanisli
-
underzero bunu yazdı:
-----------------------------
http://www.sherrodcomputers.com/products_filerenamer.cfm
bunu kullaniyorum guzel kullanisli
klasoru alt klasorleriyle tarayip ister sadece dosyalari ister sadece klasorlerin isimlerini degistirebiliyorsun, basina sonunan kelime ekleyebiliyorsun, xx olanlari yy olsun diyebiliyorsun
bayaa kullanisli
-----------------------------işimi gördü saolasın reis :) gerçekden kullanışlı bir program
-
mantığı şu:
-----------------------------
$arama = FileFindFirstFile("*.*") ; Arama kriteri
If $arama = -1 Then ; Arama başarısız olduğunda programdan çık. "FileFindFirstFile" yardımına bakarsan anlarsın.
MsgBox(0, "Hata", "Dosya/klasör bulunamadı")
Exit
EndIf
While 1
$dosya = FileFindNextFile($arama) ; Sonraki dosyayı bul
If @error Then ExitLoop ; Dosya kalmadıysa döngüden çık
$yeniden_adlandir = StringReplace($dosya, "ı", "i", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "ı", "i", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "ğ", "g", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "ü", "u", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "ş", "s", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "ö", "o", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "ç", "c", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "İ", "I", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "Ğ", "G", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "Ü", "U", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "Ş", "S", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "Ö", "O", 0, 1)
$yeniden_adlandir = StringReplace($yeniden_adlandir, "Ç", "C", 0, 1)
; Yeniden adlandırmak için FileMove komutunu kullanıyoruz.
FileMove($dosya,$yeniden_adlandir,0)
WEnd
FileClose($arama)
-------------------------------------
Dosya:
http://www.multiupload.com/QRL87ER3R4
Edit: bu kod daha da geliştirilebilir, bu sadece script'in bulunduğu klasördeki dosyaları adlandırır.
$arama = FileFindFirstFile("*.*") <<<<---- buraya klasör yolu da girebilirsin
$cmdline[1] = derlediğin programına verilen ilk parametre, bunu da verebilirsin, exe'nin üstüne klasör attığında onunla işlem yapar.