<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% StateAbb = array("AL", "AK", "AZ", "AR", "CA", "CO", "CT", "DE", "FL", "GA", "HI", "ID", "IL", "IN", "IA", "KS", "KY", "LA", "ME", "MD", "MA", "MI", "MN", "MS", "MO", "MT", "NE", "NV", "NH", "NJ", "NM", "NY", "NC", "ND", "OH", "OK", "OR", "PA", "RI", "SC", "SD", "TN", "TX", "UT", "VT", "VA", "WA", "WV", "WI", "WY ") StateName = array("Alabama", "Alaska", "Arizona", "Arkansas", "California", "Colorado", "Connecticut", "Delaware", "Florida", "Georgia", "Hawaii", "Idaho", "Illinois", "Indiana", "Iowa", "Kansas", "Kentucky", "Louisiana", "Maine", "Maryland", "Massachusetts", "Michigan", "Minnesota", "Mississippi", "Missouri", "Montana", "Nebraska", "Nevada", "New Hampshire", "New Jersey", "New Mexico", "New York", "North Carolina", "North Dakota", "Ohio", "Oklahoma", "Oregon", "Pennsylvania", "Rhode Island", "South Carolina", "South Dakota", "Tennessee", "Texas", "Utah", "Vermont", "Virginia", "Washington", "West Virginia", "Wisconsin", "Wyoming") %> Intex Dealer Locator

Dealer Locator

Enter either your zip or city and state to find your local dealers.

" />
or
" style="width: 180px;" />

<% if request("radius") <> "" then set objLocator = new aspLocator radius = 50 if isnumeric(request("radius")) then radius = request("radius") end if if request("zip") <> "" then searchResults = objLocator.getLocation(request("zip")) if searchResults = "Invalid Zipcode" OR searchResults = "Unknown Zipcode" then response.write "

Error: " & searchResults & "

" else response.write "

Search Results for: " & searchResults & "

" objLocator.displayLocations radius, request("zip") end if else if request("city") <> "" and request("state") <> "" then searchResults = objLocator.getLocationByCity(request("city"),request("state")) if searchResults = "City/State not found in database." then response.write "

" & request("city") & ", " & request("state") & " was not found in our database.

" else response.write "

Search Results for: " & searchResults & "

" objLocator.displayLocationsByCity radius, request("city"), request("state") end if else if request("state") <> "" then response.write objLocator.displayDrilldown(request("state"),request("city")) end if end if end if set objLocator = nothing end if %>