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

📄 buy_domain.asp

📁 功能强大的内容管理系统
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="conn.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE><%=page_name%>&nbsp;&ndash;&nbsp;<%=page_title%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK 
href="images/style.css" type=text/css rel=stylesheet>
<script language="VBScript">
sub check()
Letters = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890-"
letters1="!@#$%^&*+=|\.,/`~"
lettel="0123456789_-()"
dn=frm1.domain2.value
na=frm1.name.value
te=frm1.tel.value
if dn=empty then 
  msgbox "请输入您的域名"
  focusto(0)
  exit sub
  end if
  
  if len(dn)<2 then 
  msgbox "域名不要少于2位"
  focusto(0)
  exit sub
  end if
for i=1 to  len(dn)
 if instr(letters1,mid(dn,i,1))<>0 then
  msgbox "注意:在查询英文域名时应输入英文不能输入非法字符!域名由不分大小写的英文字母和数字组成,除了开头和结尾以外,中间也可以含有“-”(即连字符或称减号)最大长度为26个字符"
  focusto(0)
  exit sub
  end if
  exit for
next

if len(na)<2 then 
  msgbox "所有者不要少于2位"
  focusto(5)
  exit sub
  end if
  
  
for i=1 to  len(na)
 if instr(letters,mid(na,i,1))=0 then
  msgbox "注意:域名所有者只能为英文"
  focusto(5)
  exit sub
  end if
  exit for
next
  
   if len(te)<11 then 
  msgbox "电话不能少于11位"
  focusto(7)
  exit sub
  end if
  
for i=1 to  len(le)
 if instr(lettel,mid(le,i,1))=0 then
  msgbox "电话号中有非法字符"
  focusto(7)
  exit sub
  end if
  exit for
next
  
frm1.submit
end sub

sub focusto(x)
document.frm1.elements(x).focus()
end sub

</script>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
</HEAD>
<BODY leftMargin=0 background=images/bg.jpg topMargin=0 marginheight="0" 
marginwidth="0">
<!--#include file="head.asp" -->
<TABLE height=804 cellSpacing=0 cellPadding=0 width=760 align=center 
bgColor=#ffffff border=0>
  <TBODY>
    <TR>
      <TD height=21 colspan="3" vAlign=top><img src="images/banner_domain.gif" width="760" height="129"></TD>
    </TR>
    <TR>
      <TD bgColor=#999999 colspan="3"><IMG height=1 src="images/spacer.gif" 
  width=8></TD>
    </TR>
    <TR>
      <TD width=136 height=288 vAlign=top background="images/bg_l.gif"><TABLE height=122 cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR>
              <TD vAlign=top width="100%" height=104><P align=center><IMG src="images/dr2.gif"> </P></TD>
            </TR>
            <TR>
              <TD width="100%" height=18></TD>
            </TR>
          </TBODY>
        </TABLE></TD>
      <td width="592" height="288" valign="middle"><p>&nbsp;</p>
        <table width="533" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#3770A9"
bordercolorlight="" bordercolordark="ffffff" bgcolor="F4F8FB">
          <tr>
            <td width="529" height="147" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td width="35%"><img src="images/newdomain.jpg" width="180" height="133"></td>
                  <td width="65%" valign="top"><p>&nbsp;&nbsp;感谢您使用<%=page_name%>的域名系统</p>
                    <ol>
                      <li>自助域名管理平台</li>
                      <li>提供域名解析、子域名设定</li>
                      <li>别名记录、邮件转发功能,支持rul转发</li>
                      <li>免费泛解析</li>
                      <li>自助更改domain.A.MX.24小时内自动更新...</li>
                    </ol></td>
                </tr>
              </table></td>
          </tr>
        </table>
        <p align="center"><strong>域名申请提交表</strong></p>
        <form action="buy_save.asp" method="post" name="frm1" id="frm1">
          <table width="83%" border="0" align="center" cellpadding="2" cellspacing="2">
            <tr bgcolor="#999999">
              <td colspan="3"><font color="#FFFFFF">域名订单</font></td>
            </tr>
            <tr>
              <td width="16%">所注域名:</td>
              <td colspan="2">WWW.
                <input name="domain2" type="text" id="domain2" value="<%=request("domain")%>" size="10">
                <select name="domain1" size="1" id="domain1">
                  <% rs.open "domain",conn,1,1
				ext=Trim(Request.QueryString("ext"))
			  if session("dl")=empty then session("dl")=1
			  bje="je"&session("dl")
		while not rs.eof 
		je=rs(bje)
			  selected=""
			  if rs("lx")=ext then
			  selected="selected"
			  else
			  selected=""
			  end if
			   %>
                  <option value="<%= rs("lx")&"#"&je%>" <%= selected %>><%= rs("lx") %> <%= je %>/年</option>
                  <% rs.movenext
				wend %>
                  <% rs.close %>
                </select>
                <input name="ll" type="hidden" id="ll" value="domain">
                <input name="title" type="hidden" id="title" value="顶级域名">
              </td>
            </tr>
            <tr>
              <td>注册年限:</td>
              <td colspan="2"><select name="sl" id="sl">
                  <option value="1" selected>1年</option>
                  <option value="2">2年</option>
                  <option value="3">3年</option>
                  <option value="5">5年</option>
                  <option value="10">10年</option>
                </select></td>
            </tr>
            <tr>
              <td height="25">组织名称:</td>
              <td colspan="2"><p>
                  <input name="orgname" type="text" id="orgname" size="10">
              </td>
            </tr>
            <tr>
              <td height="25">注册人:</td>
              <td colspan="2"><p>
                  <input name="name" type="text" id="name" size="10">
              </td>
            </tr>
            <tr>
              <td height="25">注册人组织:</td>
              <td colspan="2"><p>
                  <input name="orgname2" type="text" id="orgname2" size="10">
              </td>
            </tr>
            <tr>
              <td>所在国家:</td>
              <td colspan="2"><input name="gj" type="text" id="gj" value="CN" size="8">
              </td>
            </tr>
            <tr>
              <td>省 会:</td>
              <td width="40%"><input name="sf" type="text" id="sf" size="15">
              </td>
              <td width="44%">&nbsp;</td>
            </tr>
            <tr>
              <td height="21">城 市;</td>
              <td colspan="2"><input name="cs" type="text" id="cs" size="15"></td>
            </tr>
            <tr>
              <td height="21">地 址;</td>
              <td colspan="2"><input name="address" type="text" id="address" size="30"></td>
            </tr>
            <tr>
              <td>电 话:</td>
              <td colspan="2"><input name="tel" type="text" id="tel" size="15"></td>
            </tr>
            <tr>
              <td>传 真;</td>
              <td colspan="2"><input name="tel1" type="text" id="tel4" size="15"></td>
            </tr>
            <tr>
              <td>email:</td>
              <td colspan="2"><font color="#FF0000">
                <input name="email" type="text" id="email5" size="20">
                <strong>域名密码将发送到这个邮箱里</strong></font></td>
            </tr>
            <tr>
              <td colspan="3"><div align="center">
                  <input type="button" name="Submit2" value="确定提交"  onclick="check" >
                </div></td>
            </tr>
            <tr>
              <td height="22" colspan="3"><div align="center"> </div>
                <div align="right"><a href="usdl.asp"><font color="#FF0000">-您必须先登录才能下定单-</font></a> </div></td>
            </tr>
            <tr>
              <td colspan="3">&nbsp;</td>
            </tr>
          </table>
        </form>
        <p>&nbsp;</p></td>
      <TD width=32 height=288 background=images/bg_r.gif><IMG height=1 
      src="" width=32 border=0></TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0>
  <TBODY>
    <TR>
      <TD bgColor=#999999><IMG height=1 src="images/spacer.gif" 
  width=1></TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="foot.asp" -->
<%conn.close
set conn= nothing
%>

⌨️ 快捷键说明

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