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
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