Asp'de dosya silme

Kodla Büyü

acam42

Site Gezgini
Mesajlar
80
merhaba arkadaşlar, siteme bir haber ekleme bölümü yaptım ve habere resim upload edilebiliryor ve resmin yolunu veritabanına kaydediyorum. tamam herşey güzel haber ekleniyor bir sorun yok. haberi sil dediğimde veritabanından kayıtları siliyorum fakat resim serverda duruyor. haberle beraber resmi serverdan nasıl silebilirim. bilen arkadaşlar yardımcı olursa sevinirim.
 
Sub functionDF()
Dim fso, f1
Set fso = CreateObject("Scripting.FileSystemObject")
Set f1 = fso.GetFile(Server.MapPath(DosyaAdi))
f1.Delete
End Sub

DosyaAdi yerine resim dosyasinin adini vereceksin
 
yaptım ama olmadı bir hata da vermedi. birde benim resmim veritabanında örneğin resim.jpg olarak tutuluyor. ve resm images diye bir klasörün içinde o zaman resim yolunu nasıl tanımlamak gerekiyor
 
Server.MapPath("/images/"&resimadi)
Server.MapPath("images/"&resimadi)

bu ikisinden biri olmasi lazim
 
sorun neymis izin meselesi mi? hangisi calisti, ben de cok hakim degilim ben de ogrenem:)
 
kendim böyle birşey geliştirdim. yardımlarıniçin tekrar teşekkürler

Function Dosya_Sil(yol)
On Error Resume Next
Dim SilinecekDosya
Dim FSO
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set SilinecekDosya = FSO.GetFile(yol)
SilinecekDosya.Delete
Set SilinecekDosya=Nothing
Set FSO=Nothing
End Function

Dosya_Sil(Server.MapPath("uplFiles/"&resimadi))
 
cok guzel de yapiyi soyle yapsan daha iyi kodun okunabilmesi acisindan:

Function Dosya_Sil(resimadi)
On Error Resume Next
Dim SilinecekDosya
Dim FSO
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set SilinecekDosya = FSO.GetFile(Server.MapPath("uplFiles/"&resimadi))
SilinecekDosya.Delete
Set SilinecekDosya=Nothing
Set FSO=Nothing
End Function

Dosya_Sil(resimadi)
 
Geri
Üst