📄 send.asp
字号:
<%@ language="vbscript"%>
<%response.Expires = 0%>
<!--#include file="conn.asp"--><!--#include file="check_user.asp"-->
<%
sp_name=request.cookies("sp_name")
set rs=server.createobject("adodb.recordset")
sqltext="select * from payment where sp_name='"&sp_name&"' "
rs.open sqltext,conn,3,3
if rs.eof then
ck_send1=""
ck_send2=""
ck_send3=""
ck_send4=""
else
ck_send1=rs("send1")
ck_send2=rs("send2")
ck_send3=rs("send3")
ck_send4=rs("send4")
end if
if request.Form("Submit")="确认"then
if rs.eof then
rs.addnew
rs("sp_name")=sp_name
end if
'开始更新商家配送信息
'检验价格有效性
call checkform(request.form("send1_b"))
call checkform(request.form("send1_c"))
call checkform(request.form("send2_b"))
call checkform(request.form("send2_c"))
call checkform(request.form("send3_b"))
call checkform(request.form("send3_c"))
rs("send1")=request.form("send1")
rs("send1_a")=request.form("send1_a")
rs("send1_b")=request.form("send1_b")
rs("send1_c")=request.form("send1_c")
rs("send2")=request.form("send2")
rs("send2_a")=request.form("send2_a")
rs("send2_b")=request.form("send2_b")
rs("send2_c")=request.form("send2_c")
rs("send3")=request.form("send3")
rs("send3_a")=request.form("send3_a")
rs("send3_b")=request.form("send3_b")
rs("send3_c")=request.form("send3_c")
rs("send4")=request.form("send4")
rs("send4_a")=request.form("send4_a")
rs.update
response.write"<script>alert('成功更新了配送方式！');window.location.href='send.asp'</script>"
response.end()
end if
%>
<html>
<head>
<title>商品添加</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
BODY { FONT-SIZE: 9pt }
a:link { color: #000000; text-decoration: none}
a:visited { color:#000000; text-decoration: none}
a:hover { color: #CC0000; text-decoration: underline}
td {font-size:9pt;line-height:12pt;}
-->
</style>
</head>
<body background="../pic/user/bg.jpg">
<form name="FORM1" method="post" action="send.asp">
<table width="522" border="1" align="center" cellpadding="3" cellspacing="0" bordercolorlight="#0000FF" bordercolordark="#FFFFFF">
<tr>
<td width="512">请选择适合你自己网店的<font color="#0000FF">配送方式</font>，此项将显示在购物订单上供客户选择。</td>
</tr>
<tr>
<td><input name="send1" type="checkbox" value="EMS快递" <%if ck_send1<>"" then response.write "checked" %>>
EMS快递 <br>
<table width="83%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="12%" valign="top"><div align="center">说 明：<br>
<a href="#" onclick="window.document.FORM1.send1_a.value='一般1－2天即可送达';" >
<font color="#0000FF">默认</font></a></div></td>
<td width="88%"><textarea name="send1_a" cols="50" rows="3" ><%=rs("send1_a")%></textarea></td>
</tr>
<tr>
<td><div align="center">配送费：</div></td>
<td><input name="send1_b" type="text" value="<%=rs("send1_b")%>" size="6">
( 元) 购买金额达到
<input name="send1_c" type="text" value="<%=rs("send1_c")%>" size="6">
( 元)时免配送费</td>
</tr>
</table></td>
</tr>
<tr>
<td><input name="send2" type="checkbox" value="邮政平邮" <%if ck_send2<>"" then response.write"checked" %>>
邮政平邮 <br>
<table width="83%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="12%" valign="top"><div align="center">说 明：
<br><a href="#" onclick="window.document.FORM1.send2_a.value='全国各地均可到达,视路途远近，省内平邮一般3天左右到达，省外邮寄一般3－7到达。';" >
<font color="#0000FF">默认</font></a> </div></td>
<td width="88%"><textarea name="send2_a" cols="50" rows="3" ><%=rs("send2_a")%></textarea></td>
</tr>
<tr>
<td><div align="center">配送费：</div></td>
<td><input name="send2_b" type="text" value="<%=rs("send2_b")%>" size="6">
( 元) 购买金额达到
<input name="send2_c" type="text" value="<%=rs("send2_c")%>" size="6">
( 元)时免配送费</td>
</tr>
</table></td>
</tr>
<tr>
<td><input name="send3" type="checkbox" value="送货上门" <%if ck_send3<>"" then response.write"checked" %>>
送货上门 <br>
<table width="83%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="12%" valign="top"><div align="center">说 明：<br>
<a href="#" onclick="window.document.FORM1.send3_a.value='暂时只对本市内上门送货，订单处理后24小时内送达';" >
<font color="#0000FF">默认</font></a></div></td>
<td width="88%"><textarea name="send3_a" cols="50" rows="3" id="send3_a"><%=rs("send3_a")%></textarea></td>
</tr>
<tr>
<td><div align="center">配送费：</div></td>
<td><input name="send3_b" type="text" value="<%=rs("send3_b")%>" size="6">
( 元) 购买金额达到
<input name="send3_c" type="text" value="<%=rs("send3_c")%>" size="6">
( 元)时免配送费</td>
</tr>
</table></td>
</tr>
<tr>
<td><input name="send4" type="checkbox" value="实时发送" <%if ck_send4<>"" then response.write"checked" %>>
实时发送 <br>
<table width="83%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="12%" valign="top"><div align="center">说 明：<br>
<a href="#" onclick="window.document.FORM1.send4_a.value='如果您购买了邮箱卡、游戏卡、电话卡、上网卡等数字类产品，您可以选择实时发送方式，在付款成功后会email或电话通知您的帐号和密码。';" >
<font color="#0000FF">默认</font></a></div></td>
<td width="88%"><textarea name="send4_a" cols="50" rows="3"><%=rs("send4_a")%></textarea></td>
</tr>
<tr>
<td><div align="center">配送费：</div></td>
<td>免</td>
</tr>
</table></td>
</tr>
<tr>
<td><div align="center">
<input type="submit" name="Submit" value="确认">
<input type="button" name="Submit2" value="预览" onclick="javascript:window.open('../<%=request.cookies("sp_name")%>/default.asp?sb=send')">
</div></td>
</tr>
</table>
</form>
<%
sub checkform(f_name)
if f_name<>"" then
if IsNumeric(f_name)=False then
Response.Write ("<script>alert('对不起！配送费价格有不法字符！');javascript:history.back(1)</script>")
response.end()
end if
end if
end sub
rs.close:set rs=nothing
conn.close
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -