?? shopping.asp
字號(hào):
rs2.movenext
loop
rs2.close
set rs2=nothing
session("xiadan")=minute(now)
else
response.Write "<center>您不能重復(fù)提交！</center>"
response.End
end if
'/////////////HTML
set rs=server.CreateObject("adodb.recordset")
rs.open "select shop_books.bookid,shop_books.bookname,shop_books.shichangjia,shop_books.huiyuanjia,shop_action.shousex,shop_action.userzhenshiname,shop_action.shouhuoname,shop_action.dingdan,shop_action.youbian,shop_action.liuyan,shop_action.zhifufangshi,shop_action.songhuofangshi,shop_action.zonger,shop_action.bookcount from shop_books inner join shop_action on shop_books.bookid=shop_action.bookid where shop_action.username='"&request.Cookies("bookshop")("username")&"' and zhuangtai=1 and dingdan='"&dingdan&"' ",conn,1,1
%>
<table width="98%" border="0" cellspacing="0" cellpadding="1" align="center">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td rowspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="12v">
<tr>
<td class="12v" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="0" width="100%">
<tr>
<td>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#000000">
<tr>
<td height="23" bgcolor="#EFefef">
<div align="center"><font color="#FF6600">恭喜，您已成功的提交了此訂單！詳細(xì)信息如下：</font></div>
</td>
</tr>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>訂單號(hào)：<font color=#FF6600><%=rs("dingdan")%></font></td>
</tr>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>商品列表：</td>
</tr>
<tr>
<td height="91" bgcolor="#EFefef" >
<table width="90%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td bgcolor="#EFefef" height="22">
<div align="center">商品名稱</div>
</td>
<td bgcolor="#EFefef" height="22">
<div align="center">市場(chǎng)價(jià)</div>
</td>
<td bgcolor="#EFefef" height="22">
<div align="center">會(huì)員價(jià)</div>
</td>
<td bgcolor="#EFefef" height="22">
<div align="center">數(shù)量</div>
</td>
<td bgcolor="#EFefef" height="22">
<div align="center">小計(jì)</div>
</td>
</tr>
<%dim iiii '計(jì)算總額
do while not rs.eof
iiii=rs("huiyuanjia")*rs("bookcount")+iiii%>
<tr>
<td bgcolor="#EFefef" height="22">
<%response.Write "<a href=book.asp?id="&rs("bookid")&" target=_blank>"&rs("bookname")&"</a>"%>
</td>
<td bgcolor="#EFefef" height="22">
<div align="center"><%=formatnumber(rs("shichangjia"),2)&"元"%></div>
</td>
<td bgcolor="#EFefef" height="22">
<div align="center"><%=formatnumber(rs("huiyuanjia"),2)&"元"%></div>
</td>
<td bgcolor="#EFefef" height="22">
<div align="center"><%=rs("bookcount")%></div>
</td>
<td bgcolor="#EFefef" height="22">
<div align="center"><%=formatnumber(rs("huiyuanjia")*rs("bookcount"),2)&"元"%> </div>
</td>
</tr>
<%rs.movenext
loop
rs.movefirst
%>
<tr>
<td colspan="5" bgcolor="#EFefef" height="22">
<div align="right">
<%response.write "<font color=#FF6600>您選擇的送貨方式是："
'///判斷送貨方式讀取加收金額
set rs3=server.CreateObject("adodb.recordset")
rs3.open "select * from shop_songhuo where songid="&int(rs("songhuofangshi")),conn,1,1
if rs3.eof and rs3.bof then
response.write "方式已經(jīng)被刪除"
response.write " +"&formatnumber(0,2)&"元 共計(jì)："
response.write formatnumber(iiii,2)&"元"
else
response.Write trim(rs3("subject"))
response.write " +"&formatnumber(rs3("jsmoney"),2)&"元 共計(jì)："
response.write formatnumber(iiii+rs3("jsmoney"),2)&"元"
end if
rs3.close
set rs3=nothing%>
</div>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>訂貨人姓名：<font color=#FF6600><%=trim(rs("userzhenshiname"))%></font></td>
</tr>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>收貨人姓名：<font color=#FF6600>
<%response.Write trim(request("shouhuoname"))
if request("shousex")=0 then
response.Write " (先生)"
else
response.Write " (女士)"
end if%>
</font></td>
</tr>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>收貨詳細(xì)地址：<font color=#FF6600><%=trim(request("shouhuodizhi"))%></font></td>
</tr>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>郵編：<font color=#FF6600><%=trim(request("youbian"))%></font> 電話：<font color=#FF6600><%=trim(request("usertel"))%></font> 電子郵件：<font color=#FF6600><%=trim(request("useremail"))%></font></td>
</tr>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>送貨方式：<font color=#FF6600>
<%'///送貨方式
set rs3=server.CreateObject("adodb.recordset")
rs3.open "select * from shop_songhuo where songid="&request("songhuofangshi"),conn,1,1
if rs3.eof and rs3.bof then
response.write "方式已經(jīng)被刪除"
else
response.Write trim(rs3("subject"))
end if
rs3.close
set rs3=nothing
%>
</font> 支付方式：<font color=#FF6600>
<%'///支付方式
set rs3=server.CreateObject("adodb.recordset")
rs3.open "select * from shop_songhuo where songid="&request("zhifufangshi"),conn,1,1
if rs3.eof and rs3.bof then
response.write "方式已經(jīng)被刪除"
else
response.Write trim(rs3("subject"))
end if
rs3.close
set rs=nothing%>
</font></td>
</tr>
<%if trim(request("liuyan"))<>"" then%>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>您的留言：<%=trim(request("liuyan"))%></td>
</tr>
<%end if%>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>請(qǐng)您在一周內(nèi)依照您選擇的支付方式進(jìn)行匯款，匯款時(shí)請(qǐng)注明您的<font color="#FF0000">訂單號(hào)</font>！</td>
</tr>
<tr>
<td height="22" bgcolor="#EFefef" style='PADDING-LEFT: 100px'>
<p><font color=#666666>
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select huikuanfangshi from shop_config",conn,1,1
response.Write trim(rs("huikuanfangshi"))
rs.close
set rs=nothing%>
</font></p>
</td>
</tr>
<tr>
<td height="22" bgcolor="#efefef" style='PADDING-LEFT: 100px'>
<div align="right"><a href="#" onClick=javascript:window.close()>
關(guān)閉窗口</a><font color="#999999"> 訂單完成
創(chuàng)建時(shí)間：<%=shijian%> </font></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select chengjiaocount from shop_books where bookid in ("&bookid&")" ,conn,1,3
do while not rs.eof
rs("chengjiaocount")=rs("chengjiaocount")+1
rs.update
rs.movenext
loop
rs.close
set rs=nothing
end select%>
</body>
</html>
<script language=javascript>
<!--
function regInput(obj, reg, inputStr)
{
var docSel = document.selection.createRange()
if (docSel.parentElement().tagName != "INPUT") return false
oSel = docSel.duplicate()
oSel.text = ""
var srcRange = obj.createTextRange()
oSel.setEndPoint("StartToStart", srcRange)
var str = oSel.text + inputStr + srcRange.text.substr(oSel.text.length)
return reg.test(str)
}
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
//-->
</script>?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -