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

📄 index.asp

📁 一个非常优秀的自动建站程序
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="conn.asp"-->
<!--#include file="newhead.asp"-->
<script language="JavaScript">
function CheckIfEnglish( String )
{ 
    var Letters = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890-";
     var i;
     var c;
      if(String.charAt( 0 )=='-')
	return false;
      if( String.charAt( String.length - 1 ) == '-' )
          return false;
     for( i = 0; i < String.length; i ++ )
     {
          c = String.charAt( i );
	  if (Letters.indexOf( c ) < 0)
	     return false;
     }
     return true;
}
function submitchecken() {

if (!(document.frmsearchInt.govcn.checked |document.frmsearchInt.cc.checked | document.frmsearchInt.comcn.checked | document.frmsearchInt.netcn.checked
 | document.frmsearchInt.tv.checked | document.frmsearchInt.info.checked | document.frmsearchInt.biz.checked
 | document.frmsearchInt.orgcn.checked | document.frmsearchInt.com.checked | document.frmsearchInt.net.checked | document.frmsearchInt.org.checked |document.frmsearchInt.cn.checked ) )
    {
	  alert("请选择你所要注册的域名类型。")
	  document.frmsearchInt.Domain.focus();
	  return false;
	 } 

if (document.frmsearchInt.Domain.value == "") {
		alert("请输入您要查询的英文域名。");
		document.frmsearchInt.Domain.focus();
		return false;
	}

if (!CheckIfEnglish(document.frmsearchInt.Domain.value )) {
		alert("\t注意:在查询英文域名时应输入英文不能输入中文及非法字符!\n域名由不分大小写的英文字母和数字组成,除了开头和结尾以外,中间也可以含有“-”(即连字符或称减号)最大长度为26个字符;");
		document.frmsearchInt.Domain.focus();
		return false;
	}
return true;
}

</script>

<TABLE cellSpacing=0 cellPadding=0 width=776 align=center background=images/di.gif border=0>
  <TBODY>
  <TR vAlign=top align=left>
    <TD width=168 height=722>
      <TABLE cellSpacing=0 cellPadding=0 width=168 
      background=images/leftdi.gif border=0>
        <TBODY>
        <TR>
          <TD><IMG height=22 src="images/mang.gif" width=168></TD></TR>
        <TR>
          <TD>
<%if session("ID")="" then%>
            <TABLE cellSpacing=5 cellPadding=0 width="100%" border=0>
              <TBODY><form name="login" method="post" action="chkUser.asp?action=login">
              <TR>
                <TD width="31%" height=22>
                  <DIV align=right><STRONG>帐号:</STRONG></DIV></TD>
                <TD width="69%" height=22><INPUT class=box size=13 
                  name="UserId"></TD></TR>
              <TR>
                <TD height=22>
                  <DIV align=right><STRONG>密码:</STRONG></DIV></TD>
                <TD height=22><INPUT class=box type=password size=13 
                  name="PassWd"></TD></TR>
              <TR>
                <TD align=center height=20 colspan="2" valign="middle"><input type="submit" value=" 登 陆 " name="Submit" style="font-size: 9pt; COLOR: #ffffff; height:20px;background-color:#568ac2;" onMouseOver ="this.style.backgroundColor='#77A3D2'" onMouseOut ="this.style.backgroundColor='#568ac2'">
&nbsp;
<input type="reset" value=" 重 置 " name="B2" style="font-size: 9pt; COLOR: #ffffff; height:20px;background-color:#568ac2;" onMouseOver ="this.style.backgroundColor='#77A3D2'" onMouseOut ="this.style.backgroundColor='#568ac2'">
&nbsp;</TD></TR></form></TABLE>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD align=middle><IMG height=1 src="images/xu.gif" 
                  width=161></TD></TR></TBODY></TABLE>
            <TABLE cellSpacing=7 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD align=middle><STRONG><A 
                  href="reg.asp">免费注册</A>!</STRONG> <A 
                  href="sendpass.asp">忘记密码?</A></TD></TR></TBODY></TABLE>
<%else
    Set rs = Server.CreateObject("ADODB.Recordset")
    sql="select * from [Agent_User] where ID=" & session("ID")
    rs.open sql,conn,1,3
    if rs.bof and rs.eof then
	response.redirect "index.asp"
	response.end
    else
	UserID=rs("UserID")
	Name=rs("Name")
	Grade=rs("Grade")
	Money=rs("Money")
	TelePhone=rs("TelePhone")
	Address=rs("Address")
    end if
    rs.close
    Set rs = Nothing
Function GradeText(Grade)
Select Case Grade
Case "1"
GradeText="普通会员"
Case "2"
GradeText="铜牌代理"
Case "3"
GradeText="银牌代理"
Case "4"
GradeText="金牌代理"
Case "5"
GradeText="合作伙伴"
Case else
GradeText="非法用户"
End Select
End Function
%>
 <table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
                    <tr>
                      <td align="center"><%=GradeText(Grade)%>:</td><td><%=Name%> </td>
                    </tr>
                    <tr>
                      <td align="center" height="15">帐户余额:</td><td><%=money%></td>
                    </tr>
                    <tr>
                      <td align="center" colspan="2"><a href="admin.asp" target="_blank">管理中心</a></td>
                    </tr>

                    <tr>
                      <td align="center" colspan="2"><a href="logout.asp">退出系统</a></td>
                    </tr>
                </table>
<%end if%>
</TD></TR>
        <TR>
          <TD><IMG height=1 src="images/xian.gif" 
      width=168></TD></TR>      <TABLE cellSpacing=0 cellPadding=0 width=168 border=0>
        <TBODY>
        <TR>
          <TD align=middle><IMG height=1 src="images/thui.gif" 
          width=168></TD></TR>
        <TR>
          <TD><IMG height=23 src="images/server.gif" 
        width=168></TD></TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width=168 
      background=images/left5.gif border=0>
        <TBODY>
        <TR>
          <TD vAlign=center align=left width=52><IMG height=94 
            src="images/left3.gif" width=59></TD>
          <TD width=116>
            <TABLE cellSpacing=2 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD height=133><FONT color=#ff6600><STRONG>☉</STRONG></FONT><A 
                  href="payway.asp">支付方式</A><BR><FONT 
                  color=#ff6600><STRONG>☉</STRONG></FONT><A 
                  href="about.asp#contact">联系方式</A><BR><FONT 
                  color=#ff6600><STRONG>☉</STRONG></FONT>关于订单 
                  <TABLE height=6 cellSpacing=0 cellPadding=0 width="100%" 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD><IMG height=1 src="images/left4.gif" 
                      width=104></TD></TR></TBODY></TABLE><FONT 
                  color=#ff6600><STRONG>☉</STRONG></FONT>常见问题解答<BR><FONT 
                  color=#ff6600><STRONG>☉</STRONG></FONT><A 
                  href="/control">自助管理</a><BR><FONT 
                  color=#ff6600><STRONG>☉</STRONG></FONT>进入服务中心</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width=168 
      background=images/teldi.gif border=0>
        <TBODY>
        <TR>
          <TD><img height=54 src="images/tel1.gif" width=166></TD>
        </TR>
        <TR>
          <TD><img height=22 src="images/tel2.gif" width=168></TD></TR>
        <TR>
          <TD>
            <TABLE cellSpacing=3 cellPadding=0 width=168 border=0>
              <TBODY>
              <TR>
                <TD width=26>&nbsp;</TD>
                <TD class=xiao width=133><%=tel1%><br><%=tel2%> </TD>
              </TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD><IMG height=18 src="images/tel3.gif" width=168></TD></TR>
        <TR>
          <TD>
            <TABLE cellSpacing=3 cellPadding=0 width=168 border=0>
              <TBODY>
              <TR>
                <TD width=26>&nbsp;</TD>
                <TD class=xiao 
