1.asp komutları ile dosyadan bilgi silme
2.asp komutları ile dosyadan bilgi değişikliği yapma
3.asp komutları ile dosyadan bilgi ekleme
4.asp de fonksiyonlardan faydalanma ve fonksiyon hazırlama
5.asp de temel giriş çıkış komutlarınıı program içinde kullanma
yardımcı olursanınz sevinirim
şimdiden teşekkürler:)
dosyadan derken, veritabanında da mı değişiklik olacak?
1.
not: bu benim veritabanıma göre, kendi veritabanında ki terimlerinize göre düzeltiniz.
<%
id=request.QueryString("id")
Set Kisiler=Server.CreateObject("Adodb.Recordset")
Kisiler.Open "Delete from tbKisiler Where id="&id,baglanti,1,3
response.Redirect("kayitliste.asp")
%>
2
<%
'ekrana kaydı id'ye göre getireceğim için kişinin id'sini alıyoruz.kişiler tablosuna bağlanırken güncelleme yapıldığı için sadece o kişinin kaydını çekmek için where ifadesi kullanıyoruz. Burada şu id'li kaydı çek demiş olduk kayıt eklemeden çok bir farkı yok sadece addnew kullanmıyoruz birde where ifadesi kullanılıyor. en son kişinin id'sinde gönderiyoruz.
id=request.QueryString("id")
Set Kisiler=Server.CreateObject("Adodb.Recordset")
Kisiler.Open "Select * from tbKisiler Where id="&id,baglanti,1,3
if request.ServerVariables("REQUEST_METHOD")="POST" Then
Kisiler("ad")=Request.Form("txtAd")
Kisiler("soyad")=Request.Form("txtSoyad")
Kisiler("yas")=Request.Form("txtYas")
Kisiler.Update
Kisiler.Close
baglanti.Close
response.Redirect("kayitliste.asp?id="&id)
end if
%>
3.
<%
if request.ServerVariables("REQUEST_METHOD")="POST" then
if request.form("txtAd")="" or request.form("txtSoyad")="" then
txtAd="False"
txtSoyad="False"
end if
if txtAd <> "False" or txtSoyad <> "False" then
Set Kisiler=Server.CreateObject("Adodb.Recordset")
Kisiler.Open "Select * from tbKisiler",baglanti,1,3
Kisiler.Addnew 'kisiler tablosunda yeni bir satır
Kisiler("ad")=request.form("txtAd")
Kisiler("soyad")=request.form("txtSoyad")
Kisiler("yas")=request.form("txtYas")
Kisiler.Update 'kayıt ekleniyor
Kisiler.Close
baglanti.Close
response.Redirect("kayitekle.asp?giris=tamam")
end if
end if
%>