| <% If Categ = "Carts" Then %>
<% Else %>
<% End If %> |
<%
strSQL = "SELECT * FROM " & Request.QueryString("InfoCateg") & " WHERE PartNumber = '" & Request.QueryString("Info") & "'"
Set CartsDB = CartsConn.Execute(strSQL)
CartsDB.MoveFirst
%>
<%
' If CounterVar Mod 3 = 1 AND title1 = title Then
' Response.Write ""
' End If
%>
"> |
<%=CartsDB("LongDescription1")%> |
<%=CartsDB("LongDescription2")%>
|
| <%=CartsDB("LongDescription3")%>
|
| |
|
| Our Price $<%=formatnumber(CartsDB("Price"),2)%> |
|
<%
if Request.QueryString("Info")="Chrome" AND 1=0 then
%>
Currently Out - Please Check Back Soon!
|
|
<%
else
%>
In Stock Now! Call To Order! Shipping and Handling charges apply to all orders. |
|
<%
end if
%>
|
|
|