📄 temp.txt

📁 给某大型ICP网站开发的域名管理支付系统
💻 TXT
字号:
<%@ language=vbscript%>
<!--#include file="domainclass.asp"-->
<% 'on error resume next 
  dim after,domain,result(6),i,j
  after=request.form("after")&","
  domain=trim(request.form("domain"))
 
 after=split(after,",")
   
   for i=0 to ubound(after)-1
     set list=new domainclass
      if instr(1,after(i),".com.cn",1)<>0 or instr(1,after(i),".net.cn",1)<>0 or instr(1,after(i),".org.cn",1)<>0 then
          list.get_domain_type="cn"
     else
           list.get_domain_type="nocn"
     end if
       list.get_domain=domain&trim(after(i))
       result(i)=list.exsit
     set list=nothing
   next
  
%>
<!--#include file ="../profile/checkuser.asp"-->
<HTML><HEAD><TITLE>域名查询</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>TD {
	FONT-SIZE: 9pt; FONT-FAMILY: "宋体"
}
.e_8 {
	FONT-SIZE: 8pt; FONT-FAMILY: "Verdana"
}
.select {
	COLOR: #000000; BACKGROUND-COLOR: #ffffcc
}
.input {
	BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid; BORDER-LEFT: #000000 1px solid; COLOR: #ff0000; BORDER-BOTTOM: #000000 1px solid; BACKGROUND-COLOR: #ffffff
}
.x18 {
	LINE-HEIGHT: 18pt
}
</STYLE>

<script language="javascript" src="calender.js"></script>

<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<BODY text=#000000 vLink=#cc0000 aLink=#990099 link=#0066ff bgColor=#ffffff leftMargin=0 topMargin=0>
<TABLE cellSpacing=0 cellPadding=1 width=640 align=center bgColor=#000000 
border=0>
  <TBODY>
  <TR>
    <TD>
      <TABLE cellSpacing=0 cellPadding=0 bgColor=#ffffff border=0>
        <TBODY>
        <TR bgColor=#ffb41d>
          <TD colSpan=3 height=12><IMG height=72 
            src="../images/paycentertop_01.gif" 
            width=174><IMG height=72 
            src="../images/paycentertop_02.gif" 
            width=168><IMG height=72 
            src="../images/paycentertop_03.gif" 
            width=158><IMG height=72 
            src="../images/paycentertop_04.gif" 
          width=140></TD></TR>
        <TR>
          <TD colSpan=3><IMG height=1 
            src="../images/paycenter_02.gif" 
        width=640></TD></TR>
        <TR>
          <TD vAlign=top bgColor=#ffffff height=406><IMG height=35 
            src="../images/paycenter_03.gif" width=475> 
            <TABLE cellSpacing=0 cellPadding=8 width=98% align=center 
              border=0 height="488">
              <TBODY> 
              <TR>
                  <TD height="85"><IMG height=21 
                  src="../images/paycenter-bar_02.gif" 
                  width=400></TD>
                </TR>
              <TR>
                  <TD valign="top"> 
                  <script language=vbscript>
		  sub reg(domain)
		   acat.s_domain.value=domain
		   acat.action="user_login.asp"
		    document.acat.submit 
		  end sub
		  sub view(domain)
		    acat.s_domain.value=domain
		    acat.action="view.asp"
		    document.acat.submit 
		  end sub
		 </script>
		<div align="center">
		  <center>
		              <table border="1" width="98%" height="51" bordercolordark="#FFFFFF" cellspacing="0" cellpadding="0" bordercolorlight="#000000" bgcolor="#990000" style="font-size: 9pt">
                        <tr>
		                  <td width="159" height="21"> 
                            <p align="center"><font color="#FFFFFF">您选择的域名</font></td>
		                  <td width="126" height="21"> 
                            <p align="center"><font color="#FFFFFF">该域名目前状态</font></td>
		                  <td width="148" height="21"> 
                            <p align="center"><font color="#FFFFFF">操作</font></td>
		    </tr>
		    <%for j=0 to i-1%>
		
		    <tr>
		                  <td width="159" height="18" bgcolor="#FFFFFF"> 
                            <p align="center"><%response.write "www."& request.form("domain") & request.form("after")%></td>
		                  <td width="126" height="18" bgcolor="#FFFFFF"> 
                            <p align="center"><%if result(j)<>0 then response.write "已经被注册" else response.write "<font color=red>尚未被注册</font>" end if%></td>
		                  <td width="148" height="18" bgcolor="#FFFFFF"> 
                            <p align="center">
		            <%if result(j)<>0 then%>
		            <a style="cursor:hand" onclick=view('<%response.write domain&trim(after(j))%>')>详细情况</a>
		            <%else %>
		            <a style="cursor:hand" onclick=reg('<%response.write domain&trim(after(j))%>') href="../reg/reg.htm">立即注册</a> 
		            <%end if%>
		        </td>
		    </tr>
		     <%next%>
		
		  </table>
		  </center>
		</div>
		<form name=acat method=post action="">
		<input name="s_domain" value="" type=hidden>
		</form>
                  </TD>
              </TR></TBODY></TABLE></TD>
          <TD width=1 bgColor=#000000 rowSpan=2><IMG height=407 
            src="../images/paycenter_04.gif" width=1></TD>
          <TD vAlign=top align=middle width=164 bgColor=#ffb41d rowSpan=2>
            <P><IMG height=7 
            src="../images/paycenter_05_01.gif" 
            width=164></P>
            <P><A 
            href="http://www.paycenter.com.cn/cgi-bin/Agent/AgentIndex"><IMG 
            height=49 src="../images/bakc.gif" width=35 
            border=0></A></P></TD></TR>
        <TR>
          <TD colSpan=3 height=1><IMG height=1 
            src="../images/paycenter_07.gif" 
        width=640></TD></TR>
        <TR>
          <TD><IMG height=18 
            src="../images/paycenter_08.gif" 
width=475></TD>
          <TD width=1><IMG height=18 
            src="../images/paycenter_09.gif" width=1></TD>
          <TD><IMG height=18 
            src="../images/paycenter_10.gif" 
        width=164></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></BODY></HTML>
⌨️ 快捷键说明

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