If CLng(Session(\"CartID\")) = 0 then SQLstmt = \"INSERT INTO ShoppingCarts (SessionID, [Date]) VALUES (\" & Session.SessionID & \", \'\" & Now & \"\');\" Conn.Execute SQLstmt Set RS = Conn.Execute (\"SELECT * FROM ShoppingCarts ORDER BY ID Desc\") Session(\"CartID\") = RS(\"ID\") End If
Select Case Mode Case \"tilfoej\" If Not Conn.Execute(\"SELECT varenr FROM tblproducts WHERE varenr =\" & ID).EOF Then If Conn.Execute(\"SELECT ID FROM ShoppingCartItems WHERE CartID = \" & Session(\"CartID\") & \" AND ArticleID = \" & ID).EOF Then SQLstmt = \"INSERT INTO ShoppingCartItems (CartID, ArticleID, Colour, Size1, Size2, ArticleAmount) VALUES (\" SQLstmt = SQLstmt & Session(\"CartID\") & \", \" SQLstmt = SQLstmt & ID & \", \" SQLstmt = SQLstmt & Farve & \", \" SQLstmt = SQLstmt & Stoerrelse & \", \" SQLstmt = SQLstmt & Stoerrelse2 & \", \" SQLstmt = SQLstmt & \"1);\" Conn.Execute SQLstmt Else
Du kan da ikke lave en .EOF p ået metode kald....?! Den går altså ikke. Du må lave det sådan her : set rs = Conn.Execute(\"SELECT varenr FROM tblproducts WHERE varenr =\" & ID) if NOT rs.EOF osv...
Grunden til dette er at en Conn.execute(...) ikke returnere et recordset med mindre du skriver det explicit. altså opretter et ved Set rs, og samtidig ber om at retur mængden fra execute bliver lagt i dette recordset
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.