<!--#include virtual="/incs/config.asp" -->
<!--#include virtual="/incs/top.asp" -->
<%
chk_log()
chk_newpwr 1,26,1
	fnme=SafeRequest("fnme")
	If  fnme="" Then
	call errorpage(-2,"对不起，参数错误！(103)")
	response.end
	End If
	conn.open constr
if session("sysclass")>=5 then
query="select * from v_ftplst   where f_ftpnme ='"&fnme&"'"
elseif session("sysclass")>=4 then
query="select * from v_ftplst  where f_ftpnme ='"&fnme&"'  and  ((("&session("sysarestr")&" or u_myare=0) and u_rotnme='') or u_rotnme='"&session("usrname")&"')"
else
query="select * from v_ftplst   where f_ftpnme ='"&fnme&"' f_unme='"&session("usrname")&"'"
end if

	rs.open query,conn,1,1
    if rs.recordcount<>1 then
	rs.close
	conn.close
	call errorpage(-2,"对不起，该FTP空间不存在或者您无权操作！")
	response.end
	end if

u_nme=trim(rs("f_unme"))


%>
<%          ftpname=trim(rs("f_ftpnme"))
			    proid=trim(rs("f_prd"))
f_sst=rs("g_sst")
		%>
<script language=javascript>
		function expl()
		{
		if (identity.style.display=="none")
		identity.style.display="block";
		else
		identity.style.display="none";
		}
		
		
		</script>
<table cellspacing=2 cellpadding=0 width="100%" border=0>
  <tbody> 
  <tr> 
    <td  colspan=2 valign="middle"> 
      <table class=line cellspacing=0 cellpadding=0 width="100%" 
                  border=0 align="center">
        <tbody> 
        <tr> 
          <td valign=bottom width="25%" height=20><font color="#000000" class=ddropshadow><b><span class=enbold><strong><font color="#000000">FTP空间列表<a href="index.asp"  class=commonface ><font color="#FF0000">（查询）</font></a></font></strong></span></b></font></td>
          <td valign=bottom noWrap align=right 
                        width="75%"><a href="ftp_lst.asp?querytype=8" class=commonface >今天新开通</a> 
            <font color="#000000">|</font> <a href="ftp_lst.asp?querytype=9" class=commonface >本周新开通</a> 
            <font color="#000000">|</font> <a href="ftp_lst.asp?querytype=10" class=commonface >本周到期</a> 
            <font color="#000000">| </font><a href="ftp_lst.asp?querytype=11" class=commonface >本月到期</a></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=5></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=2 class=menuline></td>
        </tr>
        </tbody> 
      </table>
      <br>
    </td>
  </tr>
  <tr> 
    <td  colspan=2 valign="middle" height="28"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td> 
            <!--#include file="menu.asp"-->
          </td>
        </tr>
      </table>
      <br>
      <table cellpadding="0" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse" width="100%" height="218" align="center">
        <tr> 
          <td height="4" width="99%" valign="top"  > 
            <table cellpadding="0" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse" width="100%" height="118" border="0">
              <tr> 
                <td height="14" width="100%" valign="top"> 
                  <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%" class=datalist >
                    <tr align="middle" > 
                      <th colspan=3 height="22" class=datalistheader > 
                        <div align="center"><b>基本信息</b></div>
                      </th>
                    </tr>
                    <tr > 
                      <td class=datalistgrida height="22"  width="25%"> 
                        <div align="center">产品名称：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"> 
                        <%
								  query="select top 1 g_nme from pdtlst where g_prd='"&trim(rs("f_prd"))&"'"
								  rs1.open query,conn,1,1
								  if not rs1.eof then
								  response.write trim(rs1("g_nme"))&"("&trim(rs("f_prd"))&")"
								  end if
								  rs1.close
								  %>
                      </td>
                    </tr>
                    <tr > 
                      <td class=datalistgrida  height="22" > 
                        <div align="center">FTP名称：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"><%= ftpname %> </td>
                    </tr>
                    <tr > 
                      <td class=datalistgrida  height="22" > 
                        <div align="center">FTP总空间：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"> <%=clng(rs("f_sze"))+clng(rs("f_szeadd"))%> 
                        M &nbsp;&nbsp; 
                        <input type="button" name="Submit3" value="查 看" class=btxx  onClick="javascript:location.href='ftp_sze.asp?fnme=<%=fnme%>';"   <%=startstr%>  style="cursor:hand;">
                      </td>
                    </tr>
                    <tr > 
                      <td class=datalistgrida  height="22" > 
                        <div align="center">物理路径：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"> <b><%=rs("f_hmedir")%></b>
              
                      </td>
                    </tr>
                    <% if session("sysclass")<4 then %>
                    <form action="ftp_mng.asp" method =post name= webcontrol>
                      <tr > 
                        <td class=datalistgrida  height="22" > 
                          <div align="center">FTP空间状态：</div>
                        </td>
                        <td class=datalistgrida  colspan="2"> 
                          <%
if rs("f_regstt")=1 then
statestring="启动"
startstr="disabled=1"
stopstr=" "
elseif rs("f_regstt")=2 then
statestring="暂停"
startstr=" "
stopstr=" disabled=1"
elseif rs("f_regstt")=5 then
statestring="被停止"
startstr="disabled=1"
stopstr=" disabled=1"
elseif rs("f_regstt")=4 then
statestring="被删除"
startstr="disabled=1"
stopstr=" disabled=1"
end if 
%>
                          <input type="button" name="Submit" value="启动 FTP" class=btxx  onClick="javascript:document.webcontrol.ftp_regstt.value=1;document.webcontrol.submit();"   <%=startstr%>  style="cursor:hand;">
                          <input type="button" name="Submit2" value="暂停 FTP" class=btxx onClick="javascript:document.webcontrol.ftp_regstt.value=2;document.webcontrol.submit();"  <%=stopstr%>  style="cursor:hand;">
                          （当前FTP 已经 <font color=#ff0000><%=statestring%></font>） 
                          <input type=hidden name="ftpname" value="<%=ftpname%>" >
                          <input type=hidden name="ftp_regstt" value="" >
                          <input type=hidden name="oldstatus" value="<%=RS("f_regstt")%>" >
                          <input type=hidden name=module value="ftp_regstt">
                        </td>
                      </tr>
                    </form>
                   
                    <% end if %>
                    <% if session("sysclass")>=4 then %>
                    <form action="ftp_mng.asp" method =post name= form1>
                      <tr > 
                        <td class=datalistgrida  height="22" > 
                          <div align="center">FTP空间状态：</div>
                        </td>
                        <td class=datalistgrida ><font color="#000000"> 
                          <%
							Call  SHOWSELECT(RS("f_regstt"),RS("f_regtpe"))
					%>
                          </font></td>
                        <td class=datalistgrida width="20%" > 
                          <input type=hidden name="ftpname" value="<%=ftpname%>" >
                          <input type=hidden name="oldstatus" value="<%=RS("f_regstt")%>" >
                          <input type=hidden name=module value="ftp_regstt">
                          <input name="Cdrfd" type="submit" value="修改"  class=btxx>
                        </td>
                      </tr>
                    </form>
                    <% end if %>
        <tr> 
                      <td class=datalistgrida height="22" align="center"> 
                        <p style="margin-left: 6">相关操作:</p>
          </td>
          <td class=datalistgrida colspan=2> 
            <p style="margin-left: 6"> 
			<script>
function deleteit(proid)
{
if (confirm("确认删除此FTP空间吗？"))
{location.href="/master/pdtmng/ftp_mng/ftp_del.asp?ftpname="+proid;
}
}
</script>
              <input type="button" name="Submit22" value="订单删除" class=btxx onclick="javascript:return deleteit('<%=rs("f_ftpnme")%>');">
			  <% if rs("f_regstt")=0 then %>
              <input type="button" name="Submit23" value="购买" class=btxx onclick="javascript:showurl('/master/pdtbuy/ftp_buy/ftp_pay.asp?fnme=<%=rs("f_ftpnme")%>');">
			  <% end if %>
            
          </td>
        </tr>

                    <tr > 
                      <td class=datalistgrida  height="22" > 
                        <div align="center">购买日期：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"> <%= rs("f_addtme") %></td>
                    </tr>
                    <tr > 
                      <td class=datalistgrida  height="22" > 
                        <div align="center">到期日期：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"> 
                        <%
						If RS("f_regtpe")=1 and rs("f_regstt")<>0 Then
							Response.Write 	""& rs("f_exptme") &""
						  else
							Response.Write "下定单申请状态或试用状态,尚未正式购买"
						End If
				  %>
                      </td>
                    </tr>
                    <% if session("sysclass")>=4 then %>
                    <tr > 
                      <td class=datalistgrida  height="22" > 
                        <div align="center">所属会员：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"><a href="/master/memmng/mem_dtl.asp?unme=<%=u_nme%>"><b><%=u_nme%></b></a> 
                      </td>
                    </tr>
                    <% end if %>
                    <tr > 
                      <td class=datalistgrida  height="22" > 
                        <div align="center">是否为套餐：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"> 
                        <% if isnull(rs("setnme"))=false and rs("setnme")<>""  then %>
                        <a href="javascript:showurl('/master/pdtmng/set_mng/set_idx.asp?snme=<%=rs("setnme")%>');" class=commonface><u>查看套餐订单</u></a> 
                        <%else %>
                        不属于套餐购买 
                        <% end if %>
                      </td>
                    </tr>
                    <% if isnull(rs("pstrotprd"))=false and rs("pstrotprd")<>"" then %>
                    <tr > 
                      <td class=datalistgrida  height="22" > 
                        <div align="center">是否为赠送品：</div>
                      </td>
                      <td class=datalistgrida  colspan="2"> <a href="javascript:showurl('/master/turn.asp?gid=<%=trim(rs("pstrotprd"))%>&pid=<%=rs("pstrotnme")%>');" class=commonface><u>本品为赠送品,点击查看获得赠送的产品</u></a></td>
                    </tr>
                    <% end if %>
                  </table>
                </td>
              </tr>
              <tr> 
                <td> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0"  id=identity>
                    <tr> 
                      <td>&nbsp;</td>
                    </tr>
                    <tr> 
                      <td> 
                        <table align="center" width="100%" cellpadding="0" cellspacing="0" border="0" class=datalist>
                          <tr align="middle" > 
                            <th colspan="3" height="22" class=datalistheader > 
                              <div align="center"><b>订单信息</b></div>
                            </th>
                          </tr>
                          <tr > 
                            <td height="22" class=datalistgrida  width="25%"> 
                              <div align="center" style="display:block;">单位名称： 
                                <input type="button" name="Submit5" value="生成会员" class=btxx
			  onClick="javascript:showurl('/master/memmng/mem_add.asp?u_nme=<%=trim(rs("f_ftpnme"))%>&u_pss=<%=pss_mak(8)%>&u_copnme_cn=<%=rs("f_copnme_cn")%>&u_ctt_cn=<%=rs("f_ctt_cn")%>&u_prv_cn=<%=rs("f_prv_cn")%>&u_adr_cn=<%=rs("f_adr_cn")%>&u_cde=<%=rs("f_cde")%>&u_eml=<%=rs("f_eml")%>&u_tel=<%=rs("f_tel")%>&u_fax=<%=rs("f_fax")%>&g_prd=<%=rs("f_prd")%>&g_pnme=<%=rs("f_ftpnme")%>&oldunme=<%=rs("f_unme")%>');">
                              </div>
                            </td>
                            <td class=datalistgrida  colspan="2"><%=rs("f_copnme_cn")%></td>
                          </tr>
                          <tr > 
                            <td class=datalistgrida  height="22"> 
                              <div align="center">联系人：</div>
                            </td>
                            <td class=datalistgrida  colspan="2"><%=rs("f_ctt_cn")%></td>
                          </tr>
                          <tr > 
                            <td class=datalistgrida  height="22"> 
                              <div align="center">省份：</div>
                            </td>
                            <td class=datalistgrida  colspan="2"><%=rs("f_prv_cn")%></td>
                          </tr>
                          <tr > 
                            <td class=datalistgrida  height="22"> 
                              <div align="center">联系地址：</div>
                            </td>
                            <td class=datalistgrida  colspan="2"><%=rs("f_adr_cn")%></td>
                          </tr>
                          <tr > 
                            <td class=datalistgrida  height="22"> 
                              <div align="center">邮政编码：</div>
                            </td>
                            <td class=datalistgrida  colspan="2"><%=rs("f_cde")%></td>
                          </tr>
                          <tr > 
                            <td class=datalistgrida  height="22"> 
                              <div align="center">联系电话：</div>
                            </td>
                            <td class=datalistgrida  colspan="2"><%=rs("f_tel")%></td>
                          </tr>
                          <tr > 
                            <td class=datalistgrida  height="22"> 
                              <div align="center">传真：</div>
                            </td>
                            <td class=datalistgrida  colspan="2"><%=rs("f_fax")%></td>
                          </tr>
                          <tr > 
                            <td class=datalistgrida  height="22"> 
                              <div align="center">电子邮件：</div>
                            </td>
                            <td class=datalistgrida  colspan="2"><%=rs("f_eml")%></td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr> 
                <td   height="163"  valign="top"> <br>
                </td>
              </tr>
            </table>

            <%
rs.close
conn.close
%>
          </td>
        </tr>
        <tr> 
          <td height="4" width="99%" valign="top"  >&nbsp;</td>
        </tr>
      </table>
      <br>
      <br>
      <%
Function showstatus(regstt,regtpe,exptme)
if cdate(exptme)-date()<0 then
regstt=20
elseif cdate(exptme)-date()<7 and regtpe<>0 then
regstt=19
elseif cdate(exptme)-date()<30 and regtpe<>0 then
regstt=18
end if
regtpe_str=right("000"&cstr(regtpe),2)
regstt_str=right("000"&cstr(regstt),2)
gifstr=regtpe_str&regstt_str&".gif"
showstatus="<img src=/icons/"&gifstr&">"   

End Function
%>
      <%
Sub SHOWSELECT(regstt,regtpe)
if  regtpe=0 then
stt_str="(试用)"
elseif regtpe=5 then
stt_str="(赠送)"
else
stt_str="(正式)"
end if
%>
      <select name=ftp_regstt>
        <option <%If regstt=1 Then Response.Write " selected value=x" %> value=1 >运行中<%=stt_str%></option>
        <option <%If regstt=2 Then Response.Write " selected value=x" %> value=2 >暂停中<%=stt_str%></option>
        <option <%If regstt=5 Then Response.Write " selected value=x" %> value=5>管理员停止<%=stt_str%></option>
        <option <%If regstt=0 Then Response.Write " selected value=x" %> value=0>未开设<%=stt_str%></option>
        <option <%If regstt=4 Then Response.Write " selected value=x" %> value=4>已完全删除<%=stt_str%></option>
        <option <%If regstt=3 Then Response.Write " selected value=x" %> value=3>处理中<%=stt_str%></option>
      </select>
      <%

End sub
%>
   
     <br>
    </td>
  </tr>
  </tbody> 
</table>
<!--#include virtual="/incs/bottom.asp"-->




