Opdatering af varer i indkøbskurv
Hej, jeg har et problem med opdatering af antal på varer(vin) i en indkøbskurv.Hvis der tastes et nyt tal ind i antal-feltet(kassefelt) og trykkes ’opdater’, tager den det nye antal og laver en linie med det - men den 'gamle' entry bliver ikke slettet. Det ville dog heller ikke løse problemet: Det skal være sådan, at hvis man køber en vin(igen), der allerede er i kurven, så bliver det antal opdateret(altså ikke muligt med 2 ens vine 2 gange). Noget i retning af: Tjek om vinen er i cart allerede ved at køre vine-i-cart’s id igennem. Hvis vinid i cart = id på netop tilføjede vin så opdater antal på vinen.
Jeg er helt nybegynder mht. asp/databaser og har forsøgt at modificere Scannets ASP-demoshop. Her kommer en ordentlig smøre kode:
<%
Cart = Session("Cart")
Items = Session("Items")
if Request.QueryString("action") = "add" then
Items = Items + 1
Set Conn = Server.Createobject("ADODB.Connection")
Conn.Open strDSN
Set RS = Conn.Execute("SELECT * FROM vine WHERE ID = "&Request.QueryString("id")&"")
if Not RS.EOF then
Cart(1,Items) = Items
Cart(2,Items) = RS("ID")
Cart(3,Items) = RS("Navn")
Cart(4,Items) = RS("Kassepris")*(request.form("kassefelt"))
Cart(5,Items) = 1
Cart(6,Items) = RS ("Kasseantal")
Cart(7,Items) = request.form("kassefelt")
end if
RS.close
Conn.Close
Set RS = nothing
Set Conn = nothing
elseif Request.QueryString("action") = "delete" then
Cart(5,Request.QueryString("id")) = 0
elseif Request.QueryString("action") = "sletalt" then
ReDim Cart(7,100)
Session("Cart") = Cart
Session("Items") = 0
Session("TotalPris") = 0
end if
Session("Cart") = Cart
Session("Items") = Items
%>
<table border="1" bordercolor="#333333" bgcolor="#EEECCC" align="center">
<tr align="center" class="sortp">
<td>
<strong>Antal</strong>
</td>
<td>
<strong>Vare</strong>
</td>
<td>
<strong>Pris</strong>
</td>
<td>
</td>
</tr>
<%
for i = 1 to Items
if Cart(5,i) = 1 then
%>
<tr class="sortp">
<td>
<form method="post" action="cart.asp?action=add&id=<%=Cart(2,i)%>">
<input type="text" align="right" name="idfelt" size="1" maxlength="2" disabled value="<%=Cart(2,i)%>">
<input type="text" align="right" name="kassefelt" size="1" maxlength="2" value="<%=Cart(7,i)%>"> kasser a <%=Cart(6,i)%> stk.
<input type="submit" align="right" name="kasseknap" size="5" value="Opdater">
</form>
</td>
<td class="kvitt">
<a href="vine/vine.asp?id=<%=Cart(2,i)%>"><%=Cart(3,i)%></a> - hus
</td>
<td align="right">
<%=FormatNumber(Cart(4,i))%> <!-- Problemlinie -->
</td>
<td>
<form method="post" action="cart.asp?action=delete&id=<%=Cart(1,i)%>">
<input type="submit" align="right" name="Slet" size="5" value="Slet">
</form>
</td>
</tr>
<%
Total = Total + Cart(4,i)
TotalFlasker = TotalFlasker + (Cart(6,i)*Cart(7,i))
end if
next
%>
Sig til hvis noget kræver forklaring :)
Hvis spørgsmålet skulle være postet et andet sted, så sig lige hvor – mvh. Mec
