📄 informanage.asp
字号:
<%
dim a,b
a=session("id")
b=session("password")
if a="" and b="" then
session("login")="1"
response.redirect"index.asp"
else
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db/gzglxt.mdb")
exec="select * from 员工信息,部门设置 where 员工编号='"&a&"'and 员工信息.部门编号=部门设置.部门编号"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
end if
%>
<TITLE>员工信息查询</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2600.0" Name=GENERATOR>
<link href="home.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY text=#000000 bgColor=#ffffff leftMargin=0 topMargin=0>
<!--#include file="indextop.asp"-->
<TABLE width=760 border=0 align="center" cellPadding=0 cellSpacing=0>
<TR>
<TD>您现在的位置：<a href="Index.asp"> 工资管理系统 </a>>>> <a href="#">信息查询</a></TD>
<TD width="150" align="right" valign="middle"> <script language=JavaScript src="images/date.js"></script>
</TD>
<TD width="26"><IMG height=16 src="images/wan.gif" width=26></TD>
<TD width="170" bgColor=#e2e2e1></TD>
</TR>
</TABLE>
<table width="760" height="313" border="1" bordercolor='#006699' align="center" cellpadding="0" cellspacing="0">
<tr>
<TD width=5 rowspan="18" background="images/dotLine_h.gif"><IMG src="images/shim(1).gif" width=1></TD>
<td width="78" rowspan="18" valign="top" bgcolor="#EFEFEF"><img src="images/InfoManage_left.gif" width="78" height="313"></td>
<td colspan="2" valign="top"> 以下是您在本公司的信息:
<TD width=5 rowspan="18" background="images/dotLine_h.gif"><IMG src="images/shim(1).gif" width=1></TD>
</tr>
<td valign="top">姓名
<td width="388" valign="top"><%=rs("姓名")%> </tr>
<tr>
<td valign="top">部门名称
<td valign="top"><%=rs("部门名称")%> </tr>
<tr>
<td valign="top">职位
<td valign="top"><%=rs("职务")%> </tr>
<tr>
<td valign="top">性别
<td valign="top"><%=rs("性别")%> </tr>
<tr>
<td valign="top">民族
<td valign="top"><%=rs("民族")%> </tr>
<tr>
<td valign="top">出生年月
<td valign="top"><%=rs("出生年月")%> </tr>
<tr>
<td valign="top">住址
<td valign="top"><%=rs("住址")%> </tr>
<tr>
<td valign="top">政治面貌
<td valign="top"><%=rs("政治面貌")%> </tr>
<tr>
<td valign="top">电话
<td valign="top"><%=rs("电话号码")%> </tr>
<tr>
<td valign="top">籍贯
<td valign="top"><%=rs("籍贯")%> </tr>
<tr>
<td valign="top">入部门时间
<td valign="top"><%=rs("入部门日期")%> </tr>
<tr>
<td valign="top">查询密码
<td valign="top"><%=rs("密码")%> </tr>
<tr>
<td valign="top">查询权限
<td valign="top"><%if rs("权限")="1|1" then response.write"管理员" else response.write"员工" end if%> </tr>
<tr>
<td height="32" valign="top">备注
<td valign="top"><%=rs("备注")%> </tr>
<tr>
<td valign="top">
<td valign="top"> </tr>
<tr>
<TD height="3" colspan="6" background="images/dotLine_w.gif"><IMG height=1 src="images/shim(1).gif" width=100></TD>
</tr>
</table>
<table width="753" height="13" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="749">
<Iframe src="CopyRight.asp" width="760" height="200" marginheight="0" marginwidth="0" scrolling="NO" frameborder="0" name="CopyRight"></iframe>
</td>
</tr>
</table></BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -