www.gusucode.com > 凡人网络购物系统 2008源码程序 > baojiap.asp
<!--#include file="conn.asp"--> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <style> <!-- td { font-size: 10pt; color: #000000 } --> </style> <table border=0 cellpadding=3 cellspacing=0 width="600"> <%Response.ContentType = "application/msword" response.AddHeader "content-disposition", "inline; filename=报价单.doc" set rss=server.createobject("adodb.recordset") if request("sort_id")<>"" then sortid=request("sort_id") If Not(isNumeric(sortid)) or sortid="" or sortid=0 Then response.write "<script language=javascript>alert('Url处理出错!');history.go(-1);</script>" response.End End If rss.open "select sort_id,sort_name from venshop_sort where sort_id="&sortid&"",conn,1,1 else rss.open "select sort_id,sort_name from venshop_sort order by sort_id desc",conn,1,1 end if do while not rss.eof sort_id=rss("sort_id") set rs=server.createobject("adodb.recordset") rs.open "select hw_id,hw_name,hw_price1,hw_price2 from venshop_hw where sort_id="&sort_id&" and hw_kucun>0 order by hw_id desc",conn,1,1%> <tr><td colspan="3" class="cartshow" height="26"><b><%=rss("sort_name")%>商品报价单</b></td></tr> <tr><td><b>商品</b></td><td><b>零售价</b></td><td><b>本站价</b></td></tr> <%i=1 do while not rs.eof i=-i%> <tr><td><%=rs("hw_name")%></td> <td><%=fuhao%><%=trim(rs("hw_price1"))%><%=danwei%></td> <td><%=fuhao%><%=trim(rs("hw_price2"))%><%=danwei%></td> </tr> <%rs.movenext loop rs.close set rs=nothing rss.movenext loop rss.close set rss=nothing%> <tr><td colspan="3" style="border-left-width: 1px; border-right-width: 1px; border-top: 1px solid #C0C0C0; border-bottom-width: 1px"> <p style="line-height: 150%; margin-top:5px; margin-bottom:5px"><b>联系方式:</b><br> 客服热线:<%=tel%> 传真:<%=fax%><br> 客服邮箱:<%=mail%> QQ:<%=oicq%> MSN:<%=msn%><br> 地址:<%=ymaddr%> 邮编:<%=code%></td></tr></table>