Merhaba arkadaşlar bu konumda sizlere ASP kodlarımızla Access veritabanından veri silmeyi anlatacağım.
Genel olarak bu işlev bize admin panellerinde yarayacağı gibi bu sayede yeri geldiğinde sitemizde işlevini kaybeden linkleri silmemizide sağlar. Kodlama işlemine başlamadan ilk olarak veritabanımıza bağlanıyoruz. ( Eğer ki veritabanına bağlanmayı bilmiyorsanız bir önceki yazılarımı okumalısınız.)

Set sadecedownload= Server.CreateObject("ADODB.Connection")
sadecedownload.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("veritabani.mdb")

Veritabanına bağlandıktan sonra hangi tablomuzdan veri sileceksek o tabloda işlem yapıyoruz.

 id = Request.Querystring("id")
 if id = "" then
 Response.Write("Silmek İçin ID Seçmediniz..")
 else
 set rs = Server.CreateObject("ADODB.Recordset")
 sql = "DELETE * From sadecedownload where id = "&id&""
 rs.Open sql,bag,1,3
 Response.Write("Silme işlemi başarıyla sonuçlanmıştır...")
 end if

Yukarıda ki kodumuzda yapmış olduklarımızı anlatmak gerekirse;
İlk olarak Request.Querystring ile id'mizi alıyoruz. Request.Querystring browserde id'den sonra yazan rakamı çeker. Örneğin sadecedownload.com/sil.asp?id=61 burda ki 61 rakamını çeker.

 id = Request.Querystring("id") => çektiğimiz id'yi id ile eşitliyoruz.
 if id = "" then => if komutu ile şartlandırmaya gidiyoruz. Burda ki amacımız, eğer ki kişi veritabanında bulunmayan bir veriyi silmeye kalktığında ona uyarı vermemizi sağlamak
 Response.Write("Silmek İçin ID Seçmediniz..") => Belirtmiş olduğumuz if şartında eğer ki kişi boş veya yanlış bir id girerse o kişiye bunu belirtmek için Response.Write kodunu kullanıyoruz.
 else => ile eğer ki kişi doğru id girdiyse yukarda ki uyarıyı geçip silme işlemine başlamasını belirtiyoruz.
 set rs = Server.CreateObject("ADODB.Recordset") => ADODB ile tablomuza bağlanıyoruz.
 sql = "DELETE * From sadecedownload where id = "&id&"" => Bu alanda dikkat etmeniz gereken en önemli unsur. Select yerine DELETE komutunu kullanmış olmamız. Kişi son veriyi silmemesi için de where komutu ile id'den yukarda çekmiş olduğumuz id'yi eşitliyoruz.
 Response.Write("Silme işlemi başarıyla sonuçlanmıştır...") => Silme işleminin başarıyla bittiğini belirtir
 end if => Açmış olduğumuz if şartının kapatılmasını sağlar.

Umarım anlaşılır bir dille anlatmışımdır...
Lütfen kafanıza takılan soru veya konuyla ilgili sorunlarınızı aşağıda ki yorum ekle alanından bize bildiriniz...

Saygılarımla;
SadeceDownload.CoM
MitiSoft