📄 personcx.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../adovbs.inc" -->
<!--#include file ="../Connections/auto.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/MainBorder.css" rel="stylesheet" type="text/css">
<title>信息显示</title>
<style type="text/css">
<!--
.STYLE5 {color: #FFFFFF}
-->
</style>
<style type="text/css">
<!--
td { font-family: "宋体"; font-size: 9pt}
body { font-family: "宋体"; font-size: 9pt}
select { font-family: "宋体"; font-size: 9pt}
A {text-decoration: none; color: #336699; font-family: "宋体"; font-size: 9pt}
A:hover {text-decoration: underline; color: #FF0000; font-family: "宋体"; font-size: 9pt}
-->
</style>
</head>
<style type="text/css">
<!--
#f1 {
position: relative;
top: 10px;
left: 430px;
width: 80px;
}
#f2 {
position: relative;
top: -31px;
left: 510px;
width: 80px;
}
-->
</style>
<style type="text/css">
<!--
table {
font-family: Arial, Helvetica, sans-serif;
font-size: 12px;
color: #000000;
font-style: normal;
text-align: center;
}
#title {
font-size: 24px;
}
#di{
text-align:right;
font-family:Arial, Helvetica, sans-serif;
font-size:12px
}
.tddown {
border-top-style: solid;
border-right-style: solid;
border-bottom-style: solid;
border-left-style: solid;
border-top-color: #666666;
border-right-color: #FFFFFF;
border-bottom-color: #FFFFFF;
border-left-color: #666666;
margin: 0px;
padding: 0px;
border-top-width: 1px;
border-right-width: 1px;
border-bottom-width: 1px;
border-left-width: 1px;
}
.style2 {font-family: "华文中宋", "宋体"; }
.STYLE7 {color: #0000FF}
-->
</style>
<script language="vbscript">
sub OK()
change.tfield.value=""
change.tfield.focus()
end sub
</script>
<script language="vbscript">
sub del_onclick()
yes =window.confirm("是否要删除此人信息！？")
if yes = true then
form2.submit()
end if
end sub
</script>
<body >
<%
temp=request.form("tfield")
lx=request.form("radiobutton")
if temp<>"" and lx<>"" then
session("tj")=temp
session("lx")=lx
end if
%>
<%
set RS = server.CreateObject("ADODB.Recordset")
if temp<>"" and lx<>"" then
Sname = "select * from Login , Message where Message."& lx & " like '%"& temp & "%'and Login.ID=Message.ID and position='jingli'"
else
Sname = "select * from Login , Message where Message."& session("lx") & " like '%"& session("tj") & "%'and Login.ID=Message.ID and position='jingli'"
end if
RS.open Sname , CN,1,3
if RS.eof then
response.Redirect("change.htm")
end if
%>
<table width="200" border="0">
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
</table>
<table width="695" height="133" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#D4D0C8">
<tr>
<td height="27" colspan="8" ><div class="style2 STYLE3 STYLE1" id="title" >
<div align="center" class="STYLE7"> 高级员工信息</div>
<input type="hidden" name ="tfield" vlue=<%=temp%>><input type="hidden" name="radiobutton" value=<%=lx%>>
</div></td>
</tr>
<tr class="but">
<td width="61" height="35" align="right" class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but'">员工编号</td>
<td width="56" align="left " class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but'">员工姓名</td>
<td width="90" align="left " class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but01'">部门职务</td>
<td width="74" align="left " class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but01'">家庭电话</td>
<td width="94" align="left " class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but01'">手机号码</td>
<td width="76" align="left " class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but01'">家庭住址</td>
<td width="106" align="left " class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but01'">执行操作</td>
<td width="120" align="left " class="but01" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but01'">执行操作</td>
</tr>
<%
RS.movefirst
RS.pagesize=5
page=CLng(Request("page"))
if page<1 then page=1
RS.absolutepage=page
for i=1 to RS.pagesize
if not RS.eof then
%>
<!--#include file ="../Connections/xuanze.asp"-->
<tr bgcolor="#FFFFF4">
<td height="31" align="right" class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'"><a href="#" onClick="JavaScript:window.open('../Personal.asp?Rid=<%=RS("id") %>','','width=580,height=350,top=150,left=150')"> <% response.write(RS("ID"))%></a>
</td>
<td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'">
<% response.write(RS("Name"))%></td>
<td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'">
<% response.write(Part)%>
<% response.write(Position)%>
</td>
<td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'">
<% response.write(RS("HomeTel"))%>
</td>
<td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'">
<% response.write(RS("Tel"))%>
</td>
<td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'"> <% response.write(RS("Address"))%>
</td>
<td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'" ><input name="Submit22" type="button" class="s04" onClick="JavaScript:window.open('../Personchange.asp?RName=<%=RS("ID") %>','','width=450,height=430,top=150,left=350')" value="修改信息"></td>
<td class="but1" onMouseDown="this.className='tddown'" onMouseUp="this.className='but'" onMouseOut="this.className='but1'"><input name="Submit2" type="button" class="s04" onClick="JavaScript:window.open('../changed.asp?Rid=<%=RS("ID") %>','','width=200,height=180,top=150,left=350')" value="删除信息">
</td></tr>
<%
end if
if not RS.eof then
RS.movenext
else
exit for
end if
next
'RS.close
%>
<tr >
<th height="27" colspan="8">
<div id="di"> <span class="STYLE5">
<% if page<>1 then %>
当前<%=page%>页<a href=<%=path%>?page=1 >第一页</a>
<a href=../<%=path%>?page=<%=(page-1)%>>上一页</a></span>
<span class="STYLE5">
<%end if
if page<>RS.pagecount then %>
当前<%=page1%>页</span> <span class="STYLE5"><a href=../<%=path%>?page=<%=(page+1)%> >下一页</a>
<a href=../<%=path%>?page=<%=RS.pagecount%> >最后一页</a></span>
<%end if %>
</div></th>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -