ASP Veritabanı, Kayıt Ve Silme İşi
Genelde ekleme işini formlardan alınan bilgileri ekleyerek yaparız.Ben burda size sadece eklemeyi göstereceğim. ilk önce veritanına bağlanalım ve sonra tabloya bağlanarak "isim" adlı alanımıza herhangi bir yazı yazdıralım.
<Kod Alanı:
%
Set vt = Server.CreateObject("ADODB.Connection" )
vt.Open "DRIVER={Microsoft Access Driver (*.mdb )}; DBQ=" & Server.MapPath("veritabani.mdb" )
veritabanına baglandik.şimdi sıra tabloda
set rs = server.createobject("ADODB.Recordset" )
SQL = "Select * from Tablo"
rs.open SQL,vt,1,3
simdi bir kayıt ekleyeceğiz
rs.addnew
rs("isim" )="Webhocam.com"
rs.update
%>
Böylece tablodaki isim alanına Webhocam.com yazısını ekledik.
<% rs.addew %> ın anlamı yeni bir boş kayıt oluştur demektir.
<% rs.update %> ise kayıtımızı ekleme anlamına sahiptir.Eğer burda <% rs.update %> i ne kadar yazarsaniz aynı kayıtı o kadar çok eklersiniz.
Evet ekleme işlemini öğrendiğimize göre silme işine geçebiliriz.
Bu seferde hersey aynı olcak fakat SQL komutuna dikkat edin.
Kod Alanı:
<%
Set vt = Server.CreateObject("ADODB.Connection" )
vt.Open "DRIVER={Microsoft Access Driver (*.mdb )}; DBQ=" & Server.MapPath("veritabani.mdb" )
veritabanina baglandik.Simdi sira tabloda
set rs = server.createobject("ADODB.Recordset" )
SQL = "Delete * from Tablo"
rs.open SQL,vt,1,3
%>
Gördügünüz gibi select yerine delete kullandık.Fakat böyle bir kod koyarsanız Tablodaki bütün kayıtlari silersiniz.Tek bir kayit silmek için SQL komutunuz
<% SQL = "Delete * from Tablo WHERE ID = 5 " %>
şeklinde olmalıdır.Bu durumda ID numarasi 5 olan kayıdı silmiş olduk.