FSO İle Dosyanın Var Olup Olmadığını Denetleme (ASP)
Çok sık kullanılan bir fonksiyon değil ama kimi zaman çok gerekli olduğu durumlar olabiliyor. Örneğin dağıtıma hazır bir script yazdınız ve bunu piyasaya sürdünüz. Bu uygulamada da güvenlik nedeniyle kullanıcının, veritabanını varsayılan konumdan değiştirmesini istiyorsunuz. Bunu kullanıcının insiyatifine bırakmamak için, uygulamanın yönetim paneline her girildiğinde veritabanının varsayılan konumda olup olmadığını bu fonksiyonla denetleyip kullanıcıyı database’in konumunu veya adını değiştirmeye zorlayabilirsiniz.
Fonksiyon:
<%
Function kontrol(byval FName)
If FName <> "" Then
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
If FSO.FileExists(Server.Mappath(FName)) Then
kontrol = True
Else
kontrol = False
Else
kontrol = False
End If
End Function
%>
Örnek Kullanım:
<%
If kontrol("db/veritabani.mdb") then
Response.Write "VeriTabanınızın Adını ve Adresini Değiştirmelisiniz."
End If
%>
Bu yazı toplamda 331 kez, bugün ise 1 kez okundu.
Yorum yapın 31 Mayıs 2009


