ta bort ett element från array

ArreMedlem sedan juli 200370 inlägg

Frågan12 aug. 2006 10:42#1

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

12 aug. 2006 13:37#2

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