Function GetAllItem
		Dim nm, vl
		For Each nm in Request.QueryString
			vl = Request.QueryString(nm)
			Response.write vl
		Next
		For Each nm in Request.Form
			vl = Request.Form(nm)
			Response.write vl
		Next
	End Function