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

📄 mperson.asp

📁 数据库应用技术的实验代码及相关文档,供有需要的人使用
💻 ASP
字号:
<% Response.Buffer=True %>
<!--#include file="../inc/admin.inc"-->
<% key=trim(request("key")) 
if request("del")<>"" then 
conn.Execute("delete from person where uname='"&request("del")&"'")
conn.Execute("delete  from pmailbox where reid='"&request("del")&"'")
conn.Execute("delete  from pfavorite where uname='"&request("del")&"'")
conn.Execute("delete  from cfavorite where fuid='"&request("del")&"'")
end if %>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<link rel="stylesheet" href="../inc/index.css" type="text/css">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>学生社会实践信息管理系统—&gt;人才中心—&gt;管理个人用户</title>
</head>
<SCRIPT LANGUAGE="JavaScript">
<!--//
function check()
{
   if (isNaN(go2to.page.value))
		alert("请正确填写转到页数!");
   else if (go2to.page.value=="") 
	     {
		alert("请输入转到页数!");
		 }
   else
		go2to.submit();
}
//-->
</SCRIPT>
<SCRIPT language=JavaScript src="../inc/window.js"></SCRIPT>
<body topmargin="0" leftmargin="0">

  <table border="0" cellpadding="0" cellspacing="0" width="780" height="450">
    <tr>
      <td width="778" height="14" valign="top" colspan="3" bgcolor="#396BA5"></td>
    </tr>
  <tr>
    <td valign="top" height="424" width="176" bgcolor="#E1E1E1">
       
      <div align="center">
        <center>
        <table border="0" cellpadding="0" cellspacing="0" width="118" background="../images/stat-bg.GIF">
          <tr>
            <td height="34">
      <p align="center">
      <a href="mnews.asp">
      新闻管理</a>
            </td>
          </tr>
          <tr>
            <td height="29">
      <p align="center"><a href="mperson.asp">管理个人用户</a>
            </td>
          </tr>
          <tr>
            <td height="34">
      <p align="center"><a href="mcompany.asp">管理单位用户</a>
            </td>
          </tr>
          
          <tr>
            <td height="28">
      <p align="center"><a href="exit.asp">退出登录</a>
            </td>
          </tr>
        </table>
        </center>
      </div>
      <p align="center"> 
    </td>
    <td valign="top" height="424" width="1" bgcolor="#396BA5">
     
    </td>
     <% set rs=server.createobject("adodb.recordset") 
     if not isempty(request("page")) then   
     pagecount=cint(request("page"))   
     else   
     pagecount=1   
     end if
     sql="select * from person where uname + iname like '%"&key&"%' order by id desc" 
	 rs.open sql,conn,1,1   
     if rs.eof and rs.bof then   
     response.write"<SCRIPT language=JavaScript>alert('对不起,没有符合搜索条件的记录!');"
     response.write"javascript:history.go(-1)</SCRIPT>"      
     end if
     rs.pagesize=10
     if pagecount>rs.pagecount or pagecount<=0 then              
     pagecount=1              
     end if              
     rs.AbsolutePage=pagecount %>   
	
	<td valign="top" height="424" width="602">
    <div align="center">
      <center>
      <table border="1" cellpadding="0" cellspacing="0" width="545" bordercolor="#FFFFFF" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">
        <tr>
          <td height="1" colspan="7" valign="bottom" width="541"><font color="#000000">&nbsp;</font></td> 
        </tr>
        <tr>
		   <% if rs.pagecount=1 then %>
		   <td width="541" height="6" colspan="7" valign="bottom">
          <font color="#000000">共有[<font color="#ff0000"><%=rs.recordcount%></font>]位个人用户符合条件                      
		  以下是[<font color="red">1~<%=rs.recordcount%></font>]条</font></td>             
        </tr>
        <tr>
          <td width="541" height="7" colspan="7" valign="bottom"></td>
        </tr>
        <%else%>
		<tr>
		 <td width="541" height="6" colspan="7" valign="bottom"><font color="#000000">
		 <% page_start=(pagecount-1)*rs.pagesize
            if pagecount=1 then page_start=1
		    page_end=rs.pagesize*pagecount
		    if pagecount*rs.pagesize=>rs.recordcount then page_end=rs.recordcount end if%>
         共有[<font color="#ff0000"><%=rs.recordcount%></font>]位个人用户符合条件                        
         以下是[<font color="red"><%=page_start%>~<%=page_end%></font>]条</font></td>          
        </tr>
        <tr>
		  <td width="541" height="6" colspan="7" valign="bottom">
		  <% response.write"<form name=go2to form method=Post action='mperson.asp?key="+key+"'>"
		     response.write "<font color='#000064'>◆&nbsp;</font>"                                              
		     if pagecount=1 then                                                        
			 response.write "<font color='#000064'>首页 上一页</font>&nbsp;"
			 else                                                        
             response.write "<a href=mperson.asp?page=1&key="+key+"><font color='0000BE'>首页</font></a>&nbsp;" 
	         response.write "<a href=mperson.asp?page="+cstr(pagecount-1)+"&key="+key+"><font color='0000BE'>上一页</font></a>&nbsp;"
			 end if                                             
             if rs.PageCount-pagecount<1 then                                                        
             response.write "<font color='#000064'>下一页 尾页</font>"                                                    
			 else                                                        
             response.write "<a href=mperson.asp?page="+cstr(pagecount+1)+"&key="+key+"><font color='0000BE'>下一页</font></a>&nbsp;"
			 response.write "<a href=mperson.asp?page="+cstr(rs.PageCount)+"&key="+key+"><font color='0000BE'>尾页</font></a>"           
             end if 
			 response.write "<font color='000064'>&nbsp;页次:<font color=blue>"&pagecount&"</font>/"&rs.pagecount&"页</font>" 
			response.write "<font color='000064'> 转到第<input type='text' name='page' size=2 maxLength=3 style='font-size: 9pt; color:#00006A; position: relative; height: 18' value="&PageCount&">页</font>&nbsp;"                               
			response.write "<input class=button type='button' value='确 定' onclick=check() style='font-family: 宋体; font-size: 9pt; color: #000073; position: relative; height: 19'>" %>         
             </td>
        </tr>
      </form>
	  <%end if%>
	  <tr>
      <td height="3" valign="top" colspan="7" bgcolor="#000000" width="541">
      </td>
        </tr>
      </center>
        <tr>
          <td width="73" height="18" bgcolor="#EBEEF3" valign="bottom">
            <p align="left">&nbsp;UserID</p>
          </td>
      <center>
          <td width="69" height="18" bgcolor="#EBEEF3" valign="bottom">&nbsp;姓名</td>
          <td width="41" height="18" bgcolor="#EBEEF3" valign="bottom">
            <p align="center">性别</td>
          <td width="49" height="18" bgcolor="#EBEEF3" valign="bottom">
            <p align="center">学历</td>
          <td width="160" height="18" bgcolor="#EBEEF3" valign="bottom">&nbsp;应聘职位</td>
          <td height="18" bgcolor="#EBEEF3" valign="bottom" width="80"><p align="center">发布日期</p></td>
          <td height="18" bgcolor="#EBEEF3" valign="bottom" width="57">
            <p align="center">- 删除 -</td>  
        </tr>
         <% do while not rs.eof %> 
		<tr>
      <td width="73" height="18" bgcolor="#EBEEF3" valign="bottom">&nbsp;<%=rs("uname")%></td>
  <td width="69" height="18" bgcolor="#EBEEF3" valign="bottom">&nbsp;<% if rs("iname")<>"" then%><a href="javascript:openwin('../person.asp?uid=<%=rs("uname")%>','top=10,left=300,width=460,height=420')"><%=rs("iname")%></a><%else response.write"[未登录]" end if%></td>
          <td width="41" height="18" bgcolor="#EBEEF3" valign="bottom"><p align="center">[<%=rs("sex")%>]</p></td>
          <td width="49" height="18" bgcolor="#EBEEF3" valign="bottom"><p align="center">[<%=rs("edu")%>]</p></td>
          <td width="160" height="18" bgcolor="#EBEEF3" valign="bottom">&nbsp;<% if rs("job")<>"" then%><%=rs("job")%><%else response.write"[未登录]" end if%></td>
          <td width="80" height="18" bgcolor="#EBEEF3" valign="bottom"><p align="center">[<% if rs("idate")<>"" then%><%=rs("idate")%><%else response.write"未登录" end if%>]</p></td>
          <td width="57" height="18" bgcolor="#EBEEF3" valign="bottom">
            <p align="center"><font color="#000046">[</font><a href="mperson.asp?del=<%=rs("uname")%>&key=<%=key%>"><font color="#000046">删除</font></a><font color="#000046">]</font></td>
        </tr>
        <% i=i+1                                                                                                  
          rs.movenext                                                                                                  
          if i>=rs.PageSize then exit do 
		  loop                                                                    
          rs.close                                                                                                
          set rs=nothing                                                                                                
          conn.close                                                                                                
          set conn=nothing %>
		<tr>
      <td height="3" valign="top" colspan="7" bgcolor="#000000" width="541">
      </td>
        </tr>
      </center>
        <tr>
          <td height="8" valign="bottom" colspan="7" width="541">
            <form action="mperson.asp" method=post>
            <p align="center"><br>
            <font color="#000000">个人用户搜索: </font><INPUT                 
                  maxLength=20 size=16 name="key" style="background-color: #EBEBEB; color: #00006A; font-family: 宋体; font-size: 9pt" value="请输入关键字-S" onClick="Javascript:this.value='';">&nbsp;  
            <input type="submit" value="搜 索" style="font-family: 宋体; font-size: 9pt; color: #00006A">
            <br>
            <br>
      <center>
      [<a href="javascript:openwin('sendsysmail.asp?stype=person','top=20,left=200,width=450,height=400')"><font color="#000060">向所有个人用户发送站内信件</font></a>]</center>
      </form>
          </td>
        </tr>
      </table>
    </div>
    </td>
  </tr>
    <tr>
    <td valign="top" height="12" width="780" bgcolor="#396BA5" colspan="3">
       
    </td>
    </tr>
  </table>
</body>

</html>

⌨️ 快捷键说明

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