<% Server.ScriptTimeout = 100000 Set cnnFormToDB = Server.CreateObject("ADODB.Connection") cnnFormToDB.Open "DSN=csc;UID=sa;pwd=1979cj7;" if request.querystring("clear") = "clear" then strSQL = "" strSQL = strSQL & "Delete From SearchHits where sessionID = "& Session.SessionID &" " 'response.write(strSQL) cnnFormToDB.Execute strSQL main="Alloy Wheels" end if if request.querystring("type") = "" then main = "Chrome Rims, Alloy Wheels, Steel Wheels, Hubcaps, Replacement Lights, Mirrors, Floor Mats, Center Caps, Chrome Trim Accessories, OEM Replacements " main3 = "products" cat="886" else cat = request.querystring("type") if request.querystring("type") = "886" then main="Alloy Wheels - Chrome Rims and Silver Finishes " end if if request.querystring("type") = "885" then main="Steel Wheels - OEM Replacements " end if if request.querystring("type") = "887" then main="Hubcaps - OEM Replacements, Factory Wheels Covers, After Market Wheel Covers " end if if request.querystring("type") = "661" or request.querystring("type") = "661-01" then main="Replacement Lights - Head Lights, Tail Lights, Fog Lights, Parking Signals " end if if request.querystring("type") = "665" then main="Mirrors - OEM Replacements " end if if request.querystring("type") = "884-05" then main="Floor Mats - $11.89 in 8 Colors " end if if request.querystring("type") = "888-03" or request.querystring("type") = "887-01"then main="Center Caps - OEM Replacement and After Market Caps - With Logo" end if if request.querystring("type") = "884-03" or request.querystring("type") = "884-04" or request.querystring("type") = "884-02" then main="Chrome Trim Accessories - Grill Inserts, Gas Cap Covers, Door Handle Covers, Light Covers, Mirror Covers " end if end if %> <% if request.querystring("year") = "" and request.querystring("Make") = "" and request.querystring("Model") ="" then %> <%=Main%> @ WheelsAndCaps.com

Join our mailing list:

Home - 4 Wheel Deals - Full Catalog Search - Alloy Wheels - Chrome Cladded Wheels - Steel Wheels - Stainless Steel Simulators - Impostor Wheel Skins - Chrome Grille Inserts - Chrome Trim Accessories - Hubcaps - Replacement Lights - Floor Mats - Resources - Privacy Policy - Warranty - Returns - Feedback

<% if request.querystring("Make") = "" then %>

	Part Look Up	OEM Look Up	Key Word Search (Beta Version)
Wheels By Bolt Pattern

<% if main = "Shop" then strsqlISP = "SELECT top 15 * FROM description with(nolock) where hits > 0 and product_code <> '884-05' order by hits desc" else strsqlISP = "SELECT top 15 * FROM description with(nolock) where hits > 0 and product_code= '"& cat &"' order by hits desc" end if 'response.write(strsqlISP) Set objNew = cnnFormToDB.Execute (strsqlISP) count = 0 count2 = 0 do while not objNew.eof d = objNew.Fields("description") if count < 20 then %> <% end if if count2=4 then count2=-1 %> <% end if count2=count2+1 if count > 20 then exit do end if count = count+1 objNew.movenext loop %>

Most Popular <% if main = "Shop" then %> <%=Main2%> <% else %> <%=Main%> <% end if %>

