access.asp

新闻管理系统,管理员登陆后能够实现对新闻的添加,删除以及更新等功能,操作比较简单,但是很方便

<!--#include file="conn.asp"-->
<!--#include file="data.asp"-->
<!--#include file="char.asp"-->
<!--#include file="header.inc"-->

<%
'#####################################################
'## Copyright (C) 2003, Patron Saint Studio
'## For support, please visit http://3gu.tea8.com
'## Script Edit:y3gu
'#####################################################

if session("status")="login" then
%>
<BR><BR><BR><BR>
<form action=access_ad.asp>
<table width="470" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <th height=25 align="left" colspan=2>压缩数据库</th>
  </tr>
   <tr>
<td width="30%">数据库路径： </td>
<td width="70%">
<input size="30" name="dbpath" value="<%=dbx%>"></td>
</tr>
<tr>
<td width="30%">数据库格式：</td>
<td width="70%"><input type="radio" value="True" name="boolIs97" id=boolIs97><label for=boolIs97>Access 97</label>　<input type="radio" value="" name="boolIs97" checked id=boolIs97_1><label for=boolIs97_1>Access 2000、2002、2003</label></td>
</tr>
<tr>
<td width="100%" align="center" colspan="2" Class="TableTitle2" height=25>
<input type="submit" value=" 压 缩 " name="Submit"></td>
</tr>


</td></tr></table>
</form>
<BR><BR><BR><BR>
<%
Else
Response.Redirect "INDEX.asp"
End If
%>

<!--#include file="footer.inc"-->