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