产品展台 |
|
公司产品目录 |
<%
str=""
set rsProductCat=selectProductCat(str)
if not rsProductCat.eof and not rsProductCat.bof then
while not rsProductCat.eof
%> <%if rsProductcat("ProductCatname")<>"旧产品" then%> " class="unnamed1">
<%=rsProductCat("ProductCatName")%>
<%end if%>
<%
rsProductCat.MoveNext
wend
end if
rsProductCat.close
set rsProductCat=nothing
%>
|
<%
if session("uid")="" then
%>
|
|
<%
else
if session("status")<>"rewrite" then
response.write ""
response.write " 欢迎代理商"&session("customerName")&"登录 "
response.write " | "
response.write ""
response.write " "
response.write ""
response.write " "
response.write ""
response.write " "
%>
<%
pNull=""
set rsOrderProductBuy=selectOrderProductBuy(pNull,session("customerName"))
if not rsOrderProductBuy.eof and not rsOrderProductBuy.bof then
productsID=rsOrderProductBuy("ProductID")
end if
%>
我的购物车
<%
rsOrderProductBuy.close
set rsOrderProductBuy=nothing
response.write " "
response.write ""
response.write " "
response.write ""
response.write " "
response.write ""
response.write " "
response.write ""
response.write " "
response.write ""
response.write " "
response.write " | "
end if
%>
|
代理商购买帮助 |
<%
end if
%>
|
|
|
|
<%
str=""
set rsProductCat=selectProductCat(str)
do while not rsProductCat.eof
if rsProductcat("ProductCatname")<>"旧产品" then
%>
<%=rsProductCat("ProductCatName")%>">
|
<%=rsProductCat("ProductCatMemo")%> |
品名 |
产品规格 |
单位 |
代理价 |
批发价 |
零售价 |
包装规格 |
购买 |
<%
set rs=selectProduct(rsproductcat("productCatname"))
do while not rs.eof
%>
" target="_blank" class=unnamed4><%=rs("productname")%> <%if trim(rs("isOOS"))=1 then%>(缺货)<%end if%> |
<%=rs("ProductSPEC")%> |
<%=rs("productUnit")%> |
<%
ProductRetailPrice=FormatNumber(Rs("ProductRetailPrice"),2)
ProductTradePrice=FormatNumber(Rs("ProductTradePrice"),2)
ProductMemberPrice=FormatNumber(Rs("ProductMemberPrice"),2)
If Left(ProductRetailPrice,1)="." Then
ProductRetailPrice="0"&ProductRetailPrice
End If
If Left(ProductTradePrice,1)="." Then
ProductTradePrice="0"&ProductTradePrice
End If
If Left(ProductMemberPrice,1)="." Then
ProductMemberPrice="0"&ProductMemberPrice
End If
%>
<%if session("cusCat")<>"" then%>
<%=ProductMemberPrice%>元
<%end if%>
|
<%=ProductTradePrice%>元 |
<%=ProductRetailPrice%>元 |
<%=rs("ProductWrapping")%><%=rs("productUnit")%>/件 |
"> |
<%
rs.movenext
loop
rs.close
set rs=nothing
end if
rsProductCat.MoveNext
loop
rsProductCat.close
set rsProductCat=nothing
%>
|
|