📄 productsbuy.asp
字号:
<!--#include file="SiteInfo.asp"-->
<%
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
'★ ★
'☆ 万博中小企业网站管理系统(NWEB) ☆
'★ ★
'☆ 版权所有 Nweb.cn ☆
'★ ★
'☆ 程序制作 万博工作室 ☆
'★ Add:四川省彭州市西大街228号/611930 ★
'☆ Tel:028-88079088 Fax:83708850 ☆
'★ E-m:duolaimi-123@163.com ★
'☆ Q Q:59309100 ☆
'★ ★
'☆ 相关网址 [产品介绍]http://www.Nweb.cn ☆
'★ [支持论坛]http://www.Nweb.cn/bbs ★
'☆ ☆
'★ 演示网址 http://www.Nweb.cn ★
'☆ ☆
'★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
%>
<%
function changechr(str)
changechr=replace(replace(replace(replace(str,"<","<"),">",">"),chr(13),"<br>")," "," ")
end function
%>
<%
if session("My_Login")="My_Login_Succeed" and session("Uname")<>"" then
set Rs=Server.CreateObject("Adodb.Recordset")
SQL = "select * from UserInfo where Uname='"&session("Uname")&"'"
Rs.open SQL,conn,1,1
if not Rs.eof then
Uid=Rs("id")
if Rs("Uname1")="" then
Uname=Rs("Uname")
else
Uname=Rs("Uname1")
end if
Ucom=Rs("Ucom")
Uadd=Rs("Uadd")
Utel=Rs("Utel")
Umtel=Rs("Umtel")
Ufax=Rs("Ufax")
Ucode=Rs("Ucode")
Uemail=Rs("Uemail")
Rs.close
set Rs=nothing
end if
end if
'===========================
%>
<HTML>
<HEAD>
<TITLE>首页-产品订购|<%=SiteName%></TITLE>
<META http-equiv="Content-Type" content="text/html; charset=gb2312">
<META NAME="copyright" CONTENT="Copyright 2004-2005 - NWEB.CN-STUDIO-多来米">
<META NAME="Author" CONTENT="万博网络技术工作室,www.Nweb.cn">
<META NAME="Robots" CONTENT="all">
<META NAME="Keywords" CONTENT="<%=Keywords%>">
<META NAME="Description" CONTENT="<%=Description%>">
<link href="Images/CSS.css" type=text/css rel=stylesheet>
</HEAD>
<SCRIPT language=javaScript>
function CheckBuy()
{
if (document.buyform.proname.value =="" ){
alert ("提示：\n\n产品名称不能空！");
document.buyform.proname.focus();
return false;
}
if (document.buyform.prono.value == "" ){
alert ("提示：\n\n产品编号不能空！");
document.buyform.prono.focus();
return false;
}
if (document.buyform.buynum.value.length <2){
alert ("提示：\n\n定购数量不能空！");
document.buyform.buynum.focus();
return false;
}
if (document.buyform.name.value.length < 2 || document.buyform.name.value.length > 16){
alert ("提示：\n\n姓名必须在2-16字之间！");
document.buyform.name.focus();
return false;
}
if (document.buyform.com.value.length < 2 || document.buyform.com.value.length > 16){
alert ("提示：\n\n单位名称不能为空\n如果是个人购买请填写“个人购买”！");
document.buyform.com.focus();
return false;
}
if (document.buyform.tel.value == ""|| document.buyform.tel.value.length < 8){
alert ("提示：\n\n联系电话必须在8个字符以上！");
document.buyform.tel.focus();
return false;
}
if (document.buyform.address.value == ""|| document.buyform.address.value.length < 8){
alert ("提示：\n\n联系地址不能少于8个字符！");
document.buyform.address.focus();
return false;
}
if (document.buyform.zip.value.length !=6){
alert ("提示：\n\n邮编必须6个数字组成的！");
document.buyform.zip.focus();
return false;
}
if(document.buyform.email.value.length!=0)
{
if (document.buyform.email.value.charAt(0)=="." ||
document.buyform.email.value.charAt(0)=="@"||
document.buyform.email.value.indexOf('@', 0) == -1 ||
document.buyform.email.value.indexOf('.', 0) == -1 ||
document.buyform.email.value.lastIndexOf("@")==document.buyform.email.value.length-1 ||
document.buyform.email.value.lastIndexOf(".")==document.buyform.email.value.length-1)
{
alert("Email地址格式不正确！");
document.buyform.email.focus();
return false;
}
}
else
{
alert("Email不能为空！");
document.buyform.email.focus();
return false;
}
}
</SCRIPT>
<BODY >
<!--#include file="Top.asp" -->
<table width="868" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="190" height="96" valign="top" bgcolor="#F2F2F2" ><!--#include file="LeftNav.asp" -->
<!--#include file="ProductsLeft.asp" -->
</td>
<td width="5"></td>
<td width="673" valign="top" class="Index-Center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="180" colspan="2" bgcolor="#FFFFFF"><img src="Images/Banner_01.jpg" alt="万博中小企业网站系统" width="499" height="180"></td>
<td colspan="2" align="right" bgcolor="#FFFFFF"><img src="Images/Banner_02.jpg" alt="万博中小企业网站系统" width="171" height="180"></td>
</tr>
<tr>
<td width="93" height="5" bgcolor="#FFFFFF"></td>
<td width="408" bgcolor="#FFFFFF"></td>
<td width="42" bgcolor="#FFFFFF"></td>
<td width="130" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td height="30" align="right" bgcolor="#F2F2F2"><strong><font color="#1c529b"><img src="Images/Arrow-locality.gif" width="14" height="12" align="absmiddle"> 当前位置：</font></strong></td>
<td colspan="2" bgcolor="#F2F2F2" class="locality"><a href="index.asp">首 页</a> >> <a href="ProductsList.asp">产品展示</a> >> 在线订购</td>
<td bgcolor="#F2F2F2"></td>
</tr>
<tr>
<td height="5" align="center" bgcolor="#FFFFFF"></td>
<td colspan="2" align="center" bgcolor="#FFFFFF"></td>
<td align="center" bgcolor="#FFFFFF"></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" >
<tr>
<td width="28" height="12"> </td>
<td></td>
<td width="28"></td>
</tr>
<tr>
<td height="30"> </td>
<td align="center"><%
dim Action,ProName,ProNo
ProName=trim(request.QueryString("ProName"))
ProNo=trim(request.QueryString("ProNo"))
Action=trim(request.QueryString("Action"))
if Action="Buy" then
if request("VCodes")="" or (not IsNumeric(request("VCodes"))) then
response.write "<script language=javascript> alert('提示:\n\n非法的验证码，正确验证码应该是由4位数字组成!');history.back(-1);</script>"
response.end
else
if (int(session("VCodes"))<>int(request("VCodes"))) then
response.write "<script language=javascript> alert('提示:\n\n验证码错误，请重新输入黄色区域内的数字!');history.back(-1);</script>"
response.end
end if
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -