<% Dim v Dim t ReDim a(Request.Form.Count) v=Request.Form t=Request.Form.Count For i=0 To t-2 a(i)=Split(Split(v,"&")(i),"=")(0) Next Response.Write("<br>") For i=0 To t-2 Response.Write a(i)&"="&Request.Form(a(i))&"<br>" Next %>