<% strError="None" strquery=sanitizeRequest("_rsq","form") IF strquery <> "" THEN s=replace(strquery,"+"," ") ELSE s=strquery END IF IF s="None Assigned" THEN response.write("NONEASS||") ELSE strmapSQL="SELECT curLAT, curLONG, curSTATUS FROM cbk_routes WHERE routeNAME='"&s&"' AND `schoolID`='"&str_u_id&"' limit 1" SET rsSEARCH = dbCBK.Execute(strmapSQL) IF rsSEARCH.EOF THEN 'none found strError="No Route Assigned" END IF DO WHILE NOT rsSEARCH.EOF strMLT = rsSEARCH("curLAT") strMLN = rsSEARCH("curLONG") strSTATUS = rsSEARCH("curSTATUS") rsSEARCH.MoveNext loop rsSEARCH.Close SET rsSEARCH = Nothing IF strError <> "None" THEN response.write("ERROR||" & strError) ELSE IF strSTATUS="off" THEN 'route is inactive response.write("INACTIVE||") ELSEIF strSTATUS="on" THEN 'route is active response.write("SUCCESS||" & strMLT & "||" & strMLN) ELSEIF IsNull(strSTATUS) THEN response.write("INACTIVE||") ELSE response.write("ERROR||Please Try Again") END IF END IF END IF %>