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")
%>

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

klasör � smi değiştirme fonksiyonu