⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 spc_detail.asp

📁 oracle9i程序事例集
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" %>
<%
  dim conn
  dim connstr
  Set conn=Server.CreateObject("ADODB.Recordset")
  connstr="Driver={Microsoft ODBC for Oracle};server=mylink;uid=system;pwd=system;"
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>最新上架商品信息</title>
<style type="text/css">
<!--
.style2 {font-size: x-small}
-->
</style>
<style>
td {
	font-size: 13px;
}
</style>
</head>
  <%if session("user_name")<>"" then
    uname=session("user_name")
    set rs=server.CreateObject("adodb.recordset")
    sql="select uof_paymethod,uof_sentmethod,uof_remark from GSCOTT.user_orderform_table where uof_userid='"&uname&"'"
    rs.open sql,connstr,1,1
	songhuo=rs("uof_sentmethod")
	remark=rs("uof_remark")
	fukuan=rs("uof_paymethod")
	rs.close
	set rs=nothing
  else
    uname=session("company_name")
    set rs=server.CreateObject("adodb.recordset")
    sql="select cof_paymethod,cof_sentmethod,cof_remark from GSCOTT.company_orderform_table where cof_companyname='"&uname&"'"
    rs.open sql,connstr,1,1
	remark=rs("cof_remark")
	songhuo=rs("cof_sentmethod")
	fukuan=rs("cof_paymethod")
	rs.close
	set rs=nothing
  end if
  end if
  %>
<body>
<div align="left"><!-- #include file="pagetop.asp" --></div>
<div align="center"><center>
<table width="95%"  border="0" cellspacing="0" cellpadding="0">
  <tr height="20">
    <td colspan="2"></td>
  </tr>
  <tr>
    <td width="180px" valign="top">
	  <table width="180" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><!-- #include file="userinfo.asp" --></td>
        </tr>
        <tr>
          <td><!-- #include file="companyinfo.asp" --></td>
        </tr>
        <tr>
          <td><!-- #include file="search_easy.asp" --></td>
        </tr>
      </table>
	</td>
    <td valign="top"> 
	  <table width="95%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td>
	        <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FFCC00">
                          <tr bgcolor="#FFF9E6"> 
                            <td align="center" valign="top" height=50 colspan=2> 
                                     <%
                                       set rs=server.CreateObject("adodb.recordset")
                                       sql="select * from GSCOTT.shopping_bag_table where sb_consumername='"&uname&"'"
                                       rs.open sql,connstr,1,1 
                                       %>
                              <table width=98% border=0 align=center cellpadding=1 cellspacing=1 bgcolor=#FFCC00>
                                <tr bgcolor="#FFE493">
								  <td width=20%> 
                                    <div align=center><font color="#666666">商品型号</font></div>
                                  </td>
                                  <td width=20%> 
                                    <div align=center><font color="#666666">单价</font></div>
                                  </td>
                                  <td width=20%> 
                                    <div align=center><font color="#666666">数量</font></div>
                                  </td>
                                  <td width=20%><div align=center><font color="#666666">商品总价</font></div></td>
                                </tr>
<%
    shuliang=rs.recordcount
    jianshu=0
    zongji=0
    do while not rs.eof
    sql="select product_id from GSCOTT.product_info_table where product_kindnum='"&rs("sb_proname")&"'"
    set rs_s=server.CreateObject("adodb.recordset")
    rs_s.open sql,connstr,1,1
 %>
      <tr>
		<td height="22" bgcolor=#FFF9E6 style='PADDING-LEFT: 5px'> 
		<div align="center">
		<a href=shp_detail.asp?id=<%=rs_s("product_id")%> target=_blank><%=rs("sb_proname")%></a> 
        </div>
		</td>
        <td bgcolor=#FFF9E6> 
        <div align=center><%=rs("sb_price")%>元</div>
         </td>
                                  <td bgcolor=#FFF9E6> 
                                    <div align=center><font color=#dd6600> <%=rs("sb_amount")%> 
                                      </font></div>
                                  </td>
                                  <td bgcolor=#FFF9E6><div align=center><font color=#dd6600><%=rs("sb_total")%>元</font></div></td>
                                </tr>
                                <%
jianshu=jianshu+cint(rs("sb_amount"))
zongji=zongji+clng(rs("sb_total"))
rs_s.close
set rs_s=nothing
rs.movenext
loop
rs.close
set rs=nothing%>
                                <tr> 
                                  <td height=36 colspan=4 bgcolor=#FFF9E6> 
        <div align=center> 购物车里有商品:<%=shuliang%>件 总数:<%=jianshu%>件 共计:<font color=#FF3300><%=zongji%></font>元</div>
                                  </td>
                                </tr>
                              </table>
                            </td>
					      </tr>
                          <tr bgcolor="#FFF9E6"> 
                            <td width="594"  align="center" valign="top"> 
                              <table width="96%" border="0" cellspacing="0" cellpadding="2">
                                <tr> 
                                  <td colspan="2" height=8></td>
                                </tr>
