I have this at the top of my page
strPETS = Request.QueryString ("PETS")
Here is the code for the whole page
<%@LANGUAGE="VBSCRIPT"%><%
Dim strLOCATION, IntLoop, strSQL(), strOCCUPANTS_NO, strSqlLOC, objConn, objRsLOC
strLOCATION = Request.QueryString ("LOCATION")
strOCCUPANTS_NO =...