[absconder]

verilen hata veritabanı sorunu gibigeliyor.

bir yöntem sınarmısınız;

ilk recordset'i açtığınızda, gerekli verileri değişkenlere alarak recordset'i kapatın, yeni recordset'te bu değişkenleri kullanın.

sub ekle
	urunid = request.form("urun")
	gamtablo = request.form("gam")
	urunadi = ""
	brm_fyt = 0
	
	set objUrun = = server.createobject("ADODB.Recordset")
	objUrun.Open "select * from "&gamtablo&" WHERE id = "& urunid, bag, 1
	If objUrun.RecordCount > 0 Then
		urunadi = objUrun("adi")
		brm_fyt = objUrun("brm_fiyat")
	End If
	objUrun.Close
	Set objUrun = Nothing

	set objRS = server.createobject("ADODB.Recordset")
	strsql = "Select * from tblsepet"
	objRS.open strsql,bag, 1, 3
	adet= request.form("adet")
	toplam_bedel = adet * brm_fyt

	objRS.addnew
	objRS("fldurunadi")=urunadi
	objRS("adet")=adet
	objRS("fldfiyat")=toplam_bedel
	objRS("fldSID")=session.sessionID ' Kimin sepeti olduğunu tanımak için
	objRS.update
	response.Redirect("sepete_ekle.ASP?islem=sepet")
end sub