inc_login.asp

旋木留言本 v1.51 主要功能： UBB代码支持

<%
'**************************************
'**    Inc_login.asp
'**
'** 文件说明：留言本登陆条
'** 修改日期：2004-9-22
'** 作者：Howlion
'** Email：[e-mail]
'**************************************
%>
<script language="JavaScript">
<!--
function checkform(){
if (document.form1.adminname.value.length==0){
alert("请输入您的用户名！");
document.form1.adminname.focus();
return false;
}
if (document.form1.adminpass.value.length==0){
alert("请输入您的密码！");
document.form1.adminpass.focus();
return false;
}
return true
}
//-->
</script>

<%
sql="Select id from topic order by usertime desc"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1

dim totalrec
totalrec=rs.recordcount
%>

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="30">

<%if not session("login")="true" then%>
<form method='POST' action='Admin.asp?act=admchk' name='form1' id='form1' onSubmit='return checkform()'>
  <tr>
    <td valign="middle" style="border-bottom: 1px solid #969696; FILTER: progid:DXImageTransform.Microsoft.Gradient(startColorStr='#F1F1F1', endColorStr='#FFFFFF', gradientType='1'">&nbsp;&nbsp;欢迎来到&nbsp;<B><a href="<%=url%>"><%=site%></a></B>&nbsp;&nbsp;管理员：<b><A HREF="mailto:<%=adminmail%>"><%=name%></A></b>&nbsp;&nbsp;密码：<input type=password name='adminpass' size=8><input type="submit" value="管理登陆">&nbsp;&nbsp;&nbsp;访问统计：<b><%=stat%></b>&nbsp;次，&nbsp;&nbsp;留言总数：<b><%=totalrec%></b>&nbsp;条</td>
  </tr></form>
<%
else
%>
  <tr>
    <td valign="middle" colspan="2" style="border-bottom: 1px solid #969696; FILTER: progid:DXImageTransform.Microsoft.Gradient(startColorStr='#F1F1F1', endColorStr='#FFFFFF', gradientType='1'">&nbsp;&nbsp;&nbsp;欢迎&nbsp;<b><%=name%></b>&nbsp;进行留言管理&nbsp;&nbsp;┃<a href="Bulletin.asp">发布公告</a>┃<a href="Index.asp">管理留言</a>┃<a href="Admin.asp?act=main">设置留言本</a>┃<a href="Admin.asp?act=logout"><FONT COLOR="red"><B>退出登陆</B></FONT></a>┃&nbsp;&nbsp;访问统计：<b><%=stat%></b>&nbsp;次，&nbsp;&nbsp;留言总数：<b><%=totalrec%></b>&nbsp;条
	</td>
  </tr>
<%
end if
%>
</table>