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%>&nbsp;&nbsp;传真：<%=fax%><br>
客服邮箱：<%=mail%>&nbsp;&nbsp;QQ：<%=oicq%>&nbsp;&nbsp;MSN：<%=msn%><br>
地址：<%=ymaddr%>&nbsp;&nbsp;邮编：<%=code%></td></tr></table>