Arama butonu
Bu konudaki kullanıcılar: 1 misafir
7
Cevap
984
Tıklama
0
Öne Çıkarma
ASP?
S
20 yıl
Yarbay
Konu Sahibi

<html>
<head>
<title> FORM </title>
</head>

<body bgcolor="#FFFFFF">

<h2>YENY KAYIT EKLEME FORMU</h2>
<form method="get" action="kayit_ekle.asp">

Ad : <input type="text" name="isim"><br><br>
Telefon : <input type="text" name="tel_no"><br><br>
Adres : <input type="text" name="adres"><br><br>
Soyisim : <input type="text" name="soyisim"><br><br>
Do?um Günü (gg/aa/yyyy) : <input type="text" name="birth_date"><br><br>
<br>
<input type="submit" value="EKLE">

</form>[/color]<%

Set VeriYolu= Server.CreateObject("ADODB.Connection")
VeriYolu.Mode = adModeReadWrite

Veriyolu.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Dtb\kisi.mdb")

Set kayitseti= Server.CreateObject("ADODB.Recordset")

sql="select * from person"
kayitseti=Veriyolu.execute(sql)


Dim isim, adres, tel_no,soyisim, birth_date
isim=request.Form("isim")
soyisim=request.Form("soyisim")
tel_no=request.Form("tel_no")
adres=request.Form("adres")
birth_date=request.Form("birth_date")


kayitseti.addnew

kayitseti("isim") = isim
kayitseti("tel_no") = tel_no
kayitseti("soyisim") = soyisim
kayitseti("adres") = adres
kayitseti("birth_date") = birth_date

kayitseti.update

kayitseti.Close
Set kayitseti = Nothing
bag.Close
Set bag = Nothing

%>[/color]</body>
</html>

-----------------------------------------------------
SORU:kisi.mdb adında bir database im var,fakat çalıştırdığımda bana
Hata Tipi:
Microsoft VBScript çalışma hatası (0x800A01B6)
Nesne bu özellik veya yöntemi desteklemiyor: 'addnew'
/kayit_ekle.asp, line 43

hatasını veriyor sizce sorun nerde ben ulamadım,şimdiden teşekkürler..