📄 checkdan.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>checkdan.asp</title>
<style type="text/css">
<!--
.style1 {color: #0066FF}
.style3 {color: #FF0000}
.style4 {
font-size: larger;
font-weight: bold;
}
.style5 {
color: #FF0000;
font-weight: bold;
}
.style6 {
color: #0033FF;
font-weight: bold;
}
-->
</style>
</head>
<body>
<center class="style1">
<span class="style1">欢迎你</span>:<%=request.cookies("xingxing")("username")%> 你的定单成功写入数据库</center>
<form action="" method="post" name="form">
<%
Dim db
Set db=Server.CreateObject("ADODB.Connection")
db.Open "Dbq="&Server.Mappath("database/xingxing.mdb")&";Driver={Microsoft Access Driver (*.mdb)};"
strSql="Select user_id From user where username='" & request.cookies("xingxing")("username") &"'"
set rs=db.execute(strSql)
user_id=rs(0)
userid=cstr(user_id)
'response.Write userid
rs.close
set rs=nothing
set rs1 = Server.CreateObject("ADODB.RecordSet")
sql1="select * from user_order where user_id='" & userid &"'"
rs1.open sql1,db,1,3
do while not rs1.eof
if rs1("isdiposal")=true then
response.Write "货物编号："& rs1("store_id") &" "
response.Write "货物数量："& rs1("amount")&" "
set rs2 = Server.CreateObject("ADODB.RecordSet")
sql2="select price from goods where goods_id="& rs1("store_id")
rs2.open sql2,db,1,3
response.Write " 货物价格："& rs2("price") & " "
response.Write " 货物总价："& rs2("price")*rs1("amount") & "<br>" & "<br>"
rs2.close
set rs2=nothing
end if
rs1.movenext
loop
rs1.close
set rs1=nothing
response.cookies("username")=""
%>
<table width="600" border="1" align="center">
<tr>
<td colspan="2" class="style3"><div align="center" class="style4">汇款的有关事项</div></td>
</tr>
<tr>
<td width="300" height="350"><div align="left">如果你选择的是<span class="style3"><strong>银行转帐</strong></span>，为了你我的利益，请按如下步骤给我站<span class="style5">汇款</span>：<br>
1.请将金额汇入以下<br><br>
帐号：<br>中国建设银行<br><br>卡号：<br>
<span class="style3"><strong>4367 4229 2110 0291 679 </strong></span> <br>
<br>收款人：<span class="style3"><strong>张永强</strong></span><br>
<br>
2.把你所定货物的<span class="style3"><strong>编号</strong></span>，<span class="style5">数量</span>，<span class="style3"><strong>送货方式</strong></span>发到我网站的油箱，<span class="style3"><strong>最重要的是</strong></span>：<br>
请你把你的<span class="style3"><strong>真实姓名</strong></span>，<span class="style3"><strong>地址</strong></span>，<span class="style3"><strong>邮编</strong></span>也一同发到我站的邮箱<br><br>
邮箱的地址：<br>
<span class="style6">www.wangrexin@163.com</span><br></div></td>
<td width="300" height="350">如果你选择的是<span class="style3"><strong>邮政汇款</strong></span>，为了你我的利益，请按如下步骤给我站<span class="style3"><strong>汇款</strong></span>：<br>
1.请将金额入以下的地址： <br>邮编：<span class="style3"><strong>410004</strong></span><br>
<br>地址：<br>
<span class="style3"><strong>湖南长沙中南林学院电子与信息工程学院计算机２班</strong></span> <br>
<br>
收款人：<span class="style5">陈尧舜</span><br>
<br>2.把你所定货物的<span class="style3"><strong>编号</strong></span>，<span class="style5">数量</span>，<span class="style3"><strong>送货方式</strong></span>发到我网站的油箱，<span class="style3"><strong>最重要的是</strong></span>：<br>
请你把你的<span class="style3"><strong>真实姓名</strong></span>，<span class="style3"><strong>地址</strong></span>，<span class="style3"><strong>邮编</strong></span>也一同发到我站的邮箱<br><br>
邮箱的地址：<br>
<span class="style6">www.wangrexin@163.com</span><br><div align="left"></div></td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -