Üye Kayıt Üye Giriş
biz-sizi-arayalim
biz-sizi-arayalim
Yabancı Dil Eğitim Seti
Yeni Windows tanıtılıyor
Yeni Windows tanıtılıyor
Asphalt Overdrive Retro Tasarımı ile Karşımızda!
Asphalt Overdrive Retro Tasarımı ile Karşımızda!
Note Edge Sınırlı Sayıda Üretilecek!
Note Edge Sınırlı Sayıda Üretilecek!
iOS 8.0.2 Güncellemesi Gelecek!
iOS 8.0.2 Güncellemesi Gelecek!
Sesli Asistan Cortana Yeni Özellikleri ile Siri'yi Kızdırıyor!
Sesli Asistan Cortana Yeni Özellikleri ile Siri'yi Kızdırıyor!
kpss-egitim-setleri

Klasör İsmi Değiştirme Fonksiyonu


YGS Görüntülü Eğitim Seti

Klasör İsmi Değiştirme Fonksiyonu

 
<%
'|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'| Klasör Adı Değiştirme Fonksiyonu
'| Murat a.k.a doronty37 | doronty37 @ d0gma.org
'| http://www.mydesign.gen.tr
'|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Function IsimDegistir(byVal strEskiAd, byVal strYeniAd)

'// FSO nesnesi oluşturuluyor
Set FSO = Server.CreateObject("Scripting.FileSystemObject")

'// Klasörün varlığı kontrol ediliyor
If FSO.FolderExists(Server.MapPath(strEskiAd)) Then
Set Klasor = FSO.GetFolder(Server.MapPath(strEskiAd))
Klasor.Name = strYeniAd '// İsim Değiştirildi
End If

End Function


'// Örnek Kullanım
islem = IsimDegistir("eski","yeni")
%>

YDS Sınavı Hazırlık Seti
Bilgisayar Dershanesi Ders Sahibi;
Bilgisayar Dershanesi

Yorumlar

Yorum Yapabilmek İçin Üye Girişi Yapmanız Gerekmektedir.

ETİKETLER