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

📄 listcart.asp

📁 销售系统,包括配件录入,配件销售,配件修改,设置反点条件,VIP用户网上购买等
💻 ASP
字号:
<!--#include file="sub.asp" -->
<script language="javascript" src="check.js"></script>
<%
dim zID,zmz,zlx,zshj,zxshl,zzshl
zID=request.QueryString("zid")
if zID>"" then
zmz=request.QueryString("zpjname")
zlx=request.QueryString("zpjlx")
zshj=request.QueryString("zpjshj")
zxshl=request.QueryString("zpjxshl")
zzshl=request.QueryString("zpjshl")
'response.Write(zID&zmz&zlx&zshj&zxshl&zzshl)
AddItem zID,zmz,zlx,zshj,0,zzshl
end if
mudCart=Session("Cart")
IF isArray(mudCart) THEN
%>
<div align="center" id="cart">
<table width="100%"  border="1"  style="border-top:0px;">
   <tr>
    <td nowrap="nowrap"><DIV align=center>配件名字</DIV></td>
    <td nowrap="nowrap"><DIV align=center>配件类型</DIV></td>
    <td nowrap="nowrap"><DIV align=center>配件售价</DIV></td>
    <td nowrap="nowrap"><DIV align=center>配件数量</DIV></td>
	<td nowrap="nowrap"><DIV align=center>配件总价</DIV></td>
    <td nowrap="nowrap"><DIV align=center><a hre</DIV></td>
  </tr>
    <%
    FOR i = LBound(mudCart) TO UBound(mudCart)
    IF mudCart(i,0) <> "" THEN
	%>
    <tr>
    <td nowrap="nowrap">&nbsp;<%=mudCart(i,1)%>&nbsp;</td>
    <td nowrap="nowrap">&nbsp;<%=mudCart(i,2)%>&nbsp;</td>
	<td nowrap="nowrap"><%=mudCart(i,3)%>元</td>
    <td nowrap="nowrap"><select name="xshl<%=mudCart(i,0)%>" onChange="lmy_chage('listpj','changeid=<%=mudCart(i,0)%>',this)">
<% for ii=1 to mudCart(i,5)%>
		<option value="<%=ii%>"><%=ii%>个</option>
		<%next%>
            </select></td>
	<td nowrap="nowrap"><%=clng(mudCart(i,3))*clng(mudCart(i,4))%>元</td>
    <td nowrap="nowrap"><div align="center">
      <input name="按钮" type="button" onClick="lmy_jumpMenu('parent','del=<%=mudCart(i,0)%>')" value="删除">
    </div></td>
  </tr>
      <%
END IF
NEXT%>
  </table>
</div>
<script language="javascript">
<!--

  if (parent.textSheet.style.display==""){
   parent.carttable.width=document.body.scrollWidth;
   parent.carttable.height=document.body.scrollHeight;
   
   }
  //parent.document.all("textSheet").innerHTML=document.all("cart").innerHTML;
-->
</script>
<%end if%>

⌨️ 快捷键说明

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