Hvordan laver jeg en indkøbskurv?

fungerer ASP sammen med MySQL ?

Ja intet problem i det....

okidokki ;)

Du gemmer bare dine data i en session, eller cookie.. som du selv har skrevet.

Se:
Sessions - http://www.html.dk/tutorials/asp/lektion12.asp
Cookies - http://www.html.dk/tutorials/asp/lektion13.asp

Eksempel (navnet man kan se på websitet|beskrivelsen|id nummeret|prisen):

Sokker|dejlige sokker|12|25 kr
Bukser|et er andet mærke|13|100 kr

Når du så smider dem ind i 1 session:
Sokker|dejlige sokker|12|25*_*Bukser|et er andet mærke|13|100

Så skal du bare lave den om til et array (faktisk 2): http://www.html.dk/tutorials/asp/lektion8.asp

Først splitter du ved "*_*" (hvis du har valgt de tegn), så du kan få splitet varerne op..
Derefter splitter du ved "|" for at kunne se navn, beskrivelse, id og pris.

jeg ligger IDprodukt og session i en database hver gang brugeren smider noget nyt i kurven. så kan du hele tiden hente det frem og vise det senere i et backend modul hvor du eksempelvis kobler det sammen med kundeinfo eller lign.

her er noget at bixe med

<%
    If Request("ID") <> "" then
        'TILFØJ ITEM
        Session("basket") = Session("basket") & "#" & Request("ID") & "¤" & Request("stk")
    elseif Request("remove") <> "" then
        'FJERNER ALLE SOM ER MAGEN TIL
        Session("basket") = Replace(Session("basket"), "#" & Request("ID") & "¤" & Request("stk") , "")
    end if
    basketArr = split(Session("basket"),"#")
   
    For each item in basketArr
        vareARR = split(item,"¤")
        Set rs = conn.execute("Select varenavn," & vareARR(1) & " * VareStkPris as PRIS from Sortiment where VareID = " & vareARR(0)
       
        Response.Write "<input type=text value=" & vareARR & ">&nbsp;&nbsp;" & rs("varenavn") & " = " & rs("PRIS") & "<br>"
    Next
%>

her med fjernelse af vare...

<%
    If Request("ID") <> "" then
        'TILFØJ ITEM
        Session("basket") = Session("basket") & "#" & Request("ID") & "¤" & Request("stk")
    elseif Request("remove") <> "" then
        'FJERNER ALLE SOM ER MAGEN TIL
        Session("basket") = Replace(Session("basket"), "#" & Request("ID") & "¤" & Request("stk") , "")
    end if
    basketArr = split(Session("basket"),"#")
   
    For each item in basketArr
        vareARR = split(item,"¤")
        Set rs = conn.execute("Select varenavn," & vareARR(1) & " * VareStkPris as PRIS from Sortiment where VareID = " & vareARR(0)
       
        Response.Write "<input type=text value=" & vareARR(1) & ">&nbsp;&nbsp;" & rs("varenavn") & " = " & rs("PRIS") & "<br>"
        Response.Write "<a href=""?remove=#" & vareARR(0) & "¤" &  vareARR(1) & """>Fjern</a><br>"
    Next
   
%>

Tak for alle svarene.. I må undskylde ventetiden..

Montago, jeg har leget lidt med din kode der, men ender desværre med fejlmelding.. Jeg har delt den lidt op, således:
addproduct.asp:
<%
    If Request("productID") <> "" then
        'TILFØJ ITEM
        Session("basket") = Session("basket") & "#" & Request("productID") & "¤" & Request("antal")
        Response.Redirect("kurv.asp")
    elseif Request("remove") <> "" then
        'FJERNER ALLE SOM ER MAGEN TIL
        Session("basket") = Replace(Session("basket"), "#" & Request("productID") & "¤" & Request("antal") , "")
        Response.Redirect("kurv.asp")
    end if
%>

Og kurv.asp:
<%
basketArr = split(Session("basket"),"#")
Response.Write Session("basket")

For each item in basketArr
        vareARR = split(item,"¤")
 
        strSQL = "Select title," & vareARR(1) & " * Price as PRIS from shop_products where productID = " & vareARR(0)
        Set rs = myConn.Execute(strSQL)
       
        Response.Write "<input type=text value=" & vareARR(1) & ">&nbsp;&nbsp;" & rs("title") & " = " & rs("PRIS") & "<br>"
        Response.Write "<a href=""?remove=#" & vareARR(0) & "¤" &  vareARR(1) & """>Fjern</a><br>"
Next 
%>

Men nok om det, for jeg får allerede en fejl ved linie 12 som er:
strSQL = "Select title," & vareARR(1) & " * Price as PRIS from shop_products where productID = " & vareARR(0)

Fejl:
Sun ONE ASP VBScript runtime (0x800A0009)
Subscript out of range

Hvad er der galt?

Lukket..