Form'dan gelen verileri Veritabanına Kayıt Etmek
Form'dan gelen verileri Veritabanına Kayıt Etmek
/* Gönderilecek Olan Veriler (iletisim.asp)*/
<FORM action=kayit.asp method=post>
İsim : <INPUT maxLength=25 size=25 name=ad>
Soyisim : <INPUT maxLength=25 size=25 name=soyad>
<INPUT type=submit value="Gönder">
/* Kayıt Dosyamız (kayit.asp)*/
<%
'////////////////////////////////////////////////
'// coded by rawkmetal //
'// MAİL : gokhandiyebiri@gmail.com //
'//////////////////////////////////////////////
Set KaydetConn = Server.CreateObject("ADODB.Connection")
KaydetConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb")
ad = Request.Form ("ad")
soyad = Request.Form("soyad")
Set ObjRs = Server.CreateObject ("ADODB.RecordSet")
StrSql = "Select * from tablo_adi"
ObjRs.Open StrSql, KaydetConn, 1, 3
if ad ="" or soyad ="" then
Response.Write "doldurmağınız alanlar var..."
else
ObjRs.AddNew
ObjRs("ad") = ad
ObjRs("soyad") = soyad
ObjRs.Update
Response.Write "Kayıt Tamamlanmıştır."
end if
ObjRs.close
Set ObjRs = Nothing
%>