⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 reckoning.asp

📁 网上商城~~ 手机类型的网站源码Asp
💻 ASP
字号:
<!-- #include file="conn.asp" -->
<!--#include file="webconfig.asp"-->
<%
'url=request.servervariables("HTTP_REFERER")
if  session("userid")="" then
  //response.write "<script>alert('你还未登陆,或登陆已超时,请重新登陆!!');</script>"
  response.write "<script>this.location.href='login_window.asp';</script>"
  response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webname%></title>
<link href="style.css" rel="stylesheet" type="text/css">
<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)
	}
//-->
</SCRIPT>
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!--#include file="include/top.asp" -->
<table width="770" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td align="center" valign="top"> 
      <table cellspacing=0 cellpadding=0 width=654 align=center border=0>
      </table>
      <%
if session("userid")="" then
	response.redirect "login_window.asp"
end if
sql="select * from Net008_user where userid='"&session("userid")&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,2
%>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <form action="reckoning_submitok.asp" method="post" name="submitok" onSubmit="return chechsubmit()">
          <tr> 
            <td bgcolor="#FFFFFF" align="center"> 
              <table width="98%" border="0" cellspacing="0" cellpadding="3">
                <tr> 
                  <td align="center"><b><font size="3">请 详 细 填 写 收 货 人 信 息</font><font color="#ff0099" class="fontshadow"> 
                    <script>
<!--
function chechsubmit()
{
if(submitok.guestname.value==""){
alert("收货人姓名不能为空!");
submitok.guestname.focus();
return false;
}
if(submitok.tel.value==""){
if(submitok.mobilephone.value==""){
alert("为便于联系,手机和常用电话两者必须填写其中一项!");
submitok.mobilephone.focus();
return false;
}
}
if(submitok.email.value.length<5|submitok.email.value.indexOf("@")==-1|submitok.email.value.indexOf(".")==-1)
{
alert("请输入正确的邮箱!便于联系你!");
submitok.email.focus();
return false;
}
if(submitok.pc.value==""){
alert("邮编很重要,请输入正确的邮政编码,长度为6位数字!");
submitok.pc.focus();
return false;
}
if(submitok.pc.value.length<6){
alert("邮编很重要,请输入正确的邮政编码,长度为6位数字!");
submitok.pc.focus();
return false;
}
if(submitok.city.value==0000){
alert("请选择收货人所在的省份!");
submitok.city.focus();
return false;
}
if(submitok.address.value==""){
alert("收货人详细地址很重要,请认真填写!");
submitok.address.focus();
return false;
}
if(submitok.sendproduct.value=="100"){
alert("送货方式没有选择!");
submitok.sendproduct.focus();
return false;
}
if(submitok.money.value=="100"){
alert("付款方式没有选择!");
submitok.money.focus();
return false;
}
if(submitok.giftpack.value=="100"){
alert("请选择礼品包装!");
submitok.giftpack.focus();
return false;
}
}
//-->
</script>
                    </font></b></td>
                </tr>
                <tr> 
                  <td height="17"><font color="#FF0000">请您仔细填写以下收货人的信息,以便所购买的商品能够及时投递。</font></td>
                </tr>
              </table>
              <table width="98%" border="0" cellspacing="1" cellpadding="3" bgcolor="#CCCCCC">
                <tr> 
                  <td width="100" align="right" class="th_front1">VIP卡号:</td>
                  <td colspan="3" bgcolor="#FFFFFF"> 
                    <input type="text" name="vipnumber" size="12" value="<%=rs("vipnumber")%>" class="input_cccccc">
                    <font color="#666666">(如果你是VIP会员,请输入你的VIP卡号,普通会员可以不填写)</font></td>
                </tr>
                <tr> 
                  <td width="100" align="right" class="th_front1">收货人姓名:</td>
                  <td bgcolor="#FFFFFF"> 
                    <input type="text" name="guestname" size="12" value="<%=rs("guestname")%>" class="input_cccccc">
                    <font color="#666666">(你身份证上的真实姓名)</font></td>
                  <td class="th_front1">性  别:</td>
                  <td bgcolor="#FFFFFF"> 
                    <input name="sex" type="radio" value="女" class="input_no" checked>
                    女   
                    <input type="radio" name="sex" value="男" class="input_no">
                    男</td>
                </tr>
                <tr> 
                  <td height="17" align="right" class="th_front1">收货人手机:</td>
                  <td height="17" bgcolor="#FFFFFF"> 
                    <input name="mobilephone" type="text" class="input_cccccc" id="mobilephone" value="<%=rs("mobilephone")%>" size="12">
                    <font color="#666666">(请准确填写,不用加0)</font></td>
                  <td class="th_front1">邮箱Email:</td>
                  <td bgcolor="#FFFFFF"> 
                    <input type="text" name="email" size="30" value="<%=rs("email")%>" class="input_cccccc" >
                  </td>
                </tr>
                <tr> 
                  <td height="17" align="right" class="th_front1">常用电话:</td>
                  <td height="17" bgcolor="#FFFFFF"> 
                    <input name="tel" type="text" class="input_cccccc" id="tel" value="<%=rs("tel")%>" size="20" >
                    <font color="#666666">(如020-88584527)</font></td>
                  <td class="th_front1">邮  编:</td>
                  <td bgcolor="#FFFFFF"> 
                    <input name="pc" type="text" class="input_cccccc" onkeypress="return regInput(this,/^[0-9]*$/,&#9;String.fromCharCode(event.keyCode))" value="<%=rs("pc")%>" size="10" maxlength="6" onpaste="return regInput(this,/^[0-9]*$/, window.clipboardData.getData('Text'))" ondrop="return regInput(this,/^[0-9]*$/,event.dataTransfer.getData('Text'))">
                    <font color="#666666">(邮编请填写准确,很重要)</font></td>
                </tr>
                <tr> 
                  <td align="right" class="th_front1">收货详细地址:</td>
                  <td colspan="3" bgcolor="#FFFFFF"> 
                    <select name=city>
                      <%
sql_temp="select * from Net008_province"
set rs_temp=server.createobject("adodb.recordset")
rs_temp.open sql_temp,conn,1,2
for i=1 to rs_temp.recordcount
	response.write"<OPTION value="&rs_temp("cityid")&">"&rs_temp("cityname")&"</OPTION>"
rs_temp.movenext
next
rs_temp.close
set rs_temp=nothing
%>
                    </select>
                    <input type="text" name="address" size="50" value="<%=rs("address")%>" class="input_cccccc">
                    <font color="#666666">(地址一定要详细)</font></td>
                </tr>
                <tr> 
                  <td align="right" class="th_front1">送货方式:</td>
                  <td colspan="3" bgcolor="#FFFFFF"> 
                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td width="43" height="71"> 
                          <select name=sendproduct class="input_cccccc">
                            <%
sql_temp="select * from Net008_sendproduct where dispyn='2'"
set rs_temp=server.createobject("adodb.recordset")
rs_temp.open sql_temp,conn,1,2
for i=1 to rs_temp.recordcount
	response.write"<OPTION value="&rs_temp("sendproductid")&">"&rs_temp("sendproductname")&"</OPTION>"
rs_temp.movenext
next
rs_temp.close
set rs_temp=nothing
%>
                          </select>
                        </td>
                        <td height="71" width="597"><font color="#666666"> 说明:<br>
                            送货方式主要是通过邮局寄给你,形式有以下几种:<br>
                            1.普通邮寄一般是1周至3周!<br>
                            <font color="#FF0000">2.快速邮寄一般是1-3天,广东珠三角地区上午发货下午到货</font><br>
                            3.货到付款目前只限广东珠三角地区,费用起价30元。<br>
                            4.国内EMS特快一般是2-4天<br>
                            <font color="#FF0000">5.新疆地区的顾客每笔订单要加收3元邮费.</font></font></td>
                      </tr>
                    </table>
                  </td>
                </tr>
                <tr> 
                  <td align="right" class="th_front1">付款方式:</td>
                  <td colspan="3" bgcolor="#FFFFFF"> 
                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td width="20"> 
                          <select name=money class="input_cccccc">
                            <%
sql_temp="select * from Net008_sendmoney where dispyn='2'"
set rs_temp=server.createobject("adodb.recordset")
rs_temp.open sql_temp,conn,1,2
for i=1 to rs_temp.recordcount
	response.write"<OPTION value="&rs_temp("moneyid")&">◆"&rs_temp("moneyaddress")&"◆"&rs_temp("moneyname")&"◆"&rs_temp("guestname")&"◆</OPTION>"
	rs_temp.movenext
next
rs_temp.close
set rs_temp=nothing
%>
                          </select>
                        </td>
                        <td><font color="#666666"> 说明:<br>
                            付款方式说明你的款是通过银行汇给我们。<br>
                            如果你要的银行不在这里,你可以在下面的备注里说明银行名称。</font></td>
                      </tr>
                    </table>
                  </td>
                </tr>
                <tr> 
                  <td align="right" class="th_front1">礼品包装:</td>
                  <td colspan="3" bgcolor="#FFFFFF"> 
                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td width="20"> 
                          <select name=giftpack class="input_cccccc" id="giftpack">
                            <%
sql_temp="select * from Net008_giftpack where dispyn='2'"
set rs_temp=server.createobject("adodb.recordset")
rs_temp.open sql_temp,conn,1,2
for i=1 to rs_temp.recordcount
	response.write"<OPTION value="&rs_temp("packid")&">"&rs_temp("packname")&"</OPTION>"
rs_temp.movenext
next
rs_temp.close
set rs_temp=nothing
%>
                          </select>
                        </td>
                        <td><font color="#666666"> 说明:<br>
                            1.如果你的产品是送给别人并且需要我们帮你精美包装!请选择4元或8元,简单包装4元,精美包装8元!<br>
                            2.如果你的产品只是自己用并且不需要精美包装,请选择0元的无需包装!</font></td>
                      </tr>
                    </table>
                  </td>
                </tr>
                <tr> 
                  <td align="right" class="th_front1">是否需要贺卡:</td>
                  <td colspan="3" bgcolor="#FFFFFF"> 
                    <input name="cardyn" type="radio" value="1" class="input_no" checked>
                    不要贺卡  
                    <input type="radio" name="cardyn" value="2" class="input_no" >
                    要贺卡 <font color="#666666">说明:贺卡收费标准是8元/份,贺卡里要写上什么话,请在备注里说明</font></td>
                </tr>
                <tr> 
                  <td align="right" class="th_front1">备  注:</td>
                  <td colspan="3" bgcolor="#FFFFFF"> 
                    <textarea name="content" cols="50" rows="6" id="content" class="input_cccccc"></textarea>
                    <br>
                    (有其它问题请说明,如:)</td>
                </tr>
              </table>
              <table cellspacing=0 cellpadding=5 width=98% align=center border=0>
                <tbody> 
                <tr> 
                  <td align=center height="65"> 
                    <input type="submit" name="Submit" value="提交订单" class="sinput">
                         
                    <input type="button" name="Submit2" value="返回上页" class="sinput" onClick="javascript:history.back()">
                  </td>
                </tr>
                </tbody> 
              </table>
            </td>
          </tr>
        </form>
      </table>
    </td>
  </tr>
</table>
<!-- #include file="include/bottom.asp" -->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -