⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 login_manage.asp

📁 十分好的音乐网站源码 十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码
💻 ASP
字号:
<%
if session("cjuser")="" and session("pwdd")="" then
response.write"<SCRIPT language=JavaScript>alert('你没有登录,无权进入!');"
response.write"this.location.href='error.htm';</SCRIPT>" 
response.end 
end if
%>
<!--#include file=../conn/adodb1.asp -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<SCRIPT language=JavaScript>
function formCheck(document)
{
        if(document.t.value == "")
        {
        alert("您忘了填写网站调查标题了!");
        return false;
        }
        if(document.content1.value == "")
        {
        alert("至少点写一个调查内容!");
        return false;
        }
       
}
</SCRIPT>
<link href="css/main.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
   dim sql,rs
   set rs=server.createobject("adodb.recordset") 
   sql="select * from loging order by da desc"
   
	rs.open sql,db,1,1
	
if rs.recordcount >0 then
 
  %>
<table width="100%" border="0" cellpadding="0" cellspacing="1">
        <tr class="fenlei" > 
  <td align="center"><strong> 编码</strong></td>
  <td align="center" ><strong>用户名</strong></td>
  <td align="center" ><strong>IP地址</strong></td>
  <td align="center" ><strong>登陆时间</strong></td>
  <td align="center" ><strong>权限</strong></td>
  <td align="center"><strong>删除</strong></td>
  </tr>
    <%
if not isempty(request("page")) then   
pagecount=cint(request("page"))   
else   
pagecount=1
end if
rs.pagesize=16
rs.AbsolutePage=pagecount
do while not rs.eof
%>
  <tr bgcolor="#FFFFFF" class="font10" 
  onmouseover="this.style.backgroundColor = '#F7FBFF'" 
  onmouseout="this.style.backgroundColor = '#FFFFFF'" width="100%">
  <td height="25" align="center"><%=rs("id")%></td>
  <td height="25" align="center"><%=rs("uid")%></td>
  <td height="25" align="center"><%=rs("ip")%></td>
  <td height="25" align="center"><%=rs("da")%></td>
  <td height="25" align="center"><%=rs("jb")%></td>
  <td height="25" align="center"><a href="login_del.asp?id=<%=rs("id")%>" >删除</a></td>
  </tr>        
  </tr>        
   <%
rs.movenext
i=i+1                                                                     
if i>=rs.pagesize then exit do                                                           
loop
%>
          <tr bgcolor="#FFFFFF" class="font10"> 
            <td height=23 colspan=6 align=center>
			<div align="center">页次: <b><font color=red><%=pagecount%></font>/<%=rs.pagecount%></b> 
              <% if pagecount=1 and rs.pagecount<>pagecount and rs.pagecount<>0 then%>
              <a href="login_manage.asp?page=<%=cstr(pagecount+1)%>" class="z"> <font color="#000000">下一页</font></a> 
              <% end if %>
              <% if rs.pagecount>1 and rs.pagecount=pagecount then %>
              <a href="login_manage.asp?page=<%=cstr(pagecount-1)%>" class="z"> <font color="#000000">上一页</font></a> 
              <%end if%>
              <% if pagecount<>1 and rs.pagecount<>pagecount then%>
              <a href="login_manage.asp?page=<%=cstr(pagecount-1)%>" class="z"> <font color="#000000">上一页</font></a> 
              <a href="login_manage.asp?page=<%=cstr(pagecount+1)%>" class="z"> <font color="#000000">下一页</font></a> 
              <% end if
			  %>
            </div>	</td>
  </tr>
   
   
</table>
  <br>
<%

else
response.write "没有任何数据!"
end if
	  rs.close
set rs=nothing
%>
<br>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -