"> .jpg" width="100" height="150" alt border="0"> |
<%if not rstInner.BOF then%>
"> See  Rave Reviews
<%End If
rstInner.Close
Spec=""
comma=""
if not isNullOrEmpty(rst("FirstSpecialPrice")) then
Spec= FormatCurrency(rst("FirstSpecialPrice")) &" "& rst("FirstSpecialPriceDescription")
comma=", "
end if
if not isNullOrEmpty(rst("SecondSpecialPrice")) then
Spec=Spec&comma& FormatCurrency(rst("SecondSpecialPrice")) & " "& rst("SecondSpecialPriceDescription")
comma=", "
end if
alerta="This product is sold in different packages.\n You can select the type of package you prefer when you fill out the order form."%>
<%if rst("PrintBookAvail") <> 0 then %>
add2Basket('<%=rst("BookID") %>');return false;">
<%end if%>
<% if rst("EbookAvail") <> 0 then %>
');return false;">
Add E-Book to cart
<%end if%>
|
<%=rst("Title") %> <%=rst("Author") %>
<%=replace(rst("Description"),vbNewLine," ") %>
<%if not Spec="" then
response.write "SPECIAL OFFER " & Spec & " "
end if
if not isNullOrEmpty(rst("DiscountedPrice")) then%>
<%=rst("DiscountDescription") %> <%=FormatCurrency(rst("DiscountedPrice")) %> <%
end if
response.write ""
Reg=""
comma=""
if not isNullOrEmpty(rst("FirstRegularPrice")) then
Reg=FormatCurrency(rst("FirstRegularPrice")) &" "& rst("FirstRegularPriceDescription")
comma=", "
end if
if not isNullOrEmpty(rst("SecondRegularPrice")) then
Reg=Reg &comma& FormatCurrency(rst("SecondRegularPrice")) &" "& rst("SecondRegularPriceDescription")
comma=", "
end if
if not Spec="" then response.write " Regularly "
response.write Reg & ""%>
MORE PRODUCTS |