<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsDistributors__MMColParam rsDistributors__MMColParam = "1" If (Request.QueryString("State") <> "") Then rsDistributors__MMColParam = Request.QueryString("State") End If %> <% Dim rsDistributors Dim rsDistributors_cmd Dim rsDistributors_numRows Set rsDistributors_cmd = Server.CreateObject ("ADODB.Command") rsDistributors_cmd.ActiveConnection = MM_freealldist_STRING rsDistributors_cmd.CommandText = "SELECT Customer, Address, City, [State], Zip, PhoneF FROM distributors WHERE [State] = ? ORDER BY Customer ASC" rsDistributors_cmd.Prepared = true rsDistributors_cmd.Parameters.Append rsDistributors_cmd.CreateParameter("param1", 200, 1, 255, rsDistributors__MMColParam) ' adVarChar Set rsDistributors = rsDistributors_cmd.Execute rsDistributors_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rsDistributors_numRows = rsDistributors_numRows + Repeat1__numRows %> FreeAllOil.com Dealer Locator
Free All Deep Penetrating Oil Logo

Dealer Locator

Looking for a distributor?
Click on your state to locate the nearest dealer.

United States Map with States Abbreviated
 
Silicone-Free, Body Shop Safe.

Copyright © 2006
Free All Deep Penetrating Oil logo
Toll-free: 1.800.846.7325
fainfo@freealloil.com

<% rsDistributors.Close() Set rsDistributors = Nothing %>