kesion科讯V4.0管理员Key工具(5)

              <script src="http://www.kesion.com/websystem/showver.asp"></script>            </TH>
        </TR>
      </TBODY>
    </TABLE>      </td>
  </tr>
  <tr>
    <td width="682" height="30" align="center" bgcolor="#333399">
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td> </td>
        <td align="center"><span class="STYLE1"><strong>KesionCMS V4.0 Key管理员工具</strong></span></td>
      </tr>
    </table></td>
  </tr>

  <tr bgcolor="#F0F0F0"  id="ShowSetup">
    <td height="250">
      <div style="color:red;font-weight:bold;text-align:center;padding:5px;">温馨提示：为了系统的安全，请使用后一定要删除该文件。</div>
    <br>

     <%select case request("action")
        case "AddAdmin"
         Call AddAdmin()
        Case "AddSave"
         Call SaveInfo()
        Case "EditAdmin"
         Call EditAdmin()
        Case "EditSave"
         Call EditSave()
        Case "EditSiteSN"
         Call EditSiteSN()
        Case "EditSN"
         Call EditSN()
        Case "Del"
              CurrPath = KS.Setting(3) 
             Call KS.DeleteFile(CurrPath&"key.asp")  
             Response.Redirect KS.Setting(89) & "Login.asp"