📄 shopping.asp
字号:
{
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);
}
function ssxx()
{
if(checkspace(document.shouhuoxx.shouhuoname.value)) {
document.shouhuoxx.shouhuoname.focus();
alert("对不起，请填写收货人姓名！");
return false;
}
if(checkspace(document.shouhuoxx.shengshi.value)) {
document.shouhuoxx.shengshi.focus();
alert("对不起，请填写收货人所在省市！");
return false;
}
if(checkspace(document.shouhuoxx.shouhuodizhi.value)) {
document.shouhuoxx.shouhuodizhi.focus();
alert("对不起，请填写收货人详细收货地址！");
return false;
}
if(checkspace(document.shouhuoxx.youbian.value) || document.shouhuoxx.youbian.value.length < 6) {
document.shouhuoxx.youbian.focus();
alert("您的邮编不正确！");
return false;
}
if(checkspace(document.shouhuoxx.youbian.value) || document.shouhuoxx.youbian.value.length > 6) {
document.shouhuoxx.youbian.focus();
alert("您的邮编不正确！");
return false;
}
if(checkspace(document.shouhuoxx.youbian.value)) {
document.shouhuoxx.youbian.focus();
alert("对不起，请填写邮编！");
return false;
}
if(checkspace(document.shouhuoxx.usertel.value)) {
document.shouhuoxx.usertel.focus();
alert("对不起，请留下您的电话！");
return false;
}
if(checkspace(document.shouhuoxx.songhuofangshi.value)) {
document.shouhuoxx.songhuofangshi.focus();
alert("对不起，您还没有选择送货方式！");
return false;
}
if(checkspace(document.shouhuoxx.zhifufangshi.value)) {
document.shouhuoxx.zhifufangshi.focus();
alert("对不起，您还没有选择支付方式！");
return false;
}
if(document.shouhuoxx.useremail.value.length!=0)
{
if (document.shouhuoxx.useremail.value.charAt(0)=="." ||
document.shouhuoxx.useremail.value.charAt(0)=="@"||
document.shouhuoxx.useremail.value.indexOf('@', 0) == -1 ||
document.shouhuoxx.useremail.value.indexOf('.', 0) == -1 ||
document.shouhuoxx.useremail.value.lastIndexOf("@")==document.shouhuoxx.useremail.value.length-1 ||
document.shouhuoxx.useremail.value.lastIndexOf(".")==document.shouhuoxx.useremail.value.length-1)
{
alert("Email地址格式不正确！");
document.shouhuoxx.useremail.focus();
return false;
}
}
else
{
alert("Email不能为空！");
document.shouhuoxx.useremail.focus();
return false;
}
{
document.all.item("ddd").disabled=true;
shouhuoxx.submit();
}
}
function companyssxx()
{
if(checkspace(document.shouhuoxx.shouhuoname.value)) {
document.shouhuoxx.shouhuoname.focus();
alert("对不起，请填写收货人姓名！");
return false;
}
if(checkspace(document.shouhuoxx.shengshi.value)) {
document.shouhuoxx.shengshi.focus();
alert("对不起，请填写公司所在省市！");
return false;
}
if(checkspace(document.shouhuoxx.shouhuodizhi.value)) {
document.shouhuoxx.shouhuodizhi.focus();
alert("对不起，请填写公司详细地址！");
return false;
}
if(checkspace(document.shouhuoxx.youbian.value) || document.shouhuoxx.youbian.value.length < 6) {
document.shouhuoxx.youbian.focus();
alert("公司邮编不正确！");
return false;
}
if(checkspace(document.shouhuoxx.youbian.value) || document.shouhuoxx.youbian.value.length > 6) {
document.shouhuoxx.youbian.focus();
alert("公司邮编不正确！");
return false;
}
if(checkspace(document.shouhuoxx.youbian.value)) {
document.shouhuoxx.youbian.focus();
alert("对不起，请填写邮编！");
return false;
}
if(checkspace(document.shouhuoxx.usertel.value)) {
document.shouhuoxx.usertel.focus();
alert("对不起，请留下公司电话！");
return false;
}
if(checkspace(document.shouhuoxx.songhuofangshi.value)) {
document.shouhuoxx.songhuofangshi.focus();
alert("对不起，您还没有选择送货方式！");
return false;
}
if(checkspace(document.shouhuoxx.zhifufangshi.value)) {
document.shouhuoxx.zhifufangshi.focus();
alert("对不起，您还没有选择支付方式！");
return false;
}
if(document.shouhuoxx.useremail.value.length!=0)
{
if (document.shouhuoxx.useremail.value.charAt(0)=="." ||
document.shouhuoxx.useremail.value.charAt(0)=="@"||
document.shouhuoxx.useremail.value.indexOf('@', 0) == -1 ||
document.shouhuoxx.useremail.value.indexOf('.', 0) == -1 ||
document.shouhuoxx.useremail.value.lastIndexOf("@")==document.shouhuoxx.useremail.value.length-1 ||
document.shouhuoxx.useremail.value.lastIndexOf(".")==document.shouhuoxx.useremail.value.length-1)
{
alert("公司邮箱格式不正确！");
document.shouhuoxx.useremail.focus();
return false;
}
}
else
{
alert("公司邮箱不能为空！");
document.shouhuoxx.useremail.focus();
return false;
}
{
document.all.item("dddd").disabled=true;
shouhuoxx.submit();
}
}
//-->
</script>
<%
case "ok"
'/////////////////////////////////////////////////
function HTMLEncode2(fString)
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
fString = Replace(fString, CHR(10), "<BR>")
HTMLEncode2 = fString
end function
if session("xiadan")<>minute(now) then
dim dingdan,rdd
set rdd=server.CreateObject("adodb.recordset")
rdd.Open "select top 1 actionid from shop_action order by actionid desc",conn,1,1
if rdd.eof and rdd.bof then '判断前笔数据，避免错误，
dingdan=1
else
dingdan=int(rdd("actionid"))+1
end if
dingdan=string(6-len(dingdan),"0") & dingdan
rdd.Close
set rdd=nothing
'response.Write "<font color=red>"&dingdan&"</font>"
'response.write bookid
set rs2=conn.execute("select bookid,bookname,shichangjia,huiyuanjia,tuantijia,tuantidazhe,dazhe from shop_books where bookid in ("&bookid&") order by bookid ")
do while not rs2.eof
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from shop_action",conn,1,3
rs.addnew
rs("username")=trim(request.cookies("bookshop")("username"))
rs("bookid")=rs2("bookid")
rs("actiondate")=now
rs("bookcount")=CInt(Request("ckxp"&rs2("bookid")))
rs("zhuangtai")=1
rs("dingdan")=dingdan
rs("youbian")=int(request("youbian"))
rs("shouhuoname")=replace(trim(request("shouhuoname")),"'","")
rs("shouhuodizhi")=replace(trim(request("shouhuodizhi")),"'","")
rs("zhifufangshi")=int(request("zhifufangshi"))
rs("songhuofangshi")=int(request("songhuofangshi"))
rs("shengshi")=trim(request("shengshi"))
rs("shousex")=int(request("shousex"))
rs("liuyan")=HTMLEncode2(trim(request("liuyan")))
if request.cookies("bookshop")("grtt")=1 then
rs("zonger")=rs2("tuantijia")*CInt(Request("ckxp"&rs2("bookid")))
else
rs("zonger")=rs2("huiyuanjia")*CInt(Request("ckxp"&rs2("bookid")))
end if
rs("userzhenshiname")=trim(request("userzhenshiname"))
rs("useremail")=trim(request("useremail"))
rs("usertel")=replace(trim(request("usertel")),"'","")
rs("userid")=request.QueryString("userid")
if int(request("fangshi"))=0 then
rs("querenfangshi")="需电话确认，配送时间："&trim(request("time1"))
else
rs("querenfangshi")="无需电话确认,直接配送,配送日期范围："&trim(request("date2"))&"<br>配送时间："&trim(request("time2"))
end if
rs("dizhileixing")=request("dizhileixing")
rs.update
rs.close
set rs=nothing
conn.execute "delete from shop_action where username='"&request.cookies("bookshop")("username")&"' and bookid in ("&bookid&") and zhuangtai=6"
rs2.movenext
loop
rs2.close
set rs2=nothing
session("xiadan")=minute(now)
else
response.Write "<center>您不可以重复提交，请稍后再试！</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_books.tuantijia,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
dim dingdanhao '订单号
dingdanhao=rs("dingdan")
%>
<table width="96%" border="0" align="center" cellpadding="2" cellspacing="1">
<tr>
<td height="18" bgcolor="#FDE6A4"><div align="center"><font color="#FF6600">恭喜，您已成功的提交了此订单！详细信息如下：</font></div></td>
</tr>
<tr>
<td height="18" bgcolor="#FDE6A4" STYLE='PADDING-LEFT: 20px'>订单号：<font color=#FF6600><%=rs("dingdan")%> （请记着您的订单号以便今后查讯）</font></td>
</tr>
<tr>
<td height="18" bgcolor="#FDE6A4" STYLE='PADDING-LEFT: 20px'>商品列表：</td>
</tr>
<tr>
<td height="18" bgcolor="#FDE6A4" ><table width="90%" border="0" align="right" cellpadding="2" cellspacing="1" bgcolor="#FF8E19">
<tr bgcolor="#FDFADD">
<td><div align="center">商品名称</div></td>
<td><div align="center">市场价</div></td>
<td><div align="center">
<%if request.cookies("bookshop")("grtt")=1 then
response.write "团体价"
else
response.write "会员价"
end if%>
</div></td>
<td><div align="center">数量</div></td>
<td><div align="center">小计</div></td>
</tr>
<%dim iiii '计算总额
do while not rs.eof
if request.cookies("bookshop")("grtt")=1 then
iiii=rs("tuantijia")*rs("bookcount")+iiii
else
iiii=rs("huiyuanjia")*rs("bookcount")+iiii
end if%>
<tr bgcolor="#FDFADD">
<td><%response.Write "<a href=book.asp?id="&rs("bookid")&" target=_blank>"&rs("bookname")&"</a>"%></td>
<td><div align="center"><%=formatnumber(rs("shichangjia"),2)&"元"%></div></td>
<td><div align="center">
<%if request.cookies("bookshop")("grtt")=1 then
response.write formatnumber(rs("tuantijia"),2)&"元"
else
response.write formatnumber(rs("huiyuanjia"),2)&"元"
end if%>
</div></td>
<td><div align="center"><%=rs("bookcount")%></div></td>
<td><div align="center">
<%if request.cookies("bookshop")("grtt")=1 then
response.write formatnumber(rs("tuantijia")*rs("bookcount"),2)&"元"
else
response.write formatnumber(rs("huiyuanjia")*rs("bookcount"),2)&"元"
end if%>
</div></td>
</tr>
<%rs.movenext
loop
rs.movefirst
%>
<tr bgcolor="#FDFADD">
<td colspan="5"><div align="right">
<%
'//判断是否大于100元
if iiii < 100 then
response.write "<font color=#FF6600>您选择的送货方式是："
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -