For Each RequestItem In Request.QueryString
 if RequestItem <> "FileName" And RequestItem <> "PageTitle" then
  if ParaList = "" then
   ParaList = RequestItem & "=" & Server.URLEncode(Request.QueryString(RequestItem))
  else
   ParaList = ParaList & "&" & RequestItem & "=" & Server.URLEncode(Request.QueryString(RequestItem))
  end if
 end if
Next