Using the
Dictionary Object
to
Create an Array
:
Click here
to test this script.
Code:
Highlight
<% if Request.Form <> "" then set dictionary = server.CreateObject("Scripting.Dictionary") for each item in Request.form dictionary.Add item, Request.Form(item) next Response.Write "Key/Value:<p>" arrayKeys = dictionary.Keys() arrayItems = dictionary.Items() for i = 0 to dictionary.Count - 1 strThisKey = arrayKeys(i) strThisItem = arrayItems(i) Response.Write strThisKey & " - " & strThisItem & "<br>" next dictionary.RemoveAll set dictionary = nothing end if %> <form method=post action=test.asp id=form1 name=form1> Field 1: <input type=text size=20 name=field1><br> Field 2: <input type=text size=20 name=field2><br> Field 3: <input type=text size=20 name=field3><br> Field 4: <input type=text size=20 name=field4><br> Field 5: <input type=text size=20 name=field5><br> <p><input type=submit id=submit1 name=submit1> </form>