<%@ Language=VBScript %>
<%
If session("admau")="" Then
	ef=True
	ec="授权非法，有可能是超时造成的。"
elseIf session("canadmagn")="" 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,10)"><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" onClick="ShowDtable(1,8)" style="FONT-WEIGHT: bolder; Cursor:hand"  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,10)" 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="60" align="center" valign="middle" background="img/r3.jpg"  onClick="ShowDtable(3,10)"  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="83" align="left"><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(4,10)"  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="130" align="left"><table height="59"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="7" background="img/midtop.gif">&nbsp;</td>
          <td width="110" align="center" valign="middle" background="img/r3.jpg"  onClick="ShowDtable(5,10)"  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="83" align="left"><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(6,10)"  id="tableTop6" style="Cursor:hand"><font color="#FFFFFF"> 独立模式<br>
            </font> </td>
            <td width="5" background="img/midtop2.gif">&nbsp;</td>
          </tr>
      </table></TD>
      <TD width="83" align="left"><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(7,10)"  id="tableTop7" style="Cursor:hand"><font color="#FFFFFF">切换身份<br>
            </font> </td>
            <td width="5" background="img/midtop2.gif">&nbsp;</td>
          </tr>
      </table></TD>
      <TD width="83" align="left"><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(10,10)"  id="tableTop10" style="Cursor:hand"><font color="#FFFFFF"> 网上支付<br>
          </font> </td>
          <td width="5" background="img/midtop2.gif">&nbsp;</td>
        </tr>
      </table></TD>
	  
      <TD width="83" align="left"><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(9,9)"  id="tableTop9" style="Cursor:hand"><font color="#FFFFFF">API授权<br>
          </font> </td>
          <td width="5" background="img/midtop2.gif">&nbsp;</td>
        </tr>
      </table></TD>
      <TD align="left"><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(8,10)"  id="tableTop8" style="Cursor:hand"><font color="#FFFFFF">分类统计<br>
          </font> </td>
          <td width="5" background="img/midtop2.gif">&nbsp;</td>
        </tr>
      </table></TD>
	     <TD width="70" align="left"><table height="59"  border="0" cellpadding="0" cellspacing="0">
        <tr>


        </tr>
      </table></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="searchagent.asp" method="get" name="formSa" 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><font color="#FFFFFF">查询代理</font></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">代理用户名：
                    <input name="username" type="text" value="<%=request("username")%>" size="10">
                    模糊搜索：
                    <input name="like" type="checkbox" id="like" value="y">
<br>
                    或姓名（中文）：
<input name="truename" type="text" id="truename">
<br>
或Email：
<input name="email" type="text" id="email">
<br>
或服务域名：
<input name="domain" type="text" id="domain" size="25">
<br>
或QQ：
            <input name="qq" type="text" id="qq" size="10">
或电话：
<input name="tel" type="text" id="tel" size="15">
<br>
或身份证号码：
<input name="perid" type="text" id="perid" size="10">
<br>
或手机：
<input name="mobi" type="text" id="mobi" size="15">
<input type="submit" name="Submit" value="执行" onClick="actionbut(1)">　　
<input type="button"  name="Submit" value="新窗口执行" onClick="javascript:window.document.formSa.target='_blank';document.formSa.submit();"></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="resetpasswordagent.asp" method="post" 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">代理用户名：
              <input name="username" type="text" value="<%=request("username")%>" size="20">
          新密码：
          <input name="password" type="text" size="20">
          <input type="submit" name="Submit" value="执行" onClick="actionbut(2)">
</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="userupagent.asp" method="post" 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">用户名：
              <input name="username" type="text" size="10">
          <input type="submit" name="Submit" value="执行" onClick="actionbut(3)">
</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="admagentsettype.asp" method="post" name="form1" target="iframeFreeHost" >
<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">代理用户名：
          <input name="username" type="text" id="username" value="<%=request("username")%>" size="10" maxlength="14">
指定的代理级别:
<%
Set conn=Server.CreateObject("ADODB.Connection")
	conn.Open Application("FreeHostDBlink")
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Agent_pers order by id asc"
		ds.Open Sql,conn,1,1
If ds.Eof Then%>
代理级别列表为空.请您先在 <a href="agentpercent.asp"><font color="red">代理折扣>>>></font></a> 的地方先设置好级别及代理用的临时域名，才能审批代理。
<%else%>
<select name="agenttype" id="agenttype">
  <%while not ds.Eof
  if ds("agenttype")<>"子代理" then
  %>
  <option value="<%=ds("agenttype")%>"><%=ds("agenttype")%></option>
  <%end if
ds.movenext
wend%>
  <option value="n" selected>取消代理资格 (会造成所有名下用户转为主站名下)</option>
</select>
<br>
<input name="pertype" type="radio" value="a" checked>
此代理使用折扣设置价格
<input type="radio" name="pertype" value="b">
此代理使用模板设置价格
<input type="radio" name="pertype" value="c">
手工设置此代理价格
<%end if%>
<input type="submit" name="Submit" value="执行" onClick="actionbut(4)">
</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>


<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">
<form action="admagentsetnextagn.asp" method="post" name="form1" target="iframeFreeHost" >		  
		  代理用户名：
          <input name="username" type="text" id="username" value="<%=request("username")%>" size="10" maxlength="14">
          <input type="radio" name="cannextagn" value="y">
          允许开设下级代理　　
          <input name="cannextagn" type="radio" value="n" checked>
不允许(默认)          
<input type="submit" name="Submit" value="执行" onClick="actionbut(5)">
</form>
<form action="admagentsethtml.asp" method="post" name="form1" target="iframeFreeHost" >		  
		  代理用户名：
          <input name="username" type="text" id="username" value="<%=request("username")%>" size="10" maxlength="14">
          <input type="radio" name="haveclosehtml" value="0" checked>
          允许代理绑自己的域名及使用模板(默认)　　
          <input name="haveclosehtml" type="radio" value="1">
不允许(将删除代理的服务域名及已有模板)          
<input type="submit" name="Submit" value="执行" onClick="actionbut(5)">
</form>
</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 action="admagentsetserver.asp" method="post" name="form1" 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>独立服务器模式</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">代理用户名：
          <input name="username" type="text" id="username" value="<%=request("username")%>" size="10" maxlength="14">
          <input type="radio" name="canmyserver" value="y">
          允许管理名下服务器　　
          <input name="canmyserver" type="radio" value="n" checked>
不允许(默认)          
<input type="submit" name="Submit" value="执行" onClick="actionbut(6)">
</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="/agent/changeagn.asp" method="post" name="form1">
  <table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table7" 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>切换成<font color="#FFFFFF">代理身份</font></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">用以下身份进入网站　代理用户名：
              <input name="username" type="text" value="<%=request("username")%>" size="20">
              <input type="submit" name="Submit" value="执行" onClick="actionbut(7)"></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="admagentsetapi.asp" method="post" name="form1" target="iframeFreeHost" >
<table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table9" 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>API模式代理</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">代理用户名：
          <input name="username" type="text" id="username" value="<%=request("username")%>" size="10" maxlength="14">
          <input type="radio" name="canuseapi" value="1">
          允许使用API方式代理　　
          <input name="canuseapi" type="radio" value="0" checked>
不允许(默认)          
<input type="submit" name="Submit" value="执行" onClick="actionbut(6)">
</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="admagentsetnetpay.asp" method="post" name="form1" target="iframeFreeHost" >
<table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table10" 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">代理用户名：
          <input name="username" type="text" id="username" value="<%=request("username")%>" size="10" maxlength="14">
          <input type="radio" name="canusenetpay" value="1">
          允许代理使用自己的网上支付接口　　
          <input name="canusenetpay" type="radio" value="0" checked>
不允许(默认)          
<input type="submit" name="Submit" value="执行" onClick="actionbut(6)"><br>
(您需要在系统参数中设置"允许代理使用自己的网上支付接口"才能使用此功能)
</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>



  <table width="98%"  border="0" cellspacing="0" cellpadding="0" id="table8" 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"><strong><a href="admuserlistagent.asp?op=all" target="iframeFreeHost" ><font color="#000000">列出所有代理>>></font></a></strong><br>
              <br>
              <strong><a href="admuserlistagent.asp?op=netset" target="iframeFreeHost" ><font color="#000000">列出未审批的代理>>></font></a></strong><br>
              <br>
              <strong><a href="admuserlistagent.asp?op=notzero" target="iframeFreeHost" ><font color="#000000">列出所有金额不为零的代理>>></font></a></strong><br>
              <br>
              <strong><a href="admuserlistagent.asp?op=zero" target="iframeFreeHost" ><font color="#000000">列出所有金额为零的代理>>></font></a></strong> <br>
              <br>
              <strong><a href="admuserlistagent.asp?op=notnor" target="iframeFreeHost" ><font color="#000000">列出所有金额为负的代理>>></font></a></strong> <br>
			  
  

<%
Set conn=Server.CreateObject("ADODB.Connection")
	conn.Open Application("FreeHostDBlink")
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Agent_pers"
		ds.Open Sql,conn,1,1
while not ds.eof
%>
			  <br>
            <strong><a href="admuserlistagent.asp?agenttype=<%=ds("agenttype")%>" target="iframeFreeHost" ><font color="#000000">列出代理级别为 <%=ds("agenttype")%> 的代理>>></font></a></strong><br>
              <br>			
<%
ds.movenext
wend
%>
			  
              <br>
              <strong><a href="gemail.asp?type=agent&da=all"><font color="#000000">群发邮件给所有代理(包含子代理)>>></font></a></strong>
			                <br><br>

              <strong><a href="gemail.asp?type=agent&da=onlymain"><font color="#000000">群发邮件给所有代理(不包含子代理)>>></font></a></strong> 
			                <br><br>

              <strong><a href="gemail.asp?type=agent&da=onlysub"><font color="#000000">群发邮件给子代理(不包含主站顶级代理)>>></font></a></strong> 
			  
			  </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>
  
  
  <iframe name="iframeFreeHost" width="0" height="0" scrolling="no"></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>
          <td height="50" align="left" id=outconM>正在提交数据中.........</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>
  
  
  
</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>

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