<% IF (checkPermission("drivers")="FAILED") THEN response.write("You do not have permission to view this page") response.end END IF strError="None" strquery=sanitizeRequest("_rsq","form") strmapSQL="SELECT curLAT, curLONG FROM cbk_routes WHERE routeNAME='"&strquery&"' limit 1" SET rsSEARCH = dbCBK.Execute(strmapSQL) IF rsSEARCH.EOF THEN 'none found strError="No Route Found" END IF DO WHILE NOT rsSEARCH.EOF strMLT = rsSEARCH("curLAT") strMLN = rsSEARCH("curLONG") rsSEARCH.MoveNext loop rsSEARCH.Close SET rsSEARCH = Nothing IF strError <> "None" THEN response.write("ERROR||" & strError) ELSE response.write("SUCCESS||" & strMLT & "||" & strMLN) END IF %>