ArreMedlem sedan juli 200370 inlägg Kan man möjligen ta bort ett visst element från en Array?
Jag har t.e.x. delat in en querystring med dess variabler till olika element i en Array:
strQueryString = Request.ServerVariables("QUERY_STRING")
'Dela in querystring i olika element i array, skär sträng vid ampersand
arrTemp = Split(strQueryString,"&")
Om jag vill ta bort ett element som innehåller en viss variabel och värde(tex. "sent=ok"), hur kan man göra det på ett smidigt sätt? går det överhuvudtaget?
Tack på förhand!
ArreMedlem sedan juli 200370 inlägg Jag kom på det.. koden nedan tar bort en variabel och dess värde från querystring.
'////////////////////////////////////////////////////////////////
Dim arrTemp, strTmpPair, strRemoveItem
Dim strNewQuery: strNewQuery = ""
'Dela in querystring i olika element i array
arrTemp = Split(Request.ServerVariables("QUERY_STRING"),"&")
'Ange vilken variabel som ska tas bort från querystring, tex "status=no"
strRemoveItem = "status"
For i=0 To UBound(arrTemp)
strTmpPair = Split(arrTemp(i),"=")
If Trim(strTmpPair(0)) <> Trim(strRemoveItem) Then
If Trim(strNewQuery) <> "" Then strNewQuery = strNewQuery &"&"
strNewQuery = strNewQuery & strTmpPair(0) &"="& strTmpPair(1)
End If
Next
'Skriv ut nya querystring
Response.Write strNewQuery