<%=objNew.Fields("partnumber")%>
<% partnumber = objNew.Fields("partnumber") product_code = objNew.Fields("product_code") Set FileSystemObject = Server.CreateObject("Scripting.FileSystemObject") if FileSystemObject.FileExists("C:\Inetpub\wwwroot\wheelsandcaps\images\" + product_code + "\"+ partnumber +".jpg") Then %>

<%=Main%> - <%=partnumber%> <%=year1%> <%=make%> <%=model%>

<% Else %>

<% End If %>
<% strsql="SELECT * FROM specials INNER JOIN specials_items with(nolock) ON specials.ID = specials_items.Type WHERE (specials_items.part LIKE '%" & partnumber &"%')" 'response.Write(strsql) Set objSpec = cnnFormToDB.Execute (strsql) if not objSpec.eof then price1 = objSpec.Fields("price") %> &special=<%=trim(objSpec.Fields("Special"))%>&part=<%=trim(objSpec.Fields("part"))%>#<%=objSpec.Fields("part")%>"> $<%=price1%>Set of 4
(Free Shipping)

<% end if objSpec.close %> <% strsql= "SELECT * FROM price with(nolock) WHERE keystone_part like'%"& partnumber &"%' " 'response.write(strsql) Set objRS33 = cnnFormToDB.Execute (strsql) do while not objRS33.eof if temp = objRS33.Fields("keystone_part") then else temp = objRS33.Fields("keystone_part") 'strsql= "SELECT * FROM price WHERE keystone_part ='"& objRS33.Fields("keystone_part") &"' " 'response.write(strsql) 'Set objRS23 = cnnFormToDB.Execute (strsql) %> <% end if objRS33.movenext loop objRS33.close %>

<%=trim(objRS33.Fields("finish"))%>
$<%=trim(objRS33.Fields("sugg_retail"))%>

Buy Now

<%=d%>

<% end if %> <% '----------------------------------------------------------------- if request.querystring("Make") <> "" and request.querystring("Model") = "" then leny = Len(request.querystring("Make")) %>

" disabled="disabled" size=<%=leny+2 %>>
Change

<% if request.querystring("Type") = "886" or main3="products" then %>

<% count3=0 count2=0 count=0 a=0 strsql = "SELECT DISTINCT Top 10 specials_items.part AS specials, specials_items.Type, specials_items.pic, specials_items.hits ,specials_items.Price FROM modelxref INNER JOIN parts with(nolock) ON modelxref.gmodel = parts.gmodel INNER JOIN specials_items with(nolock) ON parts.partnumber = specials_items.part AND modelxref.Make = '"& request.querystring("Make") &"' order by hits desc" 'response.Write(strsql) set objRS22 = cnnFormToDB.Execute (strsql) count2=0 Dim myarray(500) do while not objRS22.eof myarray(count2) = trim(objRS22.Fields("specials")) count2=count2 +1 i = count2 - 2 a=0 Do while i >= 0 if trim(objRS22.Fields("specials")) = myarray(i) then a=1 end if i=i-1 loop if a = 0 then if count3=0 then count3=1 %>

<% end if %> <% if count = 1 then count=-1 %> <% end if count = count + 1 %> <% end if objRS22.MoveNext Loop objRS22.close end if %>

Deals on Sets of 4
Package # <%=trim(objRS22.Fields("specials"))%> &part=<%=trim(objRS22.Fields("specials"))%>#<%=objRS22.Fields("specials")%>"> " width="50" height="50" alt=" Set of 4 - <%=trim(objRS22.Fields("specials"))%> <%=year1%> <%=request.querystring("Make")%> <%=model%>" border="0"> &part=<%=trim(objRS22.Fields("specials"))%>#<%=objRS22.Fields("specials")%>"> $<%=trim(objRS22.Fields("price"))%> Free Shipping. (Set of 4)

<% strsql = "SELECT DISTINCT specials_items.part AS specials, specials_items.Type, specials_items.pic, specials_items.hits ,specials_items.Price FROM modelxref INNER JOIN parts with (nolock) ON modelxref.gmodel = parts.gmodel INNER JOIN specials_items (nolock) ON parts.partnumber = specials_items.part AND modelxref.Make = '"&request.querystring("Make")&"' order by hits desc" 'response.Write(strsql) set objRS22 = cnnFormToDB.Execute (strsql) count2=0 'if objRS22.eof then %>
<% if main3 = "products" then strsql2 = "SELECT Distinct Top 10 modelxref.make,description.description,parts.partnumber, description.part_type,description.hits,description.oem, description.product_code FROM modelxref, description, parts with (nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.make='" & request.querystring("Make") & "' and description.product_code <> '884-05' order by description.part_type,description.hits desc" else strsql2 = "SELECT Distinct Top 10 modelxref.make,description.description,parts.partnumber,description.part_type,description.hits,description.oem, description.product_code FROM modelxref, description, parts with (nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.make='" & request.querystring("Make") & "' and description.product_code = '"& cat &"' order by description.part_type,description.hits desc" end if 'response.Write(strsql2) set objRS223 = cnnFormToDB.Execute (strsql2) count=0 if not objRS223.eof then %> Continue your Search by selecting your vehicle model

Browse our Most Popular <% if main = "Shop" then %> <%=Main2%> for <%=request.querystring("Make")%> <% else %> <%=Main%> for <%=request.querystring("Make")%> <% end if else %>

Sorry we don't carry <%=Main%> for <%=request.querystring("Make")%> at this time.

"> Click here for a complete listing of our Products for <%=request.querystring("Make")%> <% end if do while not objRS223.eof 'response.write(trim(objRS223.Fields("description"))) count = count + 1 'price = objRS223.Fields("sugg_retail") description1 = objRS223.Fields("description") partnumber = trim(objRS223.Fields("partnumber")) oem = objRS223.Fields("oem") product_code = trim(objRS223.Fields("product_code")) 'oem = Replace(oem,","," ") 'oem = Replace(oem,"_"," ") If oem <> "" Then oem = replace(oem, ","," ") end if 'freight = objRS223.Fields("freight") %> <% end if objRS223.movenext loop 'end if %>

Part Number:
<%=partnumber%>
<% Set FileSystemObject = Server.CreateObject("Scripting.FileSystemObject") if FileSystemObject.FileExists("C:\Inetpub\wwwroot\wheelsandcaps\images\" + product_code + "\"+ partnumber +".jpg") Then %> <%=Main%> - <%=partnumber%> <%=year1%> <%=request.querystring(

<%=Main%> - <%=partnumber%> <%=year1%> <%=request.querystring(

<%=model%>">
<% Else %>

<% End If %> <% %> <% partnumber2 = (Replace(partnumber,"-","/")) strsql= "SELECT * FROM price with (nolock) WHERE keystone_part like '%"& partnumber2 &"%' " 'response.write(strsql) Set objRS33 = cnnFormToDB.Execute (strsql) do while not objRS33.eof if temp = objRS33.Fields("keystone_part") then else temp = objRS33.Fields("keystone_part") 'response.write(strsql) 'Set objRS23 = cnnFormToDB.Execute (strsql) %> <% end if objRS33.movenext loop objRS33.close %>

<%=trim(objRS33.Fields("finish"))%> $<%=trim(objRS33.Fields("sugg_retail"))%>	Buy Now
<%=description1%> <%=oem%>

<% if count > 4 then count=0 %>

" disabled="disabled" size=20>
Change	">Change

<% if request.querystring("Type") = "886" or main3="products" then %> <% count3=0 count2=0 count=0 a=0 strsql = "SELECT DISTINCT Top 10 specials_items.part AS specials, specials_items.Type, specials_items.pic, specials_items.Price , specials_items.hits FROM modelxref INNER JOIN parts with(nolock) ON modelxref.gmodel = parts.gmodel INNER JOIN specials_items with(nolock) ON parts.partnumber = specials_items.part AND modelxref.gmodel = '"&request.querystring("model")&"' order by specials_items.hits desc" 'response.Write(strsql) set objRS22 = cnnFormToDB.Execute (strsql) count2=0 Dim myarray2(500) do while not objRS22.eof myarray2(count2) = trim(objRS22.Fields("specials")) count2=count2 +1 i = count2 - 2 a=0 Do while i >= 0 if trim(objRS22.Fields("specials")) = myarray2(i) then a=1 'response.write(myarray2(i)) end if i=i-1 loop if a = 0 then if count3=0 then count3=1 %>

<% end if %> <% if count = 1 then count=-1 %> <% end if count = count + 1 %> <% end if objRS22.MoveNext Loop objRS22.close %>

Deals on Sets of 4
Package # <%=trim(objRS22.Fields("specials"))%> &part=<%=trim(objRS22.Fields("specials"))%>#<%=objRS22.Fields("specials")%>"> " width="50" height="50" alt=" Set of 4 - <%=trim(objRS22.Fields("specials"))%> <%=year1%> <%=request.querystring("Make")%> <%=model%>" border="0"> &part=<%=trim(objRS22.Fields("specials"))%>#<%=objRS22.Fields("specials")%>"> $<%=trim(objRS22.Fields("price"))%> Free Shipping. (Set of 4)

<% end if strsql = "SELECT DISTINCT specials_items.part AS specials, specials_items.Type, specials_items.pic, specials_items.hits ,specials_items.Price FROM modelxref INNER JOIN parts ON modelxref.gmodel = parts.gmodel INNER JOIN specials_items ON parts.partnumber = specials_items.part AND modelxref.Make = '"&request.querystring("Make")&"' AND modelxref.gmodel = '"&request.querystring("model")&"' order by hits desc" 'response.Write(strsql) set objRS22 = cnnFormToDB.Execute (strsql) count2=0 'if objRS22.eof then %> <% if main = "Shop" then strsql2 = "SELECT Distinct Top 10 modelxref.make,description.description,parts.partnumber,description.part_type,description.hits,description.oem, description.product_code FROM modelxref, description, parts with (nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & gmodel & "' and description.product_code <> '884-05' order by description.part_type,description.hits desc" else strsql2 = "SELECT Distinct Top 10 modelxref.make,description.description,parts.partnumber,description.part_type,description.hits,description.oem, description.product_code FROM modelxref, description, parts with (nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & gmodel & "' and description.product_code = '"&cat&"' order by description.part_type,description.hits desc" end if 'response.Write(strsql2) set objRS223 = cnnFormToDB.Execute (strsql2) count=0 if not objRS223.eof then %> Continue your Search by selecting your vehicle year

Browse our Most Popular <% if main = "Shop" then %> <%=Main2%> for <%=request.querystring("Make")%> <%=gmodel%> <% else %> <%=Main%> for <%=request.querystring("Make")%> <%=gmodel%> <% end if else %>

Sorry we don't carry <%=Main%> for <%=request.querystring("Make")%> <%=gmodel%> at this time.

&model=<%=gmodel%>"> Click here for a complete listing of our Products for <%=request.querystring("Make")%> <%=gmodel%> <% end if do while not objRS223.eof %> <% count = count + 1 description1 = trim(objRS223.Fields("description")) partnumber = trim(objRS223.Fields("partnumber")) oem = objRS223.Fields("oem") product_code = trim(objRS223.Fields("product_code")) 'oem = Replace(oem,","," ") 'oem = Replace(oem,"_"," ") If oem <> "" Then %> &WandCRETURN=&_YEAR=1996&_MAKE=BMW&_MODEL=3_SERIES> <% oem = replace(oem, ","," ") %> <% end if 'freight = objRS223.Fields("freight") %> <% end if objRS223.movenext loop 'end if %>

<%=model%>">
<% Else %>

<% End If %> <% %> <% partnumber2 = (Replace(partnumber,"-","/")) strsql= "SELECT * FROM price with (nolock) WHERE keystone_part like '%"& partnumber2 &"%' " Set objRS33 = cnnFormToDB.Execute (strsql) do while not objRS33.eof if temp = objRS33.Fields("keystone_part") then else temp = objRS33.Fields("keystone_part") %> <% end if objRS33.movenext loop objRS33.close %>

<%=trim(objRS33.Fields("finish"))%> $<%=trim(objRS33.Fields("sugg_retail"))%>	Buy Now
<%=description1%> <%=oem%>

<% if count > 4 then count=0 %>

<% end if '----------------------------------------------------------------- if request.querystring("Make") <> "" and request.querystring("Model") <> "" and request.querystring("year") <> ""then model=Request.Querystring("Model") if Request.Querystring("Model") = "TOWN_" then model = "TOWN_&_COUNTRY" end if maker = request.querystring("make") modeler = request.querystring("Model") maker = Replace(maker,"_"," ") modeler = Replace(modeler,"_"," ") %>

" disabled="disabled" size=20>		" disabled="disabled" size=5>
Change	">Change	&model=<%=Request.Querystring("model")%>">Change

Products For <%=Request.Querystring("year")%> <%=maker%> <%=modeler%>:
&model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">All Products- <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='886' order by description.part_type,description.hits desc " 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Alloy Wheels- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='885' order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Steel Wheels- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and (description.product_code='887' or description.product_code='888') order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Hubcaps- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='661' order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Replacement Lights- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='884-05' order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Floor Mats- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and (description.product_code='888-03' or description.product_code='887-01') order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Center Caps- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and (description.product_code='665' or description.product_code='665-01' or description.product_code='884-06') order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Mirros- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and (description.product_code='884-03' or description.product_code='884-04' or description.product_code='884-02' or description.product_code='884-06') order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Chrome Accessories-
<% end if %>

&make=<%=Request.Querystring("Make")%>&model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>" target="new">Email this Page to a Friend

<% if main = "shop" then main="Products" end if %>

<%=Main%> for <%=request.querystring("year")%> <%=Maker%> <%=Modeler%>

<% a = 0 if request.querystring("type") <> "" then strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' AND description.product_code='" & Request.Querystring("type") & "' order by description.part_type,description.hits desc" 'response.write(strSQL) if request.querystring("type") = "887" then strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' AND (description.product_code='" & Request.Querystring("type") & "' or description.product_code='888' ) order by description.part_type,description.hits desc" 'response.write(strSQL) end if if request.querystring("type") = "661" then strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' AND (description.product_code='" & Request.Querystring("type") & "' or description.product_code='661-01' ) order by description.part_type,description.hits desc" 'response.write(strSQL) end if if request.querystring("type") = "888-03" then strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' AND (description.product_code='" & Request.Querystring("type") & "' or description.product_code='887-01' ) order by description.part_type,description.hits desc" 'response.write(strSQL) end if if request.querystring("type") = "884-03" then strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' AND (description.product_code='" & Request.Querystring("type") & "' or description.product_code='884-04' or description.product_code='884-02' or description.product_code='884-06') order by description.part_type,description.hits desc" 'response.write(strSQL) end if if request.querystring("type") = "665" then strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' AND (description.product_code='" & Request.Querystring("type") & "' or description.product_code='665-01' or description.product_code='665' or description.product_code='884-06') order by description.part_type,description.hits desc" 'response.write(strSQL) end if else strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' order by description.part_type,description.hits desc" 'response.write(strSQL) end if count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if objRS.eof Then %>

<% if main = "shop" then main = "products" end if %> We don't carry <%=Main%> at this time for <%=year1%> <%=maker%> <%=modeler%>.

We do carry products in the following catagories for <%=year1%> <%=maker%> <%=modeler%>.

&model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">All Products- <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='886' order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Alloy Wheels- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='885' order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Steel Wheels- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='888' order by description.part_type,description.hits desc" count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Hubcaps
- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='661' order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Replacement Lights- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='884-05' order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Floor Mats- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and description.product_code='888-03' order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Center Caps- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and (description.product_code='665' or description.product_code='884-06') order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Mirros- <% end if %> <% strSQL = " SELECT modelxref.make,modelxref.rmodel,parts.year,description.description,parts.partnumber,description.part_type,description.oem, description.product_code FROM modelxref, description, parts with(nolock) WHERE description.partnumber=parts.partnumber AND parts.gmodel=modelxref.gmodel AND modelxref.gmodel='" & Model & "' AND parts.year='" & Request.Querystring("year") & "' and (description.product_code='884-03' or description.product_code='884-04' or description.product_code='884-02' or description.product_code='884-06') order by description.part_type,description.hits desc" 'response.write(strSQL) count = 0 year1 = request.querystring("Year") make = request.querystring("make") 'Response.Write strsql set objRS = cnnFormToDB.Execute (strSQL) if not objRS.eof Then %> &model=<%=Request.Querystring("model")%>&year=<%=Request.Querystring("year")%>">Chrome Accessories-
<% end if %>

<% else %> <% do while not objRS.eof if partnumber <> trim(objRS.Fields("partnumber")) then if product_code <> trim(objRS.Fields("product_code")) then part_type = trim(objRS.Fields("part_type")) %>

<%=part_type%>

<% count=0 end if count = count + 1 partnumber = trim(objRS.Fields("partnumber")) product_code = trim(objRS.Fields("product_code")) 'oem = Replace(oem,","," ") 'oem = Replace(oem,"_"," ") If oem <> "" Then oem2 = oem oem = replace(oem, ","," ") end if %>
Part Number: <%=partnumber%>
<% Set FileSystemObject = Server.CreateObject("Scripting.FileSystemObject") if FileSystemObject.FileExists("C:\Inetpub\wwwroot\wheelsandcaps\images\" + product_code + "\"+ partnumber +".jpg") Then %> <%=Main%> - <%=partnumber%> <%=year1%> <%=request.querystring(

<%=model%>">
<% Else %>

<% End If %> <% strsql="SELECT * FROM specials INNER JOIN specials_items with(nolock) ON specials.ID = specials_items.Type WHERE (specials_items.part LIKE '%" & partnumber &"%')" 'response.Write(strsql) Set objSpec = cnnFormToDB.Execute (strsql) if not objSpec.eof then p=objSpec.Fields("price") %> &special=<%=trim(objSpec.Fields("Special"))%>&part=<%=trim(objSpec.Fields("part"))%>#<%=objSpec.Fields("part")%>"> Set of 4 at $<%=p%>
(Free Shipping)
<% end if objSpec.close %> <% partnumber2 = (Replace(partnumber,"-","/")) strsql= "SELECT * FROM price with(nolock) WHERE keystone_part like '%"& partnumber2 &"%' " Set objRS33 = cnnFormToDB.Execute (strsql) do while not objRS33.eof if temp = objRS33.Fields("keystone_part") then else temp = objRS33.Fields("keystone_part") %> <% end if objRS33.movenext loop objRS33.close %>

<%=trim(objRS33.Fields("finish"))%>
$<%=trim(objRS33.Fields("sugg_retail"))%>

Buy Now

<% strsql= "SELECT description, oem FROM description77 WHERE partnumber like '%"& partnumber &"%' " Set objRS333 = cnnFormToDB.Execute (strsql) %> <%=trim(objRS333.Fields("description"))%>

<% num = len(trim(objRS333.Fields("oem"))) if num > 2 then oem2 = trim(Replace(trim(objRS333.Fields("oem")),"Replaces OEM#:","")) %> <%=trim(Replace(trim(objRS333.Fields("oem")),",","
"))%> <% end if %>

<% if count > 3 then count=0 %> <% end if end if objRS.MoveNext Loop %>

Floor Mats - $11.89 in 8 Colors

CCFMBK
&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Floor Mats - $11.89 in 8 Colors - CCFMBK

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>">

BLACK
$11.89

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Buy Now

CCFMBL
&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Floor Mats - $11.89 in 8 Colors - CCFMBL

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>">

BLUE
$11.89

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Buy Now

CCFMLC
&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Floor Mats - $11.89 in 8 Colors - CCFMLC

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>">

LIGHT CHARCOAL
$11.89

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Buy Now

CCFMDT
&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Floor Mats - $11.89 in 8 Colors - CCFMDT

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>">

DARK TAN
$11.89

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Buy Now

CCFMR
&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Floor Mats - $11.89 in 8 Colors - CCFMR

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>">

RED
$11.89

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Buy Now

CCFMDC
&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Floor Mats - $11.89 in 8 Colors - CCFMDC

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>">

DARK CHARCOAL
$11.89

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Buy Now

CCFMLT
&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Floor Mats - $11.89 in 8 Colors - CCFMLT

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>">

LIGHT TAN
$11.89

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Buy Now

CCFMT

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>">

TAN
$11.89

&_MAKE=<%=request.querystring("make")%>&_MODEL=<%=request.querystring("model")%>"> Buy Now

" disabled="disabled" size=20>		" disabled="disabled" size=5>
Change	">Change	&model=<%=Request.Querystring("model")%>">Change

<% end if end if %>

<%=Main%> for <%=request.querystring("year")%> <%=Maker%> <%=Modeler%>

<% if main = "shop" then main = "products" end if %> We don't carry <%=Main%> at this time for <%=year1%> <%=maker%> <%=modeler%>. We do carry products in the following catagories for <%=year1%> <%=maker%> <%=modeler%>.

<%=part_type%>

<% if main = "shop" then main = "products" end if %> We don't carry <%=Main%> at this time for <%=year1%> <%=maker%> <%=modeler%>.

We do carry products in the following catagories for <%=year1%> <%=maker%> <%=modeler%>.