backup.asp

同学录的设计

<!--#include file=../../INC/txlconst.asp-->
<!--#include file=../../INC/txlfun.asp-->

<%
Dim const_txl_HomeUrl
const_txl_HomeUrl = "../../"
%>
<!--#include file=../checkadmin.asp-->
<%
OpenDataBase
txl_SiteHead const_txlname&"- 管理员"
showspace
CloseDataBase
SiteBottom
Response.End()
sub showspace
%>
<br>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td height="20"> <p> <a href=../help.htm><%=const_txlname%>管理系统</a> &gt;&gt; 
        <a href="../help.htm">管理首页</a>&gt;&gt;<a href="backup.asp">在线备份数据库</a><br>
        <br>
        <font color="#FF0000">如果数据库扩展名不是.mdb的形式,备份数据库将无法完成,请在ftp下面进行 </font><br>
        <br>
        <%
		Response.Write("当前同学录数据库存放地址为:<a href='"&const_txl_HomeUrl&const_AccessDatabase&"'><font color=red>数据库存放地址</font></a>,请点击右键->目标另存为")  
	  %>
      <p></p></td>
  </tr>
</table>
<%end sub%>