<%
set rs=server.CreateObject("adodb.recordset")
if session("user_name")<>"" then
sql="select * from GSCOTT.user_info_table where user_id='"&uname&"'"
rs.open sql,connstr,1,1
%>                                
								<tr align="center" bgcolor="FFE493"> 
                                  <td colspan="2" height="22"><b>您的订单信息</b></td>
                                </tr>
                                <tr> 
                                  <td width="23%">姓名<br>
                                  </td>
                                  <td width="77%"><%=rs("user_name")%></td>
                                </tr>
                                <tr> 
                                  <td width="23%">邮编<br>
                                  </td>
                                  <td width="77%"><%=rs("user_zipcode")%></td>
                                </tr>
                                <tr> 
                                  <td width="23%">地址<br>
                                  </td>
                                  <td width="77%"><%=rs("user_address")%></td>
                                </tr>
                                <tr> 
                                  <td width="23%">电话<br>
                                  </td>
                                  <td width="77%"><%=rs("user_telphone")%></td>
                                </tr>
                                <tr> 
                                  <td colspan="2" height=8></td>
                                </tr>
                                <tr> 
                                  <td width="23%">邮箱<br>
                                  </td>
                                  <td width="77%"><%=rs("user_email")%></td>
                                </tr>
<%
else
sql="select * from GSCOTT.company_info_table where company_name='"&uname&"'"
rs.open sql,connstr,1,1
%>
                                <tr align="center" bgcolor="FFE493"> 
                                  <td colspan="2" height="22"><b>您的订单信息</b></td>
                                </tr>
                                <tr> 
                                  <td width="23%">公司名称<br>
                                  </td>
                                  <td width="77%"><%=rs("company_name")%></td>
                                </tr>
                                <tr> 
                                  <td width="23%">邮编<br>
                                  </td>
                                  <td width="77%"><%=rs("company_zipcode")%></td>
                                </tr>
                                <tr> 
                                  <td width="23%">地址<br>
                                  </td>
                                  <td width="77%"><%=rs("company_address")%></td>
                                </tr>
                                <tr> 
                                  <td width="23%">电话<br>
                                  </td>
                                  <td width="77%"><%=rs("company_telphone")%></td>
                                </tr>
                                <tr> 
                                  <td colspan="2" height=8></td>
                                </tr>
                                <tr> 
                                  <td width="23%">联系人<br>
                                  </td>
                                  <td width="77%"><%=rs("company_linkman")%></td>
                                </tr>
								<% end if %>
								<tr> 
                                  <td colspan="2" height=8></td>
                                </tr>
                                <tr> 
                                  <td width="23%">送货方式<br>
                                  </td>
                                  <td width="77%"><%=songhuo%>
		                          </td>
                                </tr>
                                <tr> 
                                  <td width="23%">付款方式</td>
                                  <td width="77%"> 
                                    <%=fukuan%> </td>
                                </tr>
                                <tr> 
                                  <td width="23%"><br>
                                  </td>
                                  <td width="77%">&nbsp; </td>
                                </tr>
                              </table>
                            </td>
                            <td width="356"  align="center" valign="top"> 
                              <table width="96%" border="0" cellspacing="0" cellpadding="2">
                                <tr> 
                                  <td colspan="2" height=8></td>
                                </tr>
                                <tr align="center" bgcolor="#00CCFF"> 
                                  <td colspan="2" height="22" bgcolor="#FFE493"><b>送货费计算</b></td>
                                </tr>
                                <tr> 
                                  <td>&nbsp;</td>
                                </tr>
                                <tr>
								    <%   
                                     select case songhuo
                                     case "送货上门"
                                             money=5
                                     case "普通邮寄"
                                        money=5
                                     case "EMS特快专递"
                                        money=10
                                         end select
								     %> 
                                  <td style='PADDING-right: 20px' align=right>您的送货费用计: <%=money%> 元<br>
                                </tr>
                                <tr> 
                                  <td>&nbsp;</td>
                                </tr>
                                <tr> 
								  <td style='PADDING-right: 20px' align=right><b><font color=red>您的订单总金额: <%=money+zongji%> 元</font></b></td>
                                </tr>
                                <tr> 
                                  <td height=20></td>
                                </tr>
                                <tr> 
                                  <td align=right><a href="faq.asp#sh" target=_blank>查看送货费用说明</a></td>
                                </tr>
                              </table>
                            </td>
                          </tr>
                             <tr bgcolor="#FFF9E6" align="center"> 
                              <td colspan="2"> 
                                <table width="98%" border="0" cellspacing="0" cellpadding="2">
                                  <tr>
                                    <td width="27%">
                              <% if session("user_name")="" then 
							     set rs_c=server.CreateObject("adodb.recordset")
							     sql="select cof_conversation from company_orderform_table where cof_companyname='"&session("company_name")&"'"
								 rs_c.open sql,connstr,1,1
								 if rs_c("cof_conversation")="是" then
								 %>同意会谈
								 <%else%>拒绝会谈<%end if
								 rs_c.close
								 set rs_c=nothing
          	     		       %>
						            </td>
                                    <td width="42%">您对此订单的特殊说明:<%=remark%>
                                    </td>
                                    <td width="31%" align="center" height="60">&nbsp;                                      </td>
                                  </tr>
                                </table>
                              </td>
                            </tr>
                </table>
          </td>
        </tr>
        <tr>
          <td></td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<!-- #include file="pagefooter.html" -->
</center>
</div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -