Hej, jag och en till person håller på med ett projekt i Webb B, där vi tyvärr håller på med ASP. Vi har kommit en bra bit, men vi har tyvärr stött på problem vid visning av produkter i en kundvagn. Då står det:


Körningsfel i Microsoft VBScript fel '800a01b6'

Objektet stöder inte egenskapen eller metoden.: 'product.ProduktId'


Någon som vet vad det kan bero på? Koden:

<code>
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("varor.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")

response.write session("cart").count

response.flush

set kaka=session("cart")
for each k in kaka
set product = kaka(k)
Visa = "SELECT produkter.namn as pnamn, produkter.pris, produkter.imgurl, kategorier.namn as knamn
FROM produkter, kategorier where produkter.id=" & cstr(product.produktid)
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic
response.write recset("pnamn") & ";" & recset("pris") & "<img src=""" & recset("imgurl") & """ />" & recset
("knamn") & " - " & product.antal & "<br />"
recset.close
if product is nothing then response.write "ko"
response.flush
response.write "" & product.ProduktId
next

connect.close

call session("cart").add("32", new CartContent)
session("cart")("32").produktid=32
session("cart")("32").antal=5

call session("cart").add("75", new CartContent)
session("cart")("75").produktid=75
session("cart")("75").antal=2

call session("cart").add("37", new CartContent)
session("cart")("37").produktid=37
session("cart")("37").antal=3

%>
</code>
Mycket tacksam för hjälp, och säg till om något mer behövs (är väldigt ny på ASP)!

/Jacob

Mmm,

where produkter.id=" & cstr(product.produktid)

product.productid förväntas du troligen få från något annat håll, kanske via url?

så det borde nog vara

where produkter.id=" & request.querystring("produktid")

Om du då besöker sidan så borde det stå:

localhost/handla.asp?produktid=8

sen för att plocka ut datat så skriver man
response.write rs("pris") + " ... " + rs("pnamn")

Däremot fältet productid kan du inte lista ut för det finns inte med i select-satsen. Så behöver du det också, då får du utöka din sql-fråga till :

Visa = "SELECT produkter.produktid, produkter.namn as pnamn, produkter.pris, produkter.imgurl, kategorier.namn as knamn
FROM produkter, kategorier where produkter.id=" & request.querystring("produktid")