width=133><%=fax1%></TD>
              </TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD><IMG height=22 src="images/tel4.gif" width=168></TD></TR>
        <TR>
          <TD>
            <TABLE cellSpacing=2 cellPadding=0 width=168 border=0>
              <TBODY>
              <TR>
                <TD vAlign=center align=right width=1>&nbsp;</TD>
                <TD vAlign=center align=middle width=27><IMG height=16 
                  src="images/qq.gif" width=16></TD>
                <TD class=xiao width=124><%=oicq1%>&nbsp;&nbsp;<%=oicq2%></TD>
              </TR>
              <TR>
                <TD vAlign=center align=right width=1 height=16>&nbsp;</TD>
                <TD vAlign=center align=middle><IMG height=16 
                  src="images/email.gif" width=16></TD>
                <TD class=C01><A class=xiao 
                  href="mailto:<%=supportmail%>"><%=supportmail%></A></TD>
              </TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD><IMG height=22 src="images/tel4.gif" 
        width=168></TD></TR>
        <TR>
          <TD>
            <TABLE cellSpacing=2 cellPadding=0 width=168 border=0>
              <TBODY>
              <TR>
                <TD vAlign=center align=right width=1>&nbsp;</TD>
                <TD vAlign=center align=middle width=27><FONT color=#ff6600><STRONG>☉</STRONG></FONT></TD>
                <TD class=xiao width=124>最新客户</TD>
              </TR>
              <TR>
                <TD vAlign=center align=right width=1>&nbsp;</TD>
                <TD vAlign=center align=middle width=27><FONT color=#ff6600><STRONG>☉</STRONG></FONT></TD>
                <TD class=xiao width=124>最新客户</TD>
              </TR>
              <TR>
                <TD vAlign=center align=right width=1>&nbsp;</TD>
                <TD vAlign=center align=middle width=27><FONT color=#ff6600><STRONG>☉</STRONG></FONT></TD>
                <TD class=xiao width=124>最新客户</TD>
              </TR>
              <TR>
                <TD vAlign=center align=right width=1>&nbsp;</TD>
                <TD vAlign=center align=middle width=27><FONT color=#ff6600><STRONG>☉</STRONG></FONT></TD>
                <TD class=xiao width=124>最新客户</TD>
              </TR>
              <TR>
                <TD vAlign=center align=right width=1>&nbsp;</TD>
                <TD vAlign=center align=middle width=27><FONT color=#ff6600><STRONG>☉</STRONG></FONT></TD>
                <TD class=xiao width=124>最新客户</TD>
              </TR>
              <TR>
                <TD vAlign=center align=right width=1 height=16>&nbsp;</TD>
                <TD vAlign=center align=middle width=27><FONT color=#ff6600><STRONG>☉</STRONG></FONT></TD>
                <TD class=C01><A class=xiao href="mailto:admin@225500.com">admin@225500.com</A></TD>
              </TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD><IMG height=13 src="images/tel5.gif" 
        width=168></TD></TR>
</TBODY></TABLE></TD>
    <TD width=603>
      <table width="607" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="125" bgcolor="#FFFFFF"><table width="607" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="125" bgcolor="#FFFFFF"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="607" height="130">
            <param name="movie" value="images/rebuild.swf">
            <param name="quality" value="high">
            <embed src="rebuild.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="607" height="130"></embed>
          </object></td>
        </tr>
      </table></td>
        </tr>
      </table>
      <TABLE cellSpacing=0 cellPadding=0 width=608 border=0>
        <TBODY>
        <TR>
          <TD>
</TD></TR>
        <TR>
          <TD height=10><IMG height=10 src="images/right.gif" 
          width=608></TD></TR></TBODY></TABLE>

⌨️ 快捷键说明

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