Function getAllParam()
PstParam = "Pst["
for each sparam in request.form 'request.querystring
PstParam=PstParam & sparam&"=>'"&(request.form(sparam))&"';"
next
PstParam=PstParam&"]"
GetParam = "Get["
for each sparam in request.querystring 'request.querystring
GetParam=GetParam & sparam&"=>'"&(request.querystring(sparam))&"';"
next
GetParam=GetParam&"]"
getAllParam=PstParam&GetParam
End function