<%
if session("hy")<>"yes" then
response.redirect "hy_dl.asp"
response.end
end if
%>
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/function.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>購物車-<% =rs_xtpz("mc") %>-<% =rs_xtpz("bt") %></title>
<meta name="keywords" content="<% =rs_xtpz("gjz") %>">
<meta name="description" content="<% =rs_xtpz("mc") %>-<% =rs_xtpz("ms") %>">
<link href="images/css.css" rel="stylesheet" type="text/css">
<%
sp=session("sp")
if sp="" then
response.write "<script>alert('請合法操作!');history.go(-1)</script>"
response.end
end if
set rs_sp=server.createobject("adodb.recordset")
lr_sp="select bh,mc,jg from sp where bh in ("&sp&") order by id desc"
rs_sp.open lr_sp,conn,1,1,1
if rs_sp.recordcount<1 then
response.write "<script>alert('購物車為空!');history.go(-1)</script>"
response.end
end if
khxm=trim(request.form("khxm"))
khdz=trim(request.form("khdz"))
khyb=trim(request.form("khyb"))
khdh=trim(request.form("khdh"))
khyx=trim(request.form("khyx"))
zffs=trim(request.form("zffs"))
fpf=trim(request.form("fpf"))
psfs=trim(request.form("psfs"))
khxm=fld(khxm)
khdz=fld(khdz)
khyb=fld(khyb)
khdh=fld(khdh)
khyx=fld(khyx)
zffs=fld(zffs)
fpf=fld(fpf)
psfs=fld(psfs)
if khxm="" then
response.write "<script>alert('收貨人姓名不能為空!');history.go(-1)</script>"
response.end
end if
if khdz="" then
response.write "<script>alert('收貨人地址不能為空!');history.go(-1)</script>"
response.end
end if
if khyb="" then
response.write "<script>alert('收貨人郵編不能為空!');history.go(-1)</script>"
response.end
end if
if khdh="" then
response.write "<script>alert('收貨人電話不能為空!');history.go(-1)</script>"
response.end
end if
if zffs="" then
response.write "<script>alert('請選擇支付方式!');history.go(-1)</script>"
response.end
end if
if psfs="" then
response.write "<script>alert('請選擇配送方式!');history.go(-1)</script>"
response.end
end if
set rs_dd_psfs=server.createobject("adodb.recordset")
lr_dd_psfs="select fy from dd_psfs where mc='"&psfs&"'"
rs_dd_psfs.open lr_dd_psfs,conn,1,1,1
spyf=rs_dd_psfs("fy")
call gbdx(rs_dd_psfs)
bz=trim(request.form("bz"))
bz=fld(bz)
%>