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

📄 action.asp

📁 一个公司营销系统
💻 ASP
字号:
<!--#include file="connn.asp"-->
<%
user=request("user")
dim rs,sql
set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from user where username ='"&user&"'"
rs.open sql,conn,3,2
if  rs.eof and rs.bof then
   response.write "<script language='javascript'>"
   response.write "alert('该用户不存在,请检查输入是否正确!');"
   response.write "</script>"
  response.redirect"index.asp?user="&webname&""  
   response.end
else if rs("key1")=0 or rs("key2")=0 or rs("key3")=0 or rs("key4")=0 or rs("key5")=0 then
  response.redirect"temporary.asp"
  response.end 
end if
end if
%>
<%user=request("user")%>
<html>
<head>
<title>网上订单</title>
<Script Language=javascript> 
function Click(){ 
window.event.returnValue=false; 
} 
document.oncontextmenu=Click; 
</Script>
<script Language="JavaScript">
var messeage="欢迎光临伴江行销售网络!!!==会员代理,电子邮件地址,营销软件,MLM制作与销售,网页制作……";
var seq=0;
function Move(){
textlen=messeage.length;
window.status=messeage.substring(0,seq+1);
seq++;
if (seq>=textlen)
seq=0;
window.setTimeout("Move();",250);}
Move();

</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="css.css" rel=stylesheet type=text/css>
<STYLE type=text/css>BODY {
	COLOR: #304618; FONT-SIZE: 12px
}
TD {
	COLOR: #304618; FONT-SIZE: 12px
}
TH {
	COLOR: #304618; FONT-SIZE: 12px
}
A {
	FONT-SIZE: 12px
}
</STYLE>
<style type="text/css">
<!--
.border {
	border: 1px solid #669933;
}
-->
</style>
<style type="text/css">
<!--
.font {
	font-family: "宋体";
	font-size: 12px;
	font-style: normal;
	color: #CC3333;
	text-decoration: none;
}
.font1 {
	font-family: "宋体";
	font-size: 12px;
	color: #006600;
}
-->
</style>
<style type="text/css">
<!--
.border1 {
	border-right-width: 1px;
	border-top-style: none;
	border-right-style: solid;
	border-bottom-style: none;
	border-left-style: none;
	border-right-color: #669933;
}
.lkbtn       { height: 22px; font-size: 9pt; font-family: Verdana; 
               border-left-color: #FFFFFF; border-left-width: 1px; 
               border-right-color: #5D9339; border-right-width: 1px; 
               border-top-color: #FFFFFF; border-top-width: 1px; 
               border-bottom-color: #5D9339; border-bottom-width: 1px }
-->
</style>
</head>
<script language="JavaScript"> 
 function checkdate()  {  
  if (Form.jshname.value=="" ) {      alert("你不能更改介绍人,请重新填入!");      return false;    } 
    if (Form.bname.value=="") {      alert("请填入你的真实姓名!");      return false;    } 
    if (Form.bemail.value=="") {      alert("请填入你的电子邮件!");      return false;    } 
  if (Form.bqq.value=="") {      alert("请填入你的oicq!");      return false;    } 
  if (Form.baddress.value=="") {      alert("请填入你的地址!");      return false;    } 
  if (Form.bly.value=="") {      alert("请填入你要订购的产品!");      return false;    } 
  return true;  }  
 </script>
<body bgcolor="#FFFFFF" background="Images/bg.gif" text="#000000" leftmargin="0" topmargin="0" marginheight="0">
<div align="center">
<!--#include file="top.asp"-->
</div>


<table width="734" border="0" align="center" cellpadding="0" cellspacing="0" class="border" bgcolor="#7bb5de" height="655">
  <!--DWLayoutTable-->
  <tr> 
    <td width="173" rowspan="3" class="border1"> </td>
    <td width="31" height="16"> </td>
    <td width="540" align="center" valign="middle" height="16"> 
      <div align="center" class="font"></div>
    </td>
    <td width="10" height="16"> </td>
  </tr>
  <tr> 
    <td rowspan="2" valign="top" width="31"> 
      <!--DWLayoutEmptyCell-->
       </td>
    <td height="39" align="center" valign="middle" class="font" width="540"> 
      <table cellspacing=0 cellpadding=0 width="100%" align=center border=0>
        <tr> 
          <td bgcolor=#edf1f4 height=19 colspan="2"> 
            <div align="center"><font class=105V>网上订单(带有<font color=#ff0000>*</font>的必须填写)</font> 
            </div>
          </td>
        </tr>
        <tbody> 
        <tr> 
          <td valign=bottom 
height=25 colspan="2">  欢迎您使用网上订单,请您务必填写清楚以下各项:</td>
        </tr>
        </tbody> 
      </table>
    </td>
    <td width="10"> </td>
  </tr>
  <tr> 
    <td height="554" align="left" valign="top">
	<SCRIPT language=JavaScript>
<!--

function Juge(theForm)
{
  if (theForm.name.value == "")
  {
    alert("不是吧连名字也不写!");
    theForm.name.focus();
    return (false);
  }
	if (checktext(theForm.name.value))
	{
		alert("请您输入有效姓名!");
		theForm.name.select();
		theForm.name.focus();
		return (false);
	}


	
	if (theForm.email.value == "")
	{
		alert("请您输入\"email\"!");
		theForm.email.focus();
		return (false);
	}
	if (theForm.ly.value == "")
	{
		alert("晕内容都没写,还留什么言啊!");
		theForm.ly.focus();
		return (false);
	}

	var checkOK = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_@.";
	var checkStr = theForm.email.value;
	var allValid = true;
	for (i = 0;  i < checkStr.length;  i++)
	{
		ch = checkStr.charAt(i);
		for (j = 0;  j < checkOK.length;  j++)
		if (ch == checkOK.charAt(j))
			break;
		if (j == checkOK.length)
		{
			allValid = false;
			break;
		}
	}

	if (theForm.email.value.length < 6)
	{
			allValid = false;
	}

	if (!allValid)
	{
		alert("您输入的 \"电子邮件地址\" 无效!");
		theForm.email.focus();
		return (false);
	}

	address=theForm.email.value;
    if(address.length>0)
	{
        i=address.indexOf("@");
        if(i==-1)
		{
			window.alert("对不起!您输入的电子邮件地址是错误的!")
			theForm.email.focus();
			return false
        }
       ii=address.indexOf(".")
        if(ii==-1)
		{
			window.alert("对不起!您输入的电子邮件地址是错误的!")
			theForm.email.focus();
			return false
        }

    }
	if (checktext(theForm.email.value))
	{
		alert("请您输入有效的\"email\"!");
		theForm.email.select();
		theForm.email.focus();
		return (false);
	}
	
}


function checktext(text)
{
			allValid = true;

		for (i = 0;  i < text.length;  i++)
		{
			if (text.charAt(i) != " ")
			{
				allValid = false;
				break;
			}
		}

return allValid;
}

//-->
</SCRIPT> 
      <form onSubmit="return Juge(this)" 
action=savebook.asp method=post>
        <br>
        <table cellspacing=0 bordercolordark=#008000 cellpadding=0 width="100%" 
bordercolorlight=#ffffff border=1>
          <tbody> 
          <tr> 
            <td align=right width="24%">订购货号:</td>
            <td width="76%" height=33>&nbsp; 
              <select 
      onChange="document.images['idface'].src=options[selectedIndex].value;" 
      size=1 name=face>
                <option value="A101 50M虚拟主机(套餐) " selected>A101 50M虚拟主机(套餐)</option>
                <option value="A102 100M虚拟主机(套餐) ">A102 100M虚拟主机(套餐)</option>
                <option value="A103 200M虚拟主机(套餐) ">A103 200M虚拟主机(套餐)</option>
                <option value="A104 400M虚拟主机(套餐)">A104 400M虚拟主机(套餐)</option>
                <option value="A201 50M虚拟主机 ">A201 50M虚拟主机</option>
                <option value="A202 100M虚拟主机 ">A202 100M虚拟主机</option>
                <option value="A203 200M虚拟主机 ">A203 200M虚拟主机</option>
                <option 
        value="A204 400M虚拟主机">A204 400M虚拟主机</option>
                <option 
        value="A301 江湖50人在线 ">A301 江湖50人在线</option>
                <option 
        value="A302 江湖100人在线 ">A302 江湖100人在线</option>
                <option 
        value="A303 聊天50人在线 ">A303 聊天50人在线</option>
                <option 
        value="A304 聊天100人在线 ">A304 聊天100人在线</option>
                <option 
        value="A401 20用户共享服务器 ">A401 20用户共享服务器</option>
                <option 
        value="A402 10用户共享服务器 ">A402 10用户共享服务器</option>
                <option 
        value="A403 双用户共享服务器 ">A403 双用户共享服务器</option>
                <option 
        value="A404 单台服务器 ">A404 单台服务器</option>
                <option 
        value="A501 MSSql数据库 ">A501 MSSql数据库</option>
                <option 
        value="A502 MYSQL数据库 ">A502 MYSQL数据库</option>
                <option 
        value="A503 企业电子邮箱 ">A503 企业电子邮箱</option>
                <option 
        value="A504 服务器租用 ">A504 服务器租用</option>
                <option value="A505 服务器租用 ">A505 服务器租用</option>
              </select>
              <font color=#ff0000>*</font>(请选择一种你要的主机型号,<font color="#FF0000">如果定购其产品的在订购内容里说明</font>)</td>
          </tr>
          <tr> 
            <td align=right>绑定域名:</td>
            <td height=33>&nbsp; 
              <input 
      style="FONT-SIZE: 9pt; BACKGROUND-COLOR: #ffffcc" size=30 
      value=http://www. name=http>
              (务必填写准确,如果不要顶级域名,请填写你想要的二级域名) </td>
          </tr>
          <tr> 
            <td align=right width="24%">联系人:</td>
            <td width="76%" height=33>&nbsp; 
              <input 
      style="FONT-SIZE: 9pt; BACKGROUND-COLOR: #ffffcc" maxlength=12 size=12 
      name=name>
              <font color=#ff0000>*</font>(请填写身份证上的真实姓名)</td>
          </tr>
          <tr> 
            <td align=right>电子邮箱(E-mail):</td>
            <td height=33>&nbsp; 
              <input 
      style="FONT-SIZE: 9pt; BACKGROUND-COLOR: #ffffcc" size=30 name=email>
              <font color=#ff0000>*</font>(务必填写正确邮箱)&nbsp; </td>
          </tr>
          <tr> 
            <td align=right>腾迅QQ(QICQ):</td>
            <td height=33>&nbsp; 
              <input 
      style="FONT-SIZE: 9pt; BACKGROUND-COLOR: #ffffcc" name=oicq>
              <font 
      color=#ff0000>*</font> </td>
          </tr>
          <tr> 
            <td align=right width="24%"><font 
color=#ff0000>*</font>订购内容(留言或要求):<br>
            </td>
            <td width="76%" height=33>&nbsp; 
              <textarea class=testarea1 style="FONT-SIZE: 9pt; BACKGROUND-COLOR: #ffffcc" name=ly rows=8 cols=88 type="text">如果定购其产品的在这里里说明你要订购的产品。
如 虚拟主机 | 网站制作 | 网站推广 | 网络广告 | Email地址 | 软件销售 等产品</textarea>
            </td>
          </tr>
          <tr> 
            <td align=middle colspan=2 height=34><font face=宋体 color=#000080>
              <input 
      type=hidden value=chemcity name=user>
              <input type=submit value=我要订购 name=submit>
              <input type=reset value=重新填写 name=Reset>
              </font></td>
          </tr>
          <tr> 
            <td bgcolor=#cccccc colspan=2 
height=20>&nbsp;</td>
          </tr>
          </tbody>
        </table>
      </form>
      <table width="94%" border="0" height="173" align="center">
        <tr> 
          <td> 
            <p><font size="3"><b><font color="#CC0000">注意:</font></b></font><br>
              <br>
              <font size="3">1, 在订购了我们的产品后请用Email通知网管</font>(邮件地址:tiyinet@yahoo.com.cn 
              )<font size="3">,以保证我们有更好的服务。<br>
              <br>
              2.汇款地址见首页上的汇款方式。汇款后请立即通知本站站长。</font><br>
            </p>
            </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<!--#include file="copyright.asp"-->
</body>
</html>

⌨️ 快捷键说明

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