<% set rs=server.CreateObject("adodb.recordset") rs.Open "select Display_prices,Discount_level,Discount,swf_width_m,nu2,Price_dno,endad,leash_date from config ",conn,1,3 Display_prices=rs("Display_prices") Discount_level=rs("Discount_level") Discount=rs("Discount") swf_width_m=rs("swf_width_m") nu2=rs("nu2") Price_dno=rs("Price_dno") endad=rs("endad") leash_date=rs("leash_date") rs.Close set rs=nothing if Display_prices="0" and price<>"0" then sp=""& eRead(eims,articleid,"price") &"元" else sp="時價" end if if Display_prices="0" and vipprice<>"0" then sp2=""& eRead(eims,articleid,"vipprice") &"元" else sp2="請來電洽詢" end if response.write "
產品編號︰"& eRead(eims,articleid,"product_id") &"
產品名稱："& eRead(eims,articleid,"title") &"
尺寸規格："& eRead(eims,articleid,"Spec") &"
" if Display_prices="0" and price<>"0" then response.write "訂價：" & sp & "" end if if Display_prices="0" and price="0" then response.write "特價中：" & sp2 & "" end if If vipprice<>"0" then response.write "特價：" & sp2 & "" end if %> <% If nu2="1" and sale=True then %>
積分兌換：<%=change%>分 <% end if %> <% if Price_dno ="1" then '啟動特價訂購 '日期大小判斷 dim dleash,dsale,dend,leash_date2,sale_end_date2,end_date2 dleash="&leash_date&" leash_date2=formatdatetime(dleash,1) dsale=rs("sale_end_date") sale_end_date2=formatdatetime(dsale,1) dend=rs("end_date") end_date2=formatdatetime(dend,1) '==特價==endad=1 優惠到期轉一般 'if endad=1 and sale=True and sale_end_date2 <> leash_date2 then If endad="1" and sale=True and "#"&sale_end_date&"#"<>"#"&leash_date&"#" then dy=sale_end_date s1=formatdatetime(dy,1) end if If endad="1" and sale=True and "#"&sale_end_date&"#"="#"&leash_date&"#" then s1="限時搶購，近期將回復為原價" end if %> <% If Discount="0" and Discount_level="0" and sale=True and endad=1 then %>
特價期限：
<%=s1%> <% end if end if %> <% if swf_width="0" and b="1" then %>
點擊次數：<% =eRead(eims,articleid,"Hits") %>次<% end if %>
更新時間：
<% =eRead(eims,articleid,"UpdateTime") %> <%If Ordering="1" then%>
','letter','scrollbars=yes,resizable=no')">"> <%end if%>
點擊數：，更新時間：