<%@ Language=VBScript %>
<!--#include virtual="/inc-freehost-function/FreeHostFunctionMain.asp"-->
<%If session("admau")="" Then
	ef=True
	ec="授权非法，有可能是超时造成的。"
elseIf session("canadmuser")="" Then
	ef=True
	ec="您没有此操作的权限。"
end if
if not ef then%>
<!--#include virtual="/inc-freehost-function/htmlwrite.asp"--><%=htmlwrite("html8")%>
<%=htmlwrite("html9")%>


<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 background="img/midtop4.gif">
  <TBODY>
    <TR>
      <TD width=53 align="left" background="img/midtop1.gif" onClick="ShowDtable(1,7)"><strong> 　 </strong><font color="#FFFFFF">─<strong>&gt;</strong></font> </TD>
      <TD width="83"><table height="59"  border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td width="7" background="img/midtop.gif">&nbsp;</td>
            <td width="60" align="center" valign="middle" background="img/r3.jpg" style="FONT-WEIGHT: bolder; Cursor:hand"  onClick="ShowDtable(1,6)"  id="tableTop1"><font color="#FFFFFF"> 搜索主机</font><br></td>
            <td width="5" background="img/midtop2.gif">&nbsp;</td>
          </tr>
      </table></TD>
      <TD width="83"><table height="59"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="7" background="img/midtop.gif">&nbsp;</td>
          <td width="60" align="center" valign="middle" background="img/r3.jpg"  onClick="ShowDtable(2,6)" id="tableTop2" style="Cursor:hand"><font color="#FFFFFF">搜索邮箱<br>
          </font> </td>
          <td width="5" background="img/midtop2.gif">&nbsp;</td>
        </tr>
      </table></TD>
      <TD width="83"><table height="59"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="7" background="img/midtop.gif">&nbsp;</td>
          <td width="70" align="center" valign="middle" background="img/r3.jpg"  onClick="ShowDtable(3,6)"  id="tableTop3" style="Cursor:hand"><font color="#FFFFFF">搜索数据库<br>
          </font> </td>
          <td width="5" background="img/midtop2.gif">&nbsp;</td>
        </tr>
      </table></TD>
      <TD width="18" align="left">&nbsp;</TD>
      <TD width="120" align="left"><table height="59"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="7" background="img/midtop.gif">&nbsp;</td>
          <td width="90" align="center" valign="middle" background="img/r3.jpg"  onClick="ShowDtable(4,6)"  id="tableTop4" style="Cursor:hand"><font color="#FFFFFF">搜索云服务器<br>
          </font> </td>
          <td width="5" background="img/midtop2.gif">&nbsp;</td>
        </tr>
      </table></TD>
      <TD width="120" align="left"><table height="59"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="7" background="img/midtop.gif">&nbsp;</td>
          <td width="90" align="center" valign="middle" background="img/r3.jpg"  onClick="ShowDtable(5,6)"  id="tableTop5" style="Cursor:hand"><font color="#FFFFFF">搜索域名<br>
          </font> </td>
          <td width="5" background="img/midtop2.gif">&nbsp;</td>
        </tr>
      </table></TD>
      <TD width="120" align="left"><table height="59"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="7" background="img/midtop.gif">&nbsp;</td>
          <td width="90" align="center" valign="middle" background="img/r3.jpg"  onClick="ShowDtable(6,6)"  id="tableTop6" style="Cursor:hand"><font color="#FFFFFF">搜索IDC<br>
          </font> </td>
          <td width="5" background="img/midtop2.gif">&nbsp;</td>
        </tr>
      </table></TD>
      <TD width="74" align="left">&nbsp;</TD>
      <TD align="left">&nbsp;</TD>
      <TD width=23 align="right"><IMG height=59 
                  src="img/rtop4.jpg" 
                  width=19></TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0>
  <TBODY>
    <TR>
      <TD width=19 background="img/midlef.gif"  id=rightid>&nbsp;</TD>
      <TD height="462" align="center" vAlign=top background="contopa.gif" bgcolor="#FFFFFF">
<form action="sxidc.asp" method="get" name="formIDC" target="iframeFreeHost">
        <table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table6" style="display:none">
          <tr>
            <td width="10" height="23" background="img/contopa.gif">&nbsp;</td>
            <td height="23" align="left" valign="top" background="img/contopb.gif"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td height="8" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25">&nbsp;</td>
                  <td align="left" valign="top"><font color="#FFFFFF"><strong>IDC搜索中心</strong></font></td>
                  <td width="10">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" height="23" background="img/contopc.gif">&nbsp;</td>
          </tr>
          <tr>
            <td background="img/conmid1.gif">&nbsp;</td>
            <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td height="10" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25" height="50">&nbsp;</td>
                  <td height="50" align="left">
				  
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#C8DAFF">
  <tr height="24">
    <td bgcolor="#ECF2FF" align="right"> 用户名：</td>
    <td bgcolor="#FAFAFA"><input name="username" type="text" id="username" value="" size="20" maxlength="30">
        <input name="showuserinfo" type="checkbox" id="showuserinfo" value="y">
    在结果中显示用户详细信息</td>
  </tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							或代理名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="agent1" type="text" id="agent1" value="" size="20" maxlength="30">						  </td>
						</tr>
<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
所在机柜：</td>
						  <td bgcolor="#FAFAFA">
							<select name="ServerlistID" id="ServerlistID">
					  <option value="" selected>全部</option>
                        <%
Set conn=Server.CreateObject("ADODB.Connection")
	conn.Open Application("FreeHostDBlink")						
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_IDCJG order by jfname,id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
                        
机柜列表为空.

                        <%else%>
                        <%while not dsX.Eof%>
                        <option value="<%=dsX("id")%>"><%=dsX("id")%>.<%=dsX("jgname")%>（<%=dsX("jfname")%>）</option>
                        <br>
                        <%
dsX.movenext
wend%>
                      </select>
                      <%end if%>
						  </td>
						</tr>						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							IP：</td>
						  <td bgcolor="#FAFAFA">
						  <input name="ip" type="text" id="ip" value="" size="20" maxlength="30">						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
状态：</td>
						  <td bgcolor="#FAFAFA">
  <select name="status" id="status">
  <option value="等待处理">等待处理</option>
    <option value="准备上架">准备上架</option>
    <option value="正常" selected>正常</option>
    <option value="暂停">暂停</option>
    <option value="过期">过期</option>
	<option value="空闲">空闲</option>
  </select>
						  　　</td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  开通时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="starttime1" type="text" id="starttime1" size="10" maxlength="10">
							至
							<input name="starttime2" type="text" id="starttime2" size="10" maxlength="10">
							(格式：2015-7-24)                          </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							到期时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="endtime1" type="text" id="endtime1" size="10" maxlength="10">
							至
							<input name="endtime2" type="text" id="endtime2"  size="10" maxlength="10">
						  </td>
						</tr>
						<tr bgcolor="#FAFAFA" height="30">
						  <td colspan="2" align="center">
							<input type="submit" name="Submit" value="执行" onClick="actionbut(1)">
							<input name="top20" type="checkbox" id="top20" value="y">
只显示前20个结果　　　	
<input type="button"  name="Submit" value="新窗口执行" onClick="javascript:window.document.formIDC.target='_blank';document.formIDC.submit();"></td>
						</tr>

					  </table>				  
				  
				  
				  
				  </td>
                  <td width="10" height="50">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan="3">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" background="img/conmid2.gif">&nbsp;</td>
          </tr>
          <tr>
            <td width="10" height="10"><img src="img/conend1.gif" width="10" height="10"></td>
            <td height="10" background="img/conend2.gif"></td>
            <td width="10" height="10"><img src="img/conend3.gif" width="10" height="10"></td>
          </tr>
        </table>
	  </form>
	  
<form action="sxdomain.asp" method="get" name="formDomain" target="iframeFreeHost">
        <table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table5" style="display:none">
          <tr>
            <td width="10" height="23" background="img/contopa.gif">&nbsp;</td>
            <td height="23" align="left" valign="top" background="img/contopb.gif"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td height="8" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25">&nbsp;</td>
                  <td align="left" valign="top"><font color="#FFFFFF"><strong>域名的搜索中心</strong></font></td>
                  <td width="10">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" height="23" background="img/contopc.gif">&nbsp;</td>
          </tr>
          <tr>
            <td background="img/conmid1.gif">&nbsp;</td>
            <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td height="10" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25" height="50">&nbsp;</td>
                  <td height="50" align="left">
				  
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#C8DAFF">
  <tr height="24">
    <td bgcolor="#ECF2FF" align="right"> 用户名：</td>
    <td bgcolor="#FAFAFA"><input name="username" type="text" id="username" value="" size="20" maxlength="30">
        <input name="showuserinfo" type="checkbox" id="showuserinfo" value="y">
    在结果中显示用户详细信息</td>
  </tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							或代理名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="agent1" type="text" id="agent1" value="" size="20" maxlength="30">						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							域名：</td>
						  <td bgcolor="#FAFAFA">
						  <input name="hostname" type="text" id="hostname" value="" size="20" maxlength="30">						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
状态：</td>
						  <td bgcolor="#FAFAFA">
							<select name="status">
							<Option value="">全部</Option>
							<Option value="正常" >正常</Option>
							<Option value="预注册成功" >预注册成功</Option>
							<Option value="失败" >失败</Option>
							<Option value="过期暂停">过期已暂停</Option>
							<Option value="续费失败" >续费失败</Option>
							<Option value="过期" >过期</Option>
							</select>
						  　　</td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  开通时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="starttime1" type="text" id="starttime1" size="10" maxlength="10">
							至
							<input name="starttime2" type="text" id="starttime2" size="10" maxlength="10">
							(格式：2015-7-24)                          </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							到期时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="endtime1" type="text" id="endtime1" size="10" maxlength="10">
							至
							<input name="endtime2" type="text" id="endtime2"  size="10" maxlength="10">
						  </td>
						</tr>
						<tr bgcolor="#FAFAFA" height="30">
						  <td colspan="2" align="center">
							<input type="submit" name="Submit" value="执行" onClick="actionbut(1)">
							<input name="top20" type="checkbox" id="top20" value="y">
只显示前20个结果　　　	
<input type="button"  name="Submit" value="新窗口执行" onClick="javascript:window.document.formDomain.target='_blank';document.formDomain.submit();"></td>
						</tr>

					  </table>				  
				  
				  
				  
				  </td>
                  <td width="10" height="50">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan="3">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" background="img/conmid2.gif">&nbsp;</td>
          </tr>
          <tr>
            <td width="10" height="10"><img src="img/conend1.gif" width="10" height="10"></td>
            <td height="10" background="img/conend2.gif"></td>
            <td width="10" height="10"><img src="img/conend3.gif" width="10" height="10"></td>
          </tr>
        </table>
	  </form>
	  
<form action="sx.asp" method="get" name="formHost" target="iframeFreeHost">
        <table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table1">
          <tr>
            <td width="10" height="23" background="img/contopa.gif">&nbsp;</td>
            <td height="23" align="left" valign="top" background="img/contopb.gif"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td height="8" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25">&nbsp;</td>
                  <td align="left" valign="top"><font color="#FFFFFF"><strong>虚拟主机产品的搜索中心</strong></font></td>
                  <td width="10">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" height="23" background="img/contopc.gif">&nbsp;</td>
          </tr>
          <tr>
            <td background="img/conmid1.gif">&nbsp;</td>
            <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td height="10" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25" height="50">&nbsp;</td>
                  <td height="50" align="left">
				  
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#C8DAFF">
  <tr height="24">
    <td bgcolor="#ECF2FF" align="right"> 用户名：</td>
    <td bgcolor="#FAFAFA"><input name="username" type="text" id="username" value="" size="20" maxlength="30">
        <input name="showuserinfo" type="checkbox" id="showuserinfo" value="y">
    在结果中显示用户详细信息</td>
  </tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							或代理名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="agent1" type="text" id="agent1" value="" size="20" maxlength="30">						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							绑定域名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="hostname" type="text" id="hostname" value="" size="20" maxlength="30">
							<input name="showicpinfo" type="checkbox" id="showicpinfo" value="y">
在结果中显示域名对应备案号</td>
						</tr>
						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  FTP用户名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="ftpname" type="text" id="ftpname" value="" size="20" maxlength="30">
						  </td>
						</tr>
						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
所在服务器：</td>
						  <td bgcolor="#FAFAFA">
							<select name="ServerlistID" id="ServerlistID">
					  <option value="" selected>全部</option>
                        <%
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Serverlist order by orderbyid desc,id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
                        
服务器列表为空.

                        <%else%>
                        <%while not dsX.Eof%>
                        <option value="<%=dsX("id")%>" <%if dsX("id")=ServerlistID then

  %>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%><!--(<%=dsX("site")%>)--> IP:<%=dsX("ip")%> <%if dsX("agent1")<>"n" then%>　代理名：<a href="searchagent.asp?username=<%=dsX("agent1")%>"><font color="#0000FF"><%=dsX("agent1")%></font></a>
    <%end if%></option>
                        <br>
                        <%
dsX.movenext
wend%>
                      </select>
                      <%end if%>
						  </td>
						</tr>
						<tr height="24">
                          <td bgcolor="#ECF2FF" align="right">产品名：</td>
                          <td bgcolor="#FAFAFA"><%
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_HostProductlist order by id asc"
		ds.Open Sql,conn,1,1
If ds.Eof Then%>
    产品列表为空.
      <%else%>
      <select name="Hosttype" id="Hosttype">
        <option value="" selected>全部</option>
        <%while not ds.Eof%>
        <option value="<%=ds("Hosttype")%>"><%=ds("Hosttype")%></option>
        <br>
        <%
ds.movenext
wend%><option value="子目录绑定">子目录绑定</option>
      </select>
      <%end if%>
                          </td>
					    </tr>
						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right"><div align="right">备案状态：</div></td>
							<td bgcolor="#FAFAFA">
					            <select name="beianstatus">
										  <option value="" selected>全部</option>
		<option value="没有备案" >没有备案</option>
            <option value="用户已录入数据" >用户已录入数据</option>		
		  <option value="管理员录入数据" >管理员录入数据</option>
			<option value="管理员已审核" >管理员已审核</option>
			<option value="用户需补充数据" >用户需补充数据</option>
			<option value="已提交工信部" >已提交工信部</option>
			<option value="备案审核未通过" >备案审核未通过</option>
			<option value="备案成功" >备案成功</option>
          </select>
						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
主机状态：</td>
						  <td bgcolor="#FAFAFA">
							<select name="status">
							<Option value="">全部</Option>
							<Option value="正常" >正常</Option>
							<Option value="停止" >停止</Option>
							<Option value="过期未暂停" >过期未暂停</Option>
							<Option value="过期暂停">过期已暂停</Option>
							<Option value="暂停" >其他原因暂停中</Option>
							<Option value="试用" >试用中</Option>
							<Option value="试用过期" >试用过期</Option>
							<Option value="试用过期未暂停" >试用过期未暂停</Option>
							<Option value="试用过期已暂停" >试用过期已暂停</Option>
							</select>
							　　
                            <input type="radio" name="orderbybytes" value="CDNMBthismonth">
按CDN月流量排列
<input type="radio" name="orderbybytes" value="CDNMB-d">
按昨日CDN流量排列						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  开通时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="starttime1" type="text" id="starttime1" size="10" maxlength="10">
							至
							<input name="starttime2" type="text" id="starttime2" size="10" maxlength="10">
							(格式：2015-7-24)
                            　
                            <input type="radio" name="orderbybytes" value="cpu">
按昨日cpu使用量排列 </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							到期时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="endtime1" type="text" id="endtime1" size="10" maxlength="10">
							至
							<input name="endtime2" type="text" id="endtime2"  size="10" maxlength="10">
							　　
							
							<input type="radio" name="orderbybytes" value="m">
							按月流量排列

							
                            <input type="radio" name="orderbybytes" value="d">
                          按昨日流量排列 </td>
						</tr>
						<tr bgcolor="#FAFAFA" height="30">
						  <td colspan="2" align="center">
							<input type="submit" name="Submit" value="执行" onClick="actionbut(1)">
							<input name="top20" type="checkbox" id="top20" value="y">
只显示前20个结果　　　	
<input type="button"  name="Submit" value="新窗口执行" onClick="javascript:window.document.formHost.target='_blank';document.formHost.submit();"></td>
						</tr>

					  </table>				  
				  
				  
				  
				  </td>
                  <td width="10" height="50">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan="3">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" background="img/conmid2.gif">&nbsp;</td>
          </tr>
          <tr>
            <td width="10" height="10"><img src="img/conend1.gif" width="10" height="10"></td>
            <td height="10" background="img/conend2.gif"></td>
            <td width="10" height="10"><img src="img/conend3.gif" width="10" height="10"></td>
          </tr>
        </table>
	  </form>

<form action="sxemail.asp" method="get" name="form1" target="iframeFreeHost">
        <table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table2" style="display:none">
          <tr>
            <td width="10" height="23" background="img/contopa.gif">&nbsp;</td>
            <td height="23" align="left" valign="top" background="img/contopb.gif"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td height="8" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25">&nbsp;</td>
                  <td align="left" valign="top"><font color="#FFFFFF"><strong>邮箱产品的搜索中心</strong></font></td>
                  <td width="10">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" height="23" background="img/contopc.gif">&nbsp;</td>
          </tr>
          <tr>
            <td background="img/conmid1.gif">&nbsp;</td>
            <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td height="10" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25" height="50">&nbsp;</td>
                  <td height="50" align="left">
				  
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#C8DAFF">
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							用户名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="username" type="text" id="username" value="" size="20" maxlength="30"><input name="showuserinfo" type="checkbox" id="showuserinfo" value="y">
    在结果中显示用户详细信息
						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							邮箱绑定域名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="domain" type="text" id="domain" value="" size="20" maxlength="30">
						  </td>
						</tr>
						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
所在服务器：</td>
						  <td bgcolor="#FAFAFA">
							<select name="ServerlistID" id="ServerlistID">
					  <option value="" selected>全部</option>
                        <%
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Serveremaillist order by id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
                        
服务器列表为空.

                        <%else%>
                        <%while not dsX.Eof%>
                        <option value="<%=dsX("id")%>" <%if dsX("id")=ServerlistID then

  %>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%> IP:<%=dsX("ip")%> <%if dsX("agent1")<>"n" then%>　代理名：<a href="searchagent.asp?username=<%=dsX("agent1")%>"><font color="#0000FF"><%=dsX("agent1")%></font></a>
    <%end if%></option>
                        <br>
                        <%
dsX.movenext
wend%>
                      </select>
                      <%end if%>
						  </td>
						</tr>
						<tr height="24">
                          <td bgcolor="#ECF2FF" align="right">产品名：</td>
                          <td bgcolor="#FAFAFA"><%
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_EmailProductlist order by id asc"
		ds.Open Sql,conn,1,1
If ds.Eof Then%>
    产品列表为空.
      <%else%>
      <select name="Emailtype" id="Emailtype">
        <option value="" selected>全部</option>
        <%while not ds.Eof%>
        <option value="<%=ds("Emailtype")%>"><%=ds("Emailtype")%></option>
        <br>
        <%
ds.movenext
wend%>
      </select>
      <%end if%>
                          </td>
					    </tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
状态：</td>
						  <td bgcolor="#FAFAFA">
							<select name="status">
							<Option value="">全部</Option>
							<Option value="正常" >正常</Option>
							<Option value="过期未暂停" >过期未暂停</Option>
							<Option value="过期暂停">过期已暂停</Option>
							<Option value="暂停" >其他原因暂停中</Option>
							<Option value="试用" >试用中</Option>
							<Option value="试用过期" >试用过期</Option>
							<Option value="试用过期未暂停" >试用过期未暂停</Option>
							<Option value="试用过期已暂停" >试用过期已暂停</Option>
							</select>
						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  开通时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="starttime1" type="text" id="starttime1" size="10" maxlength="10">
							至
							<input name="starttime2" type="text" id="starttime2" size="10" maxlength="10"">
							(格式：2006-7-24)
						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							到期时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="endtime1" type="text" id="endtime1" size="10" maxlength="10">
							至
							<input name="endtime2" type="text" id="endtime2"  size="10" maxlength="10">
						  </td>
						</tr>
						<tr bgcolor="#FAFAFA" height="30">
						  <td colspan="2" align="center">
							<input type="submit" name="Submit" value="执行" onClick="actionbut(2)">
						  </td>
						</tr>

					  </table>				  
				  
				  
				  
				  </td>
                  <td width="10" height="50">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan="3">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" background="img/conmid2.gif">&nbsp;</td>
          </tr>
          <tr>
            <td width="10" height="10"><img src="img/conend1.gif" width="10" height="10"></td>
            <td height="10" background="img/conend2.gif"></td>
            <td width="10" height="10"><img src="img/conend3.gif" width="10" height="10"></td>
          </tr>
        </table>
	  </form>


<form action="sxsql.asp" method="get" name="form1" target="iframeFreeHost">
        <table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table3" style="display:none">
          <tr>
            <td width="10" height="23" background="img/contopa.gif">&nbsp;</td>
            <td height="23" align="left" valign="top" background="img/contopb.gif"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td height="8" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25">&nbsp;</td>
                  <td align="left" valign="top"><font color="#FFFFFF"><strong>数据库产品的搜索中心</strong></font></td>
                  <td width="10">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" height="23" background="img/contopc.gif">&nbsp;</td>
          </tr>
          <tr>
            <td background="img/conmid1.gif">&nbsp;</td>
            <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td height="10" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25" height="50">&nbsp;</td>
                  <td height="50" align="left">
				  
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#C8DAFF">
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							用户名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="username" type="text" id="username" value="" size="20" maxlength="30"><input name="showuserinfo" type="checkbox" id="showuserinfo" value="y">
    在结果中显示用户详细信息
						  </td>
						</tr>
						<tr height="24">
                          <td bgcolor="#ECF2FF" align="right"> 数据库名：</td>
                          <td bgcolor="#FAFAFA"><input name="sqlname" type="text" id="sqlname" value="" size="20" maxlength="30">
                          </td>
					    </tr>
						<tr height="24">
                          <td bgcolor="#ECF2FF" align="right"> FTP名：</td>
                          <td bgcolor="#FAFAFA"><input name="ftpname" type="text" id="ftpname" value="" size="20" maxlength="30">
                          </td>
					    </tr>
						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  域名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="hostname" type="text" id="hostname" value="" size="20" maxlength="30">
						  </td>
						</tr>
						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
所在服务器：</td>
						  <td bgcolor="#FAFAFA">
							<select name="ServerlistID" id="ServerlistID">
					  <option value="" selected>全部</option>
                        <%
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Serversqllist order by id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
                        
服务器列表为空.

                        <%else%>
                        <%while not dsX.Eof%>
                        <option value="<%=dsX("id")%>" <%if dsX("id")=ServerlistID then

  %>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%> IP:<%=dsX("ip")%> <%if dsX("agent1")<>"n" then%>　代理名：<a href="searchagent.asp?username=<%=dsX("agent1")%>"><font color="#0000FF"><%=dsX("agent1")%></font></a>
    <%end if%></option>
                        <br>
                        <%
dsX.movenext
wend%>
                      </select>
                      <%end if%>
						  </td>
						</tr>
						<tr height="24">
                          <td bgcolor="#ECF2FF" align="right">产品名：</td>
                          <td bgcolor="#FAFAFA"><%
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_SQLProductlist order by id asc"
		ds.Open Sql,conn,1,1
If ds.Eof Then%>
    产品列表为空.
      <%else%>
      <select name="Sqltype" id="Sqltype">
        <option value="" selected>全部</option>
        <%while not ds.Eof%>
        <option value="<%=ds("Sqltype")%>"><%=ds("Sqltype")%></option>
        <br>
        <%
ds.movenext
wend%>
      </select>
      <%end if%>
                          </td>
					    </tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
状态：</td>
						  <td bgcolor="#FAFAFA">
							<select name="status">
							<Option value="">全部</Option>
							<Option value="正常" >正常</Option>
							<Option value="过期未暂停" >过期未暂停</Option>
							<Option value="过期暂停">过期已暂停</Option>
							<Option value="暂停" >其他原因暂停中</Option>
							<Option value="试用" >试用中</Option>
							<Option value="试用过期" >试用过期</Option>
							<Option value="试用过期未暂停" >试用过期未暂停</Option>
							<Option value="试用过期已暂停" >试用过期已暂停</Option>
							</select>
						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  开通时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="starttime1" type="text" id="starttime1" size="10" maxlength="10">
							至
							<input name="starttime2" type="text" id="starttime2" size="10" maxlength="10"">
							(格式：2006-7-24)
						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							到期时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="endtime1" type="text" id="endtime1" size="10" maxlength="10">
							至
							<input name="endtime2" type="text" id="endtime2"  size="10" maxlength="10">
						  </td>
						</tr>
						<tr bgcolor="#FAFAFA" height="30">
						  <td colspan="2" align="center">
							<input type="submit" name="Submit" value="执行" onClick="actionbut(3)">
						  </td>
						</tr>

					  </table>				  
				  
				  
				  
				  </td>
                  <td width="10" height="50">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan="3">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" background="img/conmid2.gif">&nbsp;</td>
          </tr>
          <tr>
            <td width="10" height="10"><img src="img/conend1.gif" width="10" height="10"></td>
            <td height="10" background="img/conend2.gif"></td>
            <td width="10" height="10"><img src="img/conend3.gif" width="10" height="10"></td>
          </tr>
        </table>
	  </form>
	  
	  <form action="sxvps.asp" method="get" name="formVPS" target="iframeFreeHost" id="formVPS">
        <table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table4" style="display:none">
          <tr>
            <td width="10" height="23" background="img/contopa.gif">&nbsp;</td>
            <td height="23" align="left" valign="top" background="img/contopb.gif"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td height="8" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25">&nbsp;</td>
                  <td align="left" valign="top"><font color="#FFFFFF"><strong>云服务器搜索中心</strong></font></td>
                  <td width="10">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" height="23" background="img/contopc.gif">&nbsp;</td>
          </tr>
          <tr>
            <td background="img/conmid1.gif">&nbsp;</td>
            <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td height="10" colspan="3"></td>
                </tr>
                <tr>
                  <td width="25" height="50">&nbsp;</td>
                  <td height="50" align="left">
				  
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#C8DAFF">
  <tr height="24">
    <td bgcolor="#ECF2FF" align="right"> 用户名：</td>
    <td bgcolor="#FAFAFA"><input name="username" type="text" id="username" value="" size="20" maxlength="30">
        <input name="showuserinfo" type="checkbox" id="showuserinfo" value="y">
    在结果中显示用户详细信息</td>
  </tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							或代理名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="agent1" type="text" id="agent1" value="" size="20" maxlength="30">						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							绑定域名：</td>
						  <td bgcolor="#FAFAFA">
							<input name="hostname" type="text" id="hostname" value="" size="20" maxlength="30">
							(共享IP才有)</td>
						</tr>
						<tr height="24">
                          <td bgcolor="#ECF2FF" align="right"> 云服务器名：</td>
                          <td bgcolor="#FAFAFA"><input name="vpsname" type="text" id="vpsname" value="" size="20" maxlength="30">
                          </td>
					    </tr>
						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  所分配的IP：</td>
						  <td bgcolor="#FAFAFA">
							<input name="ip" type="text" id="ip" value="" size="20" maxlength="30"></td>
						</tr>
						
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
所在服务器：</td>
						  <td bgcolor="#FAFAFA">
							<select name="ServerlistID" id="ServerlistID">
					  <option value="" selected>全部</option>
                        <%Set conn=Server.CreateObject("ADODB.Connection")
	conn.Open Application("FreeHostDBlink")
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_ServerVPSlist order by orderbyid desc,id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
                        
服务器列表为空.

                        <%else%>
                        <%while not dsX.Eof%>
                        <option value="<%=dsX("id")%>" <%if dsX("id")=ServerlistID then

  %>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%><!--(<%=dsX("site")%>)--> IP:<%=dsX("ip")%> <%if dsX("agent1")<>"n" then%>　代理名：<a href="searchagent.asp?username=<%=dsX("agent1")%>"><font color="#0000FF"><%=dsX("agent1")%></font></a>
    <%end if%></option>
                        <br>
                        <%
dsX.movenext
wend%>
                      </select>
                      <%end if%>
						  </td>
						</tr>
						<tr height="24">
                          <td bgcolor="#ECF2FF" align="right">产品名：</td>
                          <td bgcolor="#FAFAFA"><%
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_VPSProductlist order by id asc"
		ds.Open Sql,conn,1,1
If ds.Eof Then%>
    产品列表为空.
      <%else%>
      <select name="VPStype" id="VPStype">
        <option value="" selected>全部</option>
        <%while not ds.Eof%>
        <option value="<%=ds("VPStype")%>"><%=ds("VPStype")%></option>
        <br>
        <%
ds.movenext
wend%>
      </select>
      <%end if%>
                          </td>
					    </tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
状态：</td>
						  <td bgcolor="#FAFAFA">
							<select name="status">
							<Option value="">全部</Option>
							<Option value="正常" >正常</Option>
							<Option value="停止" >停止</Option>
							<Option value="过期未暂停" >过期未暂停</Option>
							<Option value="过期暂停">过期已暂停</Option>
							<Option value="暂停" >其他原因暂停中</Option>
							<Option value="试用" >试用中</Option>
							<Option value="试用过期" >试用过期</Option>
							<Option value="试用过期未暂停" >试用过期未暂停</Option>
							<Option value="试用过期已暂停" >试用过期已暂停</Option>
							</select>
						  </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
						  开通时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="starttime1" type="text" id="starttime1" size="10" maxlength="10">
							至
							<input name="starttime2" type="text" id="starttime2" size="10" maxlength="10">
							(格式：2006-7-24)                          </td>
						</tr>
						<tr height="24">
						  <td bgcolor="#ECF2FF" align="right">
							到期时间：</td>
						  <td bgcolor="#FAFAFA">
							<input name="endtime1" type="text" id="endtime1" size="10" maxlength="10">
							至
							<input name="endtime2" type="text" id="endtime2"  size="10" maxlength="10">
							　　
							
							
                            <input type="radio" name="orderbybytes" value="CDNMBthismonth">
按月流量排列
<input type="radio" name="orderbybytes" value="CDNMB-d">
按昨日流量排列<br>


<input type="radio" name="orderbybytes" value="CDNMB-today">
按今天流量排列
<input type="radio" name="orderbybytes" value="CDNMB-today-hour">
按今天一小时前流量排列
<input type="radio" name="orderbybytes" value="CDNMB-today-IN">
按今天流入流量排列
<input type="radio" name="orderbybytes" value="CDNMB-today-hour-IN">
按今天一小时前流入流量排列


<br>
<input type="radio" name="orderbybytes" value="CDNMB-cpulast">
按昨天CPU排列
<input type="radio" name="orderbybytes" value="CDNMB-cputoday">
按今天CPU排列
<input type="radio" name="orderbybytes" value="CDNMB-cputodayhour">
按今天一小时前cpu排列
<br>
<input type="radio" name="orderbybytes" value="CDNMB-iopslast">
按昨天IOPS排列
<input type="radio" name="orderbybytes" value="CDNMB-iopstoday">
按今天IOPS排列
<input type="radio" name="orderbybytes" value="CDNMB-iopstodayhour">
按今天一小时前IOPS排列
</td>
						</tr>
						<tr bgcolor="#FAFAFA" height="30">
						  <td colspan="2" align="center">
							<input type="submit" name="Submit" value="执行" onClick="actionbut(4)">
							<input name="top20" type="checkbox" id="top20" value="y">
只显示前20个结果　　　	
<input type="button"  name="Submit" value="新窗口执行" onClick="javascript:window.document.formVPS.target='_blank';document.formVPS.submit();"></td>
						</tr>

					  </table>				  
				  
				  
				  
				  </td>
                  <td width="10" height="50">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan="3">&nbsp;</td>
                </tr>
            </table></td>
            <td width="10" background="img/conmid2.gif">&nbsp;</td>
          </tr>
          <tr>
            <td width="10" height="10"><img src="img/conend1.gif" width="10" height="10"></td>
            <td height="10" background="img/conend2.gif"></td>
            <td width="10" height="10"><img src="img/conend3.gif" width="10" height="10"></td>
          </tr>
        </table>
	  </form>

<iframe name="iframeFreeHost" width="0" height="0" scrolling="no" id="iframeFreeHost" frameborder="0"></iframe>
<table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table0" style="display:none">
  <tr>
    <td width="10" height="23" background="img/contopa.gif">&nbsp;</td>
    <td height="23" align="left" valign="top" background="img/contopb.gif"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td height="8" colspan="3"></td>
        </tr>
        <tr>
          <td width="25">&nbsp;</td>
          <td align="left" valign="top"><font color="#FFFFFF"><strong>执行结果</strong></font></td>
          <td width="10">&nbsp;</td>
        </tr>
    </table></td>
    <td width="10" height="23" background="img/contopc.gif">&nbsp;</td>
  </tr>
  <tr>
    <td background="img/conmid1.gif">&nbsp;</td>
    <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="10" colspan="3"></td>
        </tr>
        <tr>
          <td width="25" height="50">&nbsp;</td>
<form action="sxaction.asp" method="post" name="formBT" id="formBT" target="_top">		  
          <td height="50" align="left" id=outconM>正在提交数据中.........</td>
</form>		  
          <td width="10" height="50">&nbsp;</td>
        </tr>
        <tr>
          <td colspan="3">&nbsp;</td>
        </tr>
    </table></td>
    <td width="10" background="img/conmid2.gif">&nbsp;</td>
  </tr>
  <tr>
    <td width="10" height="10"><img src="img/conend1.gif" width="10" height="10"></td>
    <td height="10" background="img/conend2.gif"></td>
    <td width="10" height="10"><img src="img/conend3.gif" width="10" height="10"></td>
  </tr>
</table>


</TD>
      <TD width=18 background="img/midri.gif">&nbsp;</TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
    <TR>
      <TD width=30><IMG height=19 
                  src="img/rb1.jpg" 
                  width=30></TD>
      <TD 
                background=img/rb2.jpg>&nbsp;</TD>
      <TD width=30><IMG height=19 
                  src="img/rb3.jpg" 
                  width=30></TD>
    </TR>
  </TBODY>
</TABLE>




<script>
function doselectall()
{
var   all=document.formBT
var   checks=all.getElementsByTagName("input"); 
 for(var   i=0;i<checks.length;i++)   
      {     


		if (checks[i].name=="dsphid")
			{

				checks[i].checked=true;

			}
      }   
}
function undoselectall()
{
var   all=document.formBT
var   checks=all.getElementsByTagName("input"); 
 for(var   i=0;i<checks.length;i++)   
      {     


		if (checks[i].name=="dsphid")
			{

				checks[i].checked=false;

			}
      }   
}
</script>



<%=htmlwrite("html10")%>
<%end if
if ef then
Response.Redirect "e.asp?e="&ec
end if%>
