[ASP] element uit array verwijderen? - Softwareontwikkeling

donderdag 4 december 2003 19:08

Acties:

Verwijderd

Topicstarter

code:

<%@ Language=VBScript %>
<% Option Explicit %>
<!--#include file="inc\connectie.inc.asp"-->
<!--#include file="inc\winkelwagen.inc.asp"-->
<%


dim rstProduct
dim qryProdcode, qryprodomschrijving
dim productcode
dim conProduct
dim winkelwagen
dim teller
dim prodnummer

dim finprodcode, finprodomschrijving
dim producteninwagen
dim finprodprijs
dim finprodsubPrijs
dim finprodaantal
dim totalekosten

 'controle of de winkelwagen leeg is
 if IsEmpty(session("winkelwagen")) then
    Response.Write "Er zijn nog geen items in uw winkelwagen aanwezig"
    Response.End
 end if 
 
           
 'lokale array gelijk zetten aan sessie van de winkelwagen
  winkelwagen = Session("winkelwagen")

  producteninwagen = Session("Teller")

    totalekosten = 0
 
%>
<html>

<head>
    <title>Winkelwagen</title>
</head>

<body>


<% for prodNummer = 0 to producteninwagen
       if winkelwagen(0, prodnummer) <> "" then
       
       finprodcode = winkelwagen(prodcode, prodnummer)
       finprodomschrijving = winkelwagen(prodomschrijving, prodnummer)
       finprodprijs = winkelwagen(prodPrijs, prodnummer)
       finprodsubprijs = winkelwagen(prodsubPrijs, prodnummer)
       finprodaantal = winkelwagen(prodaantal, prodnummer)
       
       
       'berekenen totale kosten
       totalekosten = totalekosten + finprodsubprijs
        %>
-------------------------------------------------------
<BR>
        <%Response.Write "Productcode: " & finprodcode & "<BR>"%>
        <%Response.Write "productomschrijving: " & finprodomschrijving & "<BR>"%>
        <%Response.Write "Stuks Prijs: " & finprodPrijs & "<BR>"%>
        <%Response.Write "Totaal prijs: " & finprodsubPrijs & "<BR>"%>
        <%Response.Write "Aantal: " & finprodaantal & "<BR>"%>
        <%dim del 
        del = prodnummer
        winkelwagen.remove(0,0)
        %>
        <a href = "wwdelete.asp?prodnummer=<%= prodnummer%>"> Product verwijderen</a><BR><BR>

</PRE>

        <%
        end if
        
        next
        %>
<br>
<br>
<br>
<%Response.Write "totale kosten: " & totalekosten & "<BR>"%>

<%Response.Write "Er zijn <b>" & producteninwagen & "</b> soorten artikelen in uw winkelwagen aangetroffen.<BR>"%>

Klik <a href = "wwleegmaken.asp"> hier</a> om uw winkelwagen leeg te maken

</body>

</html>

elke element heeft een prodnummer
hoe kan ik er nou voor zorgen dat het element met dat bepaalde prodnummer wordt weggehaald uit de array?

ik heb al dingen opgezocht enzo maar snap er weinig van

wie kan mij helpen

donderdag 4 december 2003 19:10

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Googlelink

Wat snap je niet aan de 2e link?

Daarnaast kan je beter werken met het Dictionary Object in dit geval in plaats van een array.

[ Voor 32% gewijzigd door gorgi_19 op 04-12-2003 19:13 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo

donderdag 4 december 2003 19:12

Acties:

Verwijderd

Topicstarter

dat is php??

is er niet zoiets van winkelwagen(0,0).erase ofzo?

[ Voor 70% gewijzigd door Verwijderd op 04-12-2003 19:13 ]

donderdag 4 december 2003 19:14

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

De 2e link is bij mij echt een link naar ASPin.

Verwijderd schreef op 04 december 2003 @ 19:12:
dat is php??

is er niet zoiets van winkelwagen(0,0).erase ofzo?

Nee.

Je kan trouwens beter eens het dictionary object gaan onderzoeken, voor dit geval.

[ Voor 74% gewijzigd door gorgi_19 op 04-12-2003 19:14 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo

donderdag 4 december 2003 19:14

Acties:

Verwijderd

Topicstarter

gorgi_19 schreef op 04 december 2003 @ 19:10:
Googlelink

Wat snap je niet aan de 2e link?

Daarnaast kan je beter werken met het Dictionary Object in dit geval in plaats van een array.

ik heb het nou eenmaal zo gedaan, en zoals je ziet werkt het perfect:
http://212.127.233.178:8080/vincent/1/index.htm

ik zoek alleen nog iets hoe ik iets moet verwijderen:

hier snap ik weinig van

code:

sub DeleteArray (ByRef aArray, ByRef sString)

    dim iTemp
    dim iUBound

    dim bFound

    bFound = False
    iUBound = UBound(aArray)

    for iTemp = 0 to iUBound
        if (aArray(iTemp) = sString) then
            aArray(iTemp) = aArray(iUBound)
            bFound = True
        end if
    next

    if (True = bFound) then redim preserve aArray(iUBound - 1)

end sub

[ Voor 35% gewijzigd door Verwijderd op 04-12-2003 19:18 ]

donderdag 4 december 2003 20:05

Acties:

.oisyn

Moderator Devschuur®

Demotivational Speaker

Je komt met een hele lap code, en vervolgens een simpele vraag die niets met je code van doen heeft. Elementen verwijderen is gewoon alle elementen die erna komen een naar voren schuiven (of sneller: je pakt het achterste element en dat zet je neer op de plaats van het element dat je wilt verwijderen, maar dan klopt de volgorde natuurlijk niet meer).

Hiermee moet je er toch wel uit kunnen komen denk ik zo.

Give a man a game and he'll have fun for a day. Teach a man to make games and he'll never have fun again.