<!--#include virtual="/incs/config.asp" -->
<!--#include virtual="/incs/web_top.asp"-->
<%
chk_log_usr()
	sqnme=SafeRequest("sqnme")
	If  sqnme="" Then
	call errorpage(-2,"对不起，参数错误！")
	End If
	query="select * from v_sqllst where sq_unme='"&session("usrname")&"'  and sq_nme ='"&sqnme&"'"
	rs.open query,conn,1,1
    if rs.recordcount<>1 then
	rs.close
	conn.close
	call errorpage(-2,"对不起，该数据库不存在或者您无权操作！")
	response.end
	end if
sq_nme=trim(rs("sq_nme"))
	g_sst=rs("sq_sst")

%>
<%          dbname=trim(rs("sq_nme"))
			    proid=trim(rs("sq_prd"))

		%>
      <script language=javascript>
		function expl()
		{
		if (identity.style.display=="none")
		identity.style.display="block";
		else
		identity.style.display="none";
		}
		</script>
      <table cellspacing=0 cellpadding=0 width="100%" border=0>
        <tbody> 
        <tr> 
          <td colspan=2><img height=3 
            src="/imgs/spacer.gif" width=3></td>
        </tr>
        <tr> 
          <td width=438 
          background=/imgs/bg_inside_pages_link.jpg 
          height=30><img height=11 
            src="/imgs/aword_square.gif" width=11 
            align=absMiddle> <a href="/">首 页</a> <strong>&gt;</strong> <a href="/control/">管理中心</a> 
            <b>&gt;</b> <a href="/control/sql_mng/sql_lst.asp">数据库管理</a></td>
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td colspan=2><img height=10 
            src="/imgs/shadow_inside_pages.jpg" 
        width=438></td>
        </tr>
        </tbody> 
      </table>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY> 
        <TR> 
          <TD vAlign=top width=180 bgColor=#f3f3f3> 
            <!--#include virtual="/incs/control_left.asp"-->
            <br>
            <br>
            <br>
            <br>
            <br>
            <br>
            <br>
            <br>
            <br>
          </TD>
          <TD vAlign=top width=10 
          background=/imgs/bg_inside_pages_block.jpg><IMG 
            height=1 src="/imgs/bg_inside_pages_block.jpg" 
            width=10></TD>
          <TD vAlign=top> 
            <table cellspacing=2 cellpadding=0 width="100%" border=0>
              <tbody> 
              <tr> 
                <td  colspan=2 valign="middle"> 
                  <table class=line cellspacing=0 cellpadding=0 width="98%" 
                  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">列表<a href="index.asp"><font color="#FF0000">（查询）</font></a></font></strong></span></b></font></td>
                      <td valign=bottom noWrap align=right 
                        width="75%"><a href="sql_lst.asp?querytype=8"><font color="#000000">今天新开通</font></a> 
                        <font color="#000000">|</font> <a href="sql_lst.asp?querytype=9"><font color="#000000">本周新开通</font></a> 
                        <font color="#000000">|</font> <a href="sql_lst.asp?querytype=10"><font color="#000000">本周到期</font></a> 
                        <font color="#000000">| </font><a href="sql_lst.asp?querytype=11"><font color="#000000">本月到期</font></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 bgcolor="#5F5F5F"></td>
                    </tr>
                    </tbody> 
                  </table>
                  <br>
                </td>
              </tr>
              <tr> 
                <td  colspan=2 valign="middle" height="28"> 
                  <table width="80%" border="0" cellspacing="0" cellpadding="0" align="center">
                    <tr> 
                      <td> 
                        <!--#include file="menu.asp"-->
                      </td>
                    </tr>
                  </table>
                  <br>
                  <table   bordercolor="#FFFFFF" cellpadding="0" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse" width="95%" height="218" align="center">
                    <tr> 
                      <td height="4" width="99%" valign="top" bgcolor="#FFFFFF" > 
                        <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  cellpadding="0" cellspacing="0" >
                                <tr> 
                                  <td height=1></td>
                                </tr>
                              </table>
                              <table align="center" border="0" cellpadding="4" cellspacing="1" width="100%" bordercolordark="#FFFFFF" bgcolor="#666666">
                                <tr align="middle" bgcolor="#8b8b8b"> 
                                  <td colspan=3 height="22"> 
                                    <div align="center"><b><font color="#FFFFFF">运行状态</font></b> 
                                    </div>
                                  </td>
                                </tr>
                                <tr bgcolor="#FFFFFF"> 
                                  <td height="25" bgcolor="#FFFFFF" width="25%"> 
                                    <div align="center">产品名称：</div>
                                  </td>
                                  <td colspan="2"> 
                                    <%
								  query="select top 1 g_nme from pdtlst where g_prd='"&trim(rs("sq_prd"))&"'"
								  rs1.open query,conn,1,1
								  if not rs1.eof then
								  response.write trim(rs1("g_nme"))
								  end if
								  rs1.close
								  %>
                                  </td>
                                </tr>
                                <tr bgcolor="#FFFFFF"> 
                                  <td height="25" bgcolor="#FFFFFF"> 
                                    <div align="center">数据库空间：</div>
                                  </td>
                                  <td colspan="2"> <%=clng(rs("sq_sze"))%> M </td>
                                </tr>
                                <form action="sql_mng.asp" method =post name= webcontrol>
                                  <tr bgcolor="#FFFFFF"> 
                                    <td height="22" bgcolor="#FFFFFF"> 
                                      <div align="center">数据库状态：</div>
                                    </td>
                                    <td colspan="2"> 
                                      <%
if rs("sq_regstt")=1 then
statestring="启动"
startstr="disabled=1"
stopstr=" "
elseif rs("sq_regstt")=2 then
statestring="暂停"
startstr=" "
stopstr=" disabled=1"
elseif rs("sq_regstt")=5 then
statestring="被停止"
startstr="disabled=1"
stopstr=" disabled=1"
elseif rs("sq_regstt")=4 then
statestring="被删除"
startstr="disabled=1"
stopstr=" disabled=1"
else
statestring="未开设"
startstr="disabled=1"
stopstr=" disabled=1"

end if 
%>
                                      <input type="button" name="Submit" value="启动数据库" class=dud_button1  onClick="javascript:document.webcontrol.sq_regstt.value=1;document.webcontrol.submit();"   <%=startstr%>  style="cursor:hand;">
                                      <input type="button" name="Submit2" value="暂停数据库" class=dud_button1 onClick="javascript:document.webcontrol.sq_regstt.value=2;document.webcontrol.submit();"  <%=stopstr%>  style="cursor:hand;">
                                      （当前数据库已经 <font color=#ff0000><%=statestring%></font>） 
                                      <input type=hidden name="dbname" value="<%=dbname%>" >
                                      <input type=hidden name="sq_regstt" value="" >
                                      <input type=hidden name="oldstatus" value="<%=RS("sq_regstt")%>" >
                                      <input type=hidden name=module value="sql_regstt">
                                    </td>
                                  </tr>
                                </form>
                                <%
if rs("sq_ftpstt")=1 then
statestring="启动"
startstr="disabled=1"
stopstr=" "
elseif rs("sq_ftpstt")=0 then
statestring="暂停"
startstr=" "
stopstr=" disabled=1"
elseif rs("sq_ftpstt")=2 then
statestring="被停止"
startstr="disabled=1"
stopstr=" disabled=1"
end if 
%>
                                <form action="sql_mng.asp" method =post name= ftpcontrol>
                                  <tr bgcolor="#FFFFFF"> 
                                    <td height="22" bgcolor="#FFFFFF"> 
                                      <div align="center">FTP 状态：</div>
                                    </td>
                                    <td colspan="2"> 
                                      <input type="button" name="Submit4" value="启动 FTP" class=dud_button1  onClick="javascript:document.ftpcontrol.sq_ftpstt.value=1;document.ftpcontrol.submit();"   <%=startstr%>  style="cursor:hand;">
                                      <input type="button" name="Submit22" value="暂停 FTP" class=dud_button1 onClick="javascript:document.ftpcontrol.sq_ftpstt.value=0;document.ftpcontrol.submit();"  <%=stopstr%>  style="cursor:hand;">
                                      （当前FTP 已经 <font color=#ff0000><%=statestring%></font>） 
                                      <input type=hidden name="dbname" value="<%=dbname%>" >
                                      <input type=hidden name="sq_ftpstt" value="" >
                                      <input type=hidden name=module value="sql_ftpstt">
                                    </td>
                                  </tr>
                                </form>
                                <tr bgcolor="#FFFFFF"> 
                                  <td height="25" bgcolor="#FFFFFF"> 
                                    <div align="center">购买日期：</div>
                                  </td>
                                  <td colspan="2"> <%= rs("sq_addtme") %></td>
                                </tr>
                                <tr bgcolor="#FFFFFF"> 
                                  <td height="25" bgcolor="#FFFFFF"> 
                                    <div align="center">到期日期：</div>
                                  </td>
                                  <td colspan="2"> 
                                    <%
						If RS("sq_regtpe")=1 and rs("sq_regstt")<>0 Then
							Response.Write 	""& rs("sq_exptme") &""
						  else
							Response.Write "下定单申请状态或试用状态,尚未正式购买"
						End If
				  %>
                                  </td>
                                </tr>
                              </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%" bgcolor="#666666" cellpadding="4" cellspacing="1" border="0">
                                      <tr align="middle" bgcolor="#8b8b8b" bordercolordark="#FFFFFF"> 
                                        <td colspan="3" height="22"> 
                                          <div align="center"><b><font color="#FFFFFF">订单信息</font></b></div>
                                        </td>
                                      </tr>
                                      <tr bgcolor="#FFFFFF"> 
                                        <td height="22" width="25%"> 
                                          <div align="center" style="display:block;">单位名称：</div>
                                        </td>
                                        <td colspan="2"><%=rs("sq_copnme_cn")%></td>
                                      </tr>
                                      <tr bgcolor="#FFFFFF"> 
                                        <td height="22"> 
                                          <div align="center">联系人：</div>
                                        </td>
                                        <td colspan="2"><%=rs("sq_ctt_cn")%></td>
                                      </tr>
                                      <tr bgcolor="#FFFFFF"> 
                                        <td height="22"> 
                                          <div align="center">联系地址：</div>
                                        </td>
                                        <td colspan="2"><%=rs("sq_adr_cn")%></td>
                                      </tr>
                                      <tr bgcolor="#FFFFFF"> 
                                        <td height="22"> 
                                          <div align="center">邮政编码：</div>
                                        </td>
                                        <td colspan="2"><%=rs("sq_cde")%></td>
                                      </tr>
                                      <tr bgcolor="#FFFFFF"> 
                                        <td height="22"> 
                                          <div align="center">联系电话：</div>
                                        </td>
                                        <td colspan="2"><%=rs("sq_tel")%></td>
                                      </tr>
                                      <tr bgcolor="#FFFFFF"> 
                                        <td height="22"> 
                                          <div align="center">传真：</div>
                                        </td>
                                        <td colspan="2"><%=rs("sq_fax")%></td>
                                      </tr>
                                      <tr bgcolor="#FFFFFF"> 
                                        <td height="22"> 
                                          <div align="center">电子邮件：</div>
                                        </td>
                                        <td colspan="2"><%=rs("sq_eml")%></td>
                                      </tr>
                                    </table>
                                  </td>
                                </tr>
                              </table>
                            </td>
                          </tr>
                          <tr> 
                            <td height="163"  valign="top"> <br>
                              <table align="center" border="0" cellpadding="4" cellspacing="1" width="100%" bordercolordark="#FFFFFF" bgcolor="#666666" >
                                <tr align="middle" bgcolor="#8b8b8b"> 
                                  <td colspan="3" height="22"> 
                                    <div align="center"><b><font color="#FFFFFF">数据库信息</font></b></div>
                                  </td>
                                </tr>
                                <tr align="middle" bgcolor="#ffffff"> 
                                  <td height="22"  align=center width="25%">数据库地址：</td>
                                  <td height="27" ><%=rs("sq_svrip")%></td>
                                  <td height="27" width="20%">&nbsp;</td>
                                </tr>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22"> 
                                    <div align="center">数据库名称：</div>
                                  </td>
                                  <td bgcolor="#FFFFFF" height="27"><%=rs("sq_ftpusr")%></td>
                                  <td bgcolor="#FFFFFF"></td>
                                </tr>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22"> 
                                    <div align="center">数据库用户名：</div>
                                  </td>
                                  <td bgcolor="#FFFFFF" height="27"><%=rs("sq_ftpusr")%></td>
                                  <td bgcolor="#FFFFFF"></td>
                                </tr>
                                <form action="sql_mng.asp" method=post>
                                  <tr> 
                                    <td bgcolor="#FFFFFF" height="22" align="center"> 
                                      数据库密&nbsp; 码： </td>
                                    <td bgcolor="#FFFFFF" height="27"> 
									 <%
						    
   wstr=getpassoutcode(rs("sq_pss"))
 						  %>
                                      <input class="input" name="sq_pss" size="30" value="<%=wstr%>" maxlength="17">
                                    </td>
                                    <td bgcolor="#FFFFFF"> 
                                      <input name="Cdrfd2" type="submit" value="修改"  class=dud_button1 onClick="javascript:return sql_pss_cfm();">
                                     
                                      <input type=hidden name="dbname" value="<%=dbname%>" >
                                      <input type=hidden name=module value="sql_pss">
                                    </td>
                                  </tr>
                                </form>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22">&nbsp;</td>
                                  <td bgcolor="#FFFFFF" colspan="2" height="27">修改数据库密码后,新密码立即生效,请妥善保管您的密码,切勿告诉他人。</td>
                                </tr>
                              </table>
                            </td>
                          </tr>
						  <% if g_sst=1 then %>
                          <tr> 
                            <td height="163"  valign="top"> <br>
                              <table align="center" border="0" cellpadding="4" cellspacing="1" width="100%" bordercolordark="#FFFFFF" bgcolor="#666666" >
                                <tr align="middle" bgcolor="#8b8b8b"> 
                                  <td colspan="3" height="22"> 
                                    <div align="center"><b><font color="#FFFFFF">FTP帐号</font></b></div>
                                  </td>
                                </tr>
                                <tr align="middle" bgcolor="#ffffff"> 
                                  <td height="22"  align=center width="25%">FTP服务器：</td>
                                  <td height="27" ><%=rs("sq_svrip")%></td>
                                  <td height="27" width="20%">&nbsp;</td>
                                </tr>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22"> 
                                    <div align="center">FTP用户名：</div>
                                  </td>
                                  <td bgcolor="#FFFFFF" height="27"><%=rs("sq_ftpusr")%></td>
                                  <td bgcolor="#FFFFFF"></td>
                                </tr>
                                <form action="sql_mng.asp" method=post>
                                  <tr> 
                                    <td bgcolor="#FFFFFF" height="22" align="center"> 
                                      FTP密&nbsp; 码： </td>
                                    <td bgcolor="#FFFFFF" height="27"> 
 <%
 
   wstr=getpassoutcode(rs("sq_ftppss"))
 
						  %>                                      <input class="input" name="sq_ftppss" size="30" value="<%=wstr%>" maxlength="17">
                                    </td>
                                    <td bgcolor="#FFFFFF"> 
                                       <input name="Cdrfd2" type="submit" value="修改"  class=dud_button1 onClick="javascript:return sql_ftppss_cfm();">
                                      <input type=hidden name="dbname" value="<%=dbname%>" >
                                      <input type=hidden name=module value=sql_ftppss>
                                    </td>
                                  </tr>
                                </form>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22">&nbsp;</td>
                                  <td bgcolor="#FFFFFF" colspan="2" height="27">修改FTP密码后,新密码立即生效,请妥善保管您的密码,切勿告诉他人。</td>
                                </tr>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22">&nbsp;</td>
                                  <td bgcolor="#FFFFFF" colspan="2" height="27">该FTP用户仅用于下载数据库备份文件之用。</td>
                                </tr>
                              </table>
                            </td>
                          </tr> <tr> 
                            <td height="163"  valign="top"> <br>
                              <table align="center" border="0" cellpadding="4" cellspacing="1" width="100%" bordercolordark="#FFFFFF" bgcolor="#666666" >
                                <tr align="middle" bgcolor="#8b8b8b"> 
                                  <td colspan="4" height="22"> 
                                    <div align="center"><b><font color="#FFFFFF">数据库备份</font></b></div>
                                  </td>
                                </tr>
                                <tr align="middle" bgcolor="#F3F3F3"> 
                                  <td height="22"  align=center>序号</td>
                                  <td height="27" align="center" > 备份操作</td>
                                  <td height="27" align="center"> 恢复操作</td>
                                  <td height="27" align="center">备份时间</td>
                                </tr>
                                <tr align="middle" bgcolor="#ffffff"> 
                                  <td height="22"  align=center width="25%">备份一</td>
                                   <form name=bkp1 method=post action="sql_mng.asp">
								   <td height="27" align="center" > 
								 
                                    <input name="Clear2" type="submit" value="执行备份"  class=dud_button1 onclick="javascript:return sql_bkp_cfm();">
									<input type=hidden name="module" value="sql_bkp">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="1">
									
                                  </td></form>
								  <form name=rst1 method=post action="sql_mng.asp">
								   <td height="27" align="center" > 
								 
                                    <input name="Clear2" type="submit" value="恢复数据库"  class=dud_button1 onclick="javascript:return sql_rst_cfm();">
									<input type=hidden name="module" value="sql_rst">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="1">
									
                                  </td></form>
                                  
                                  <td height="27"  align="center"><%=rs("sq_bkptme1")%></td>
                                </tr>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22"> 
                                    <div align="center">备份二</div>
                                  </td><form name=bkp2 method=post action="sql_mng.asp">
                                  <td bgcolor="#FFFFFF" height="27" align="center"> 
                                    
                                    <input name="Clear2" type="submit" value="执行备份"  class=dud_button1 onclick="javascript:return sql_bkp_cfm();">
									<input type=hidden name="module" value="sql_bkp">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="2">
									
                                  </td></form>
                                  <form name=rst2 method=post action="sql_mng.asp">
								    <td height="27" align="center" bgcolor="#FFFFFF" > 
                                      <input name="Clear2" type="submit" value="恢复数据库"  class=dud_button1 onclick="javascript:return sql_rst_cfm();">
									<input type=hidden name="module" value="sql_rst">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="2">
									
                                  </td></form>
                                  <td bgcolor="#FFFFFF" align="center"><%=rs("sq_bkptme2")%></td>
                                </tr>
                               
                                  <tr> 
                                    <td bgcolor="#FFFFFF" height="22" align="center"> 
                                      备份三</td>  <form name=bkp3 method=post action="sql_mng.asp">
                                    <td bgcolor="#FFFFFF" height="27" align="center"> 
                                    
                                    <input name="Clear2" type="submit" value="执行备份"  class=dud_button1 onclick="javascript:return sql_bkp_cfm();">
									<input type=hidden name="module" value="sql_bkp">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="3">
									
                                    </td></form>
                                    <form name=rst3 method=post action="sql_mng.asp">
								    <td height="27" align="center" bgcolor="#FFFFFF" > 
                                      <input name="Clear2" type="submit" value="恢复数据库"  class=dud_button1 onclick="javascript:return sql_rst_cfm();">
									<input type=hidden name="module" value="sql_rst">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="3">
									
                                  </td></form>
                                    <td bgcolor="#FFFFFF" align="center"><%=rs("sq_bkptme3")%></td>
                                  </tr>
                              
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22" align="center">备份四</td><form name=bkp4 method=post action="sql_mng.asp">
                                  <td bgcolor="#FFFFFF" align="center" height="27"> 
                                    
                                    <input name="Clear2" type="submit" value="执行备份"  class=dud_button1 onclick="javascript:return sql_bkp_cfm();">
									<input type=hidden name="module" value="sql_bkp">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="4">
									
                                  </td></form>
                                  <form name=rst4 method=post action="sql_mng.asp">
								    <td height="27" align="center" bgcolor="#FFFFFF" > 
                                      <input name="Clear2" type="submit" value="恢复数据库"  class=dud_button1 onclick="javascript:return sql_rst_cfm();">
									<input type=hidden name="module" value="sql_rst">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="4">
									
                                  </td></form>
                                  <td bgcolor="#FFFFFF" align="center" height="27"><%=rs("sq_bkptme4")%></td>
                                </tr>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22" align="center">备份五</td>  <form name=bkp5 method=post action="sql_mng.asp">
                                  <td bgcolor="#FFFFFF" align="center" height="27"> 
                                
                                    <input name="Clear2" type="submit" value="执行备份"  class=dud_button1 onclick="javascript:return sql_bkp_cfm();">
									<input type=hidden name="module" value="sql_bkp">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="5">
									
                                  </td></form>
                                <form name=rst5 method=post action="sql_mng.asp">
								    <td height="27" align="center" bgcolor="#FFFFFF" > 
                                      <input name="Clear2" type="submit" value="恢复数据库"  class=dud_button1 onclick="javascript:return sql_rst_cfm();">
									<input type=hidden name="module" value="sql_rst">
									<input type=hidden name="dbname" value="<%=dbname%>">
									<input type=hidden name="sq_bkpnum" value="5">
									
                                  </td></form>
                                  <td bgcolor="#FFFFFF" align="center" height="27"><%=rs("sq_bkptme5")%></td>
                                </tr>
                                <tr> 
                                  <td bgcolor="#FFFFFF" height="22" align="center">说明：</td>
                                  <td bgcolor="#FFFFFF" colspan="3" height="27">恢复备份时应该先停止数据库使用才可执行成功！</td>
                                </tr>
                              </table>
                            </td>
                          </tr>
						  <% end if %>
                        </table>
                        <% 
rs.close
%>
                      </td>
                    </tr>
                    <tr> 
                      <td height="4" width="99%" valign="top" bgcolor="#FFFFFF" >&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=sq_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
%>
                  <%
Sub SHOWSELECT_ftp(ftpstt)

%>
                  <select name=sq_ftpstt>
                    <option <%If ftpstt=1 Then Response.Write " selected value=x" %> value=1 >运行中</option>
                    <option <%If ftpstt=2 Then Response.Write " selected value=x" %> value=2 >暂停中</option>
                    <option <%If ftpstt=5 Then Response.Write " selected value=x" %> value=5>管理员停止</option>
                    <option <%If ftpstt=0 Then Response.Write " selected value=x" %> value=0>未开设</option>
                  </select>
                  <%

End sub
%>
                  <br>
                </td>
              </tr>
              </tbody> 
            </table>
          </TD>
        </TR>
        </TBODY> 
      </TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY> 
        <TR> 
          <TD bgColor=#cccccc><IMG height=1 
            src="/imgs/spacer.gif" 
      width=1></TD>
        </TR>
        </TBODY> 
      </TABLE>
	  <script>
	  function sql_regstt_cfm()
	  {
	  if(confirm("是否确认更改数据库状态！"))
      return true;
      else	  
	  return false;
	  }
	   function sql_pss_cfm()
	  {
	  if(confirm("是否确认更改数据库密码！"))
      return true;
      else	  
	  return false;
	  }
	   function sql_ftpstt_cfm()
	  {
	  if(confirm("是否确认更改FTP状态！"))
      return true;
      else	  
	  return false;
	  }
	  function sql_ftppss_cfm()
	  {
	  if(confirm("是否确认更改FTP密码！"))
      return true;
      else	  
	  return false;
	  }
	   function sql_bkp_cfm()
	  {
	  if(confirm("是否确认执行数据库备份！"))
      return true;
      else	  
	  return false;
	  }
	  function sql_rst_cfm()
	  {
	  if(confirm("是否确认执行数据库恢复！"))
      return true;
      else	  
	  return false;
	  }
	  </script>
      <!--#include virtual="/incs/web_bottom.asp"-->

