For a = 0 To Request.Form.Count - 1
If InStr(Request.Form.Keys(a), "Hamta") > 0 Then Hamta = True
If InStr(Request.Form.Keys(a), "Spara") > 0 Then Spara = True
If InStr(Request.Form.Keys(a), "TaBort") > 0 Then TaBort = True
Temp = Request.Form.GetKey(a)
Do While InStr(Temp, ".") > 0
Temp = Mid(Temp, InStr(Temp, ".") + 1)
Loop
Temp = Left(Temp, InStr(Temp, "[") - 1)
If UCase(Temp) = "ARENDENUMMER" Then Ärendenummer = Request.Form(Request.Form.Keys(a))
If UCase(Temp) = "NAMN" Then Namn = Request.Form(Request.Form.Keys(a))
If UCase(Temp) = "TEXT" Then Text = Request.Form(Request.Form.Keys(a))
Next
ulf.a@dtp-tjanst.se