ADODB.Field error '800a0bcd' --- ÇOK ACİL

ADODB.Field error '800a0bcd'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/apanel/urungir.asp, line 20


------kod------------

<!--#include file="view.asp"-->
<%
id=Request.form("id")
marka=sqlkont(request.form("marka"))
model=sqlkont(request.form("model"))
fiyat_1_3=sqlkont(request.form("fiyat_1_3"))
fiyat_3_15=sqlkont(request.form("fiyat_3_15"))
fiyat_15=sqlkont(request.form("fiyat_15"))
yakit=sqlkont(request.form("yakit"))
birim=sqlkont(request.form("birim"))
ozellik=sqlkont(request.form("ozellik"))
video=sqlkont(request.form("video"))




if id="" then
bag.execute("insert into urun(marka,model,fiyat_1_3,fiyat_3_15,fiyat_15,yak it,birim,ozellik,video) values("& marka &","& model &",'"& fiyat_1_3 &"','"& fiyat_3_15 &"','"& fiyat_15 &"','"& yakit &"','"& birim &"','"& ozellik &"','"& video &"')")
set urn=bag.execute("select*from urun where arac='"& arac & "' order by id desc")
id=urn("id")
else
bag.execute("update urun set marka="& marka &", model="& model &", fiyat_1_3='"& fiyat_1_3 &"', fiyat_3_15='"& fiyat_3_15 &"', fiyat_15='"& fiyat_15 &"', yakit='"& yakit &"', birim='"& birim &"', ozellik='"& ozellik &"', video='"&video&"' where id="&id)
end if

for each alan in request.form
if left(alan,5)="foto_" then
if not request.Form(alan)="" then
if request.Form("def")=alan then
def=",def=true"
else
def=",def=false"
end if
bag.execute("update resim set uid='"& id &"', resim='"& sqlkont(request.form(alan)) &"'"& def &" where id="& mid(alan,6) )
else
bag.execute("delete from resim where id="& mid(alan,6) )
end if
elseif left(alan,4)="foto" then
if not request.Form(alan)="" then
if request.Form("def")=alan then
def1=",def"
def2=",true"
else
def1=""
def2=""
end if
bag.execute("insert into resim(uid,resim"& def1 &") values("& id &",'"& sqlkont(request.form(alan))&"'"& def2 &")")
end if
elseif left(alan,3)="oz_" then
if not request.Form(alan)="" then
bag.execute("update ozellik set urun='"& id &"', ozellik='"& sqlkont(request.form(alan)) &"', icerik='"& sqlkont(request.form("ic_" & mid(alan,4))) &"' where id="& mid(alan,4) )
else
bag.execute("delete from ozellik where id="& mid(alan,4) )
end if
elseif left(alan,4)="_oz_" then
if not request.Form(alan)="" then
bag.execute("insert into ozellik(urun,ozellik,icerik) values("& id &",'"& sqlkont(request.form(alan))&"','"& sqlkont(request.form("_ic_" & mid(alan,5))) &"')")
end if
end if
next

response.Redirect("urun.asp")
%>

"& marka &","& model &", burası


'"& marka &"','"& model &"', böyle olsa ?

birşey farketmedi yine aynı hata

Either BOF or EOF is True hatası demek select ile veri aldıktan sonra boş veri gelmesi demek.

Örneğin veritabanından günleri çektiriyorsunuz. Select * from gunler where = 'Pazartesi' dediniz ama veritabanında pazartesi yok. O zaman bu hatayı alırsınız.

Ona göre kodlarınızı tekrardan düzenleyin. Kodlarınıza bakmadım çok uzun.

id=urn("id")

fazlaymış şimdi çözdüm