<% ShoppSum = 0 mrec = 0 sqlcmd = "SELECT b.idProd,b.ProdImage,b.ProdName,b.ProdModel,a.Sell_Price,a.Shopp_Count FROM VShopp_OrderDetail a inner join VShopp_Product b on a.idProd = b.idProd WHERE idShopp = '"& request.cookies("mid_Shopp") &"' ORDER BY a.idProd " set rs = connB2B.execute(sqlcmd) do while not rs.eof mProdPrice = rs("Sell_Price") mrec = mrec + 1 ShoppSum = cdbl(ShoppSum) + (cdbl(mProdPrice)*cdbl(rs("Shopp_Count"))) rs.movenext loop %> <% if mrec > 0 then rs.movefirst end if %>
    <% do while not rs.eof %>
  1. "> ">

    "><% =rs("ProdName") %>

    qty:<% =rs("Shopp_Count") %> $<% =cdbl(mProdPrice)*cdbl(rs("Shopp_Count")) %>
  2. <% rs.movenext loop %>
購物金額 $<% =ShoppSum %>

會員專區-資料維護