📄 user_moredisplay.asp
字号:
<!--#include file="../Include/AdoConn.asp"-->
<%
UserCode=request.querystring("Code")
StrSQL="select * from XT_VC_User where 用户编码='"&UserCode&"'"
set objres=server.CreateObject ("adodb.recordset")
objres.Open strsql,strconn
if not objres.EOF then
%>
<html>
<head>
<title>用户详细资料</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF" text="#000000" >
<table style="font-size:9pt" width=460 border=1 cellspacing=0 cellpadding=5 bordercolor=#003399 bordercolorlight="#003399" bordercolordark="#FFFFFF">
<tr>
<td height=25 bgcolor="#ECF5FF" width="54">用户类型</td>
<td height=25 bgcolor="#FFFFFF" colspan="3"><%=objres("用户类型")%></td>
</tr>
<tr>
<td height=25 bgcolor="#ECF5FF" width="54">用户编码</td>
<td height=25 bgcolor="#FFFFFF" width="150"><%=objres("用户编码")%></td>
<td height=25 bgcolor="#ECF5FF" width="55">名称</td>
<td height=25 bgcolor="#FFFFFF" width="151"><%=objres("用户姓名")%></td>
</tr>
<%if left(objres("用户编码"),3)="Kjj" then%>
<tr>
<td height=25 bgcolor="#ECF5FF" width="54">部门</td>
<td height=25 bgcolor="#FFFFFF" colspan="3"><%=objres("部门名称")%></td>
</tr>
<%end if%>
<%if objres("用户类型")="企业" then%>
<tr bgcolor="#FFFFFF">
<td height=4 width="54" bgcolor="#ECF5FF">企业用户<br>
联系人</td>
<td height=4 colspan="3" bgcolor="#FFFFFF"><%=objres("企业联系人")%></td>
</tr>
<%end if%>
<%if objres("用户类型")="个人" then%>
<tr bgcolor="#FFFFFF">
<td height=4 width="54" bgcolor="#ECF5FF">性别</td>
<td height=4 width="150" bgcolor="#FFFFFF"><%=objres("性别")%></td>
<td height=4 width="55" bgcolor="#ECF5FF">出生年份</td>
<td height=4 width="151" bgcolor="#FFFFFF"><%=objres("出生年份")%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height=4 width="54" bgcolor="#ECF5FF">职称</td>
<td height=4 width="150" bgcolor="#FFFFFF">
<%if len(objres("职称"))=0 or isnull(objres("职称"))then response.write "无" else response.write objres("职称")%>
</td>
<td height=4 width="55" bgcolor="#ECF5FF">学历</td>
<td height=4 width="151" bgcolor="#FFFFFF">
<%if len(objres("学历"))=0 or isnull(objres("学历")) then response.write "无" else response.write objres("学历")%>
</td>
</tr>
<tr>
<td height=25 bgcolor="#ECF5FF" width="54">职位</td>
<td height=25 bgcolor="#FFFFFF" width="150">
<%if len(objres("职位"))=0 or isnull(objres("职位")) then response.write "无" else response.write objres("职位")%>
</td>
<td height=25 bgcolor="#ECF5FF" width="55"> </td>
<td height=25 bgcolor="#FFFFFF" width="151"> </td>
</tr>
<%end if%>
<tr>
<td height=4 width="54" bgcolor="#ECF5FF">家庭电话</td>
<td height=4 width="150" bgcolor="#FFFFFF"><%if len(objres("家庭电话"))=0 or isnull(objres("家庭电话"))then response.write "无" else response.write objres("家庭电话")%></td>
<td height=4 width="55" bgcolor="#ECF5FF">办公电话</td>
<td height=4 width="151" bgcolor="#FFFFFF">
<%if len(objres("办公电话"))=0 or isnull(objres("办公电话")) then response.write "无" else response.write objres("办公电话")%>
</td>
</tr>
<tr>
<td height=25 bgcolor="#ECF5FF" width="54">移动电话</td>
<td height=25 bgcolor="#FFFFFF" width="150">
<%if len(objres("移动电话"))=0 or isnull(objres("移动电话")) then response.write "无" else response.write objres("移动电话")%>
</td>
<td height=25 bgcolor="#ECF5FF" width="55">传真</td>
<td height=25 bgcolor="#FFFFFF" width="151">
<%if len(objres("传真"))=0 or isnull(objres("传真")) then response.write "无" else response.write objres("传真")%>
</td>
</tr>
<tr>
<td width="54" bgcolor="#ECF5FF">E-mail</td>
<td colspan="3" bgcolor="#FFFFFF">
<%if len(objres("email"))=0 or isnull(objres("email")) then response.write "无" else response.write objres("email")%>
</td>
</tr>
<tr>
<td height=25 bgcolor="#ECF5FF" width="54">通讯地址</td>
<td height=25 bgcolor="#FFFFFF" colspan="3">
<%if len(objres("通讯地址"))=0 or isnull(objres("通讯地址")) then response.write "无" else response.write objres("通讯地址")%>
</td>
</tr>
<tr>
<td height=4 width="54" bgcolor="#ECF5FF">邮编</td>
<td height=4 width="150" bgcolor="#FFFFFF">
<%if len(objres("邮编"))=0 or isnull(objres("邮编")) then response.write "无" else response.write objres("邮编")%>
</td>
<td height=4 width="55" bgcolor="#ECF5FF">有效标志</td>
<td height=4 width="151" bgcolor="#FFFFFF"><%if objres("有效标志")="1" then response.write "有效" else response.write "无效" end if%></td>
</tr>
</table>
<br>
<a href="javascript:window.close()"><img src="../public/images/close.gif" width="50" height="18" border="0"></a>
</body>
</html>
<%end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -