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.
|