[ASP, VBScript]

[Sonic]

Ik heb de volgende code:

code:

    arArtikelen = session("artikelen")
    
    dim artemp()    
    redim artemp(2, UBound(arArtikelen, 2))
    
    response.write("Aanbod nummer is: " &request.querystring("aanbodnr") & "<br>")
    for i = 1 to Ubound(arartikelen,2)
        if arartikelen(0,i) <> request.querystring("aanbodnr") and arartikelen(1,i) <> "" and arartikelen(0,i) <> "" THEN
            artemp(0,i) = arArtikelen(0,i)
            artemp(1,i) = arArtikelen(1,i)
        else
            tijdelijk = session("aanbodnr") 
            pos = InStr(tijdelijk,", ")
            aanbodnummer = request.querystring("aanbodnr") & " "
            
            if pos = 2 then
                test = replace(tijdelijk, aanbodnummer, "")
                session("aanbodnr") = test
            else
                test = replace(tijdelijk, request.querystring("aanbodnr"), "")
                response.write("<br>RRRRRRRRRRRRRRRRRRRRRRRRRRRR" & request.querystring("aanbodnr") & " RRR<br>")
                session("aanbodnr") = test
            end if
        end if
    next
    
    session("artikelen") = artemp

    for each x in artemp
        response.write (x & ",")
    next

Het probleem is dat hij de array vult met niks!!
ik heb er al extra dit neergezet:

code:

    for i = 1 to Ubound(arartikelen,2)
        if arartikelen(0,i) <> request.querystring("aanbodnr") and arartikelen(1,i) <> "" and arartikelen(0,i) <> "" THEN

maar dan schrijft hij als nog er nix in!??? misschien ben ik te lang bezig er mee ik kom er ff echt niet uit

[whoami]

Weet je, dat is gewoon een kwestie van debuggen.
Doe dat eens. Het is niet de bedoeling in P&W dat wij jouw code gaan debuggen.

En zorg in het vervolg ook eens voor een betere titel.