?? 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 + -