Frågan#1
Hej!
En polare har gjort en webshop åt mig som jag nu håller på att modifiera.
Har ingen kontakt med honom så därför vänder jag mig hit :).
Har slängt upp en snabbversion på:
https://www.mittip.se/shop/
Problemet är att när man lagt lite varor i kundvagnen ( klicka på produkter om nån vill testa ) och väljer sedan att ta bort en vara ( klicka på kundvagn där nere ) så plockar den alltid den första produkten, och inte den man i själva verket klickar på.
Vore väldigt tacksam om någon kanske ser något fel i följande kod om det är något fel ni kan se på rak arm.
varukorg_tabort.asp ser ut enligt följande:
<%
If Session("antal_varor") < 2 then
'NY VARUKORG
Dim prod_meny_id, prod_meny_text,prod_meny_antal
Redim prod_meny_id(20), prod_meny_text(20),prod_meny_antal(20)
prod_meny_id(0) = 1
prod_meny_text(0) = "Din Varukorg är tom"
prod_meny_antal(0) = 1
Session("prod_id") = prod_meny_id
Session("prod_meny_text") = prod_meny_text
Session("prod_antal") = prod_meny_antal
Session("antal_varor") = 0
Session("sub_total") = 0
Else
Dim prod_id,i
prod_id = Request.Form("ID")
Dim meny_prod_id
Dim meny_prod_meny_text
Dim meny_prod_antal
ReDim meny_prod_id(20)
ReDim meny_prod_meny_text(20)
ReDim meny_prod_antal(20)
meny_prod_id = Session("prod_id")
meny_prod_meny_text = Session("prod_meny_text")
meny_prod_antal = Session("prod_antal")
For i=prod_id to Session("antal_varor")-1
meny_prod_id(i) = meny_prod_id(i+1)
meny_prod_meny_text(i) = meny_prod_meny_text(i+1)
meny_prod_antal(i) = meny_prod_antal(i+1)
Next
Session("antal_varor") = Session("antal_varor")-1
Session("prod_meny_text") = meny_prod_meny_text
Session("prod_id") = meny_prod_id
Session("prod_antal") = meny_prod_antal
End If
Response.Redirect Request.ServerVariables("HTTP_REFERER")
%>