Order Problem

I have made a script for request forms that just takes anything passed to it and send it via CDONTS.  The problem I have encountered is that the order the items are displayed in are really weird. I was wondering if anyone knows how to order this.

  Dim varRequestVariables, varRequestVariablesKeys
  Set varRequestVariables = CreateObject("Scripting.Dictionary")
  For each InputField in Request.Form
    For each InputValue in Request.Form(InputField)
      If varRequestVariables.Exists(InputField) Then
        varRequestVariables(InputField) = varRequestVariables(InputField) & "," & Trim(InputValue)
      Else
        varRequestVariables.Add InputField, Trim(InputValue)
      End If
    Next
  Next

  For each InputField in Request.Form
    For each InputValue in Request.Form(InputField)
  If (InputField <> "x") and (InputField <> "y") then
    varNewMailContent = varNewMailContent & InputField & ": " & InputValue & vbCrLf
   End If
    Next
  Next

"How can I retrieve the fields in my form in the order they appear in the form?"

http://www.aspfaqs.com/aspfaqs/ShowFAQ.asp?FAQID=64