[ASP] Url Variabele vervangen

[Verwijderd]

Middag!

Ben een variabele link aan het opbouwen die gebruik maakt van de huidige URL Parameters, Zo ziet hij er ongeveer uit


Link = Request.ServerVariable("URL") & "?" & Request.QueryString()


Nou zit er in een van de bestaande URL Params een Variabele die vervangen moet worden, te weten PageID. Het is zinloos om de gehele QueryString te herschrijven want deze is volledig variabel.

Hoe kan ik dus de PageID uit de String halen zodat ik deze kan 're-setten' en vervolgens weer achter aan erbij kan zetten...

Misschien een beetje vage vraag, maar misschien begrijpt iemand me; anders zal ik het nog anders proberen uit te leggen

Bedankt alvast

[ Voor 5% gewijzigd door Verwijderd op 17-03-2003 13:35 ]

[syllaz]

<% Request("PageID") = "nieuwe waarde" %>

en deze waarde opnieuw meegeven aan je URL parameters?

Of wil je die parameters helemaal gaan strippen om de PageID eruit te halen?

[.oisyn]

- de huidige query string parsen en alle vars in een hashtable zetten
- de nieuwe variabelen toevoegen aan de hashtable
- de hashtable omzetten naar query string

op die manier worden nieuwe variabelen toegevoegd, en variabelen die al bestaan worden gewijzigd

.edit: replace ("hash", "hashtable"). Een 'hash' is geen goeie benaming

[ Voor 16% gewijzigd door .oisyn op 17-03-2003 14:08 ]

[Verwijderd]

.oisyn schreef op 17 maart 2003 @ 13:39:
- de huidige query string parsen en alle vars in een hash zetten
- de nieuwe variabelen toevoegen aan de hash
- de hash omzetten naar query string

op die manier worden nieuwe variabelen toegevoegd, en variabelen die al bestaan worden gewijzigd

Klinkt logisch, ik durf het niet te vragen maar hoe zet ik een hash!
Zit in mijn ASP Boeken te kijken; maar kom niets tegen!

[gorgi_19]

Zoek eens naar het Dictionary object.

[Verwijderd]

Oké, hiermee moet het inderdaad wel lukken. Maar hoe trek ik ze er dan uit; aka hoe schrijf ik een row weg? For Each ofzo? Want de QueryString is één geheel... En niet allemaal losse objecten

[gorgi_19]

querystring is ook een collection, afaik.
for each item in request.querystring etc. moet dus ook werken. Probeer het anders..

[DukeMan]

Werkt dit niet?

ASP:

  Link = Request.ServerVariable("URL") & "?" & Replace(Request.QueryString(), "PageID=" & Request("PageID"), "PageID=0")

Dan staat ie op 0, die nu kan je ook door niets (="") vervangen....

[Verwijderd]

gorgi_19 schreef op 17 maart 2003 @ 15:30:
querystring is ook een collection, afaik.
for each item in request.querystring etc. moet dus ook werken. Probeer het anders..

Runtimefout Microsoft VBScript error '800a01c3'

Dit object is geen collectie

/home/includes/preview.asp, line 21


Volgens mij is het geen collectie!!


Heb net gekeken naar het ServerObject (QUERY_STRING) Maar die werkt ook niet , er staat trouwens een hoop hierover op msdn; maar niet wat ik nodig heb...

[ Voor 32% gewijzigd door Verwijderd op 17-03-2003 16:17 ]

[gorgi_19]

Grappig.. In mijn boekje wel..
Laat je code eens zien anders.. (Alleen het relevante gedeelte)

[Verwijderd]

code:

    URLParam = Request.QueryString()
    Set objDictionary = Server.CreateObject("Scripting.Dictionary")
    
        For each key In URLParam 
            objDictionary.Add key, Value
        Next
        objDictionary.Delete("ProdID")
        
        For Each element in objDictionary
            Response.Write objDictionary.Value(element)
        Next
        
    objDictionary.Close()
    Set objDictionary = Nothing

[ Voor 11% gewijzigd door Verwijderd op 17-03-2003 16:43 ]

[gorgi_19]

ASP:

For each item in Request.Querystring
    objDictionary.Add item, Request.Querystring(item)
Next

[Verwijderd]

Hij werkt!! Bedankt NTGiant!

code:

NewURLParam = Replace(Request.QueryString(), "&PageID=" & PageID, "")
link= Request.ServerVariables("URL") & "?" & NewURLParam & "&PageID="