?? showuser.asp
字號:
<!--#include file="../inc/function.asp"-->
<!--#include file="../inc/md5.asp"-->
<!--#include file="../inc/ChkPurview.asp"-->
<%
Dim id
id = Request("ID")
if id="" then
Call Msg("非法參數",1,"")
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用戶資料</title>
<link href="../css/mobile_sale.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
<tr class="topbg">
<td height="22" colspan="2" align="center">用戶管理</td>
</tr>
<tr class="tdbg">
<td width="70" height="30"><strong>管理導航:</strong></td>
<td height="30"> <a href="ShowUser.asp?ID=<%=id%>">個人資料</a> | <a href="Mpwd.asp?ID=<%=id%>">修改資料</a> | <a href="LogUser.asp?ID=<%=id%>">訪問日志</a> </td>
</tr>
</table>
<br>
<%
Sql = "Select * from T_User where UserID="&Cstr(ID)&""
Call Sql_Open(Rs,Sql,Conn,1,1)
if Rs.eof and Rs.bof then
Response.write"沒有"
else
%>
<table width="60%" border="0" align="center" cellpadding="2" cellspacing="1" class="border" >
<tr class="title">
<td height="22" colspan="2"> <div align="center">用戶資料</div></td>
</tr>
<tr class="tdbg">
<td width="25%" class="tdbg">用戶名</td>
<td class="tdbg"><%=Rs("UserName")%></td>
</tr>
<tr class="tdbg">
<td class="tdbg">真實姓名</td>
<td class="tdbg"><%=Rs("UserTrueName")%></td>
</tr>
<tr class="tdbg">
<td class="tdbg">E-mail</td>
<td class="tdbg"><%=Rs("UserEmail")%></td>
</tr>
<tr class="tdbg">
<td class="tdbg">電話</td>
<td class="tdbg"><%=Rs("UserTEL")%></td>
</tr>
<tr class="tdbg">
<td class="tdbg">傳真</td>
<td class="tdbg"><%=Rs("UserFax")%></td>
</tr>
<tr class="tdbg">
<td class="tdbg"> 庫存警戒線 </td>
<td class="tdbg"><%=Rs("UserProSave")%></td>
</tr>
<tr class="tdbg">
<td class="tdbg">組</td>
<td class="tdbg"><%
if Rs("UserGID")=5 then
Response.write "省級用戶"
elseif Rs("UserGID")=6 then
Response.write "市級用戶"
elseif Rs("UserGID")=7 then
Response.write "縣級用戶"
elseif Rs("UserGID")=8 then
if Rs("CountyID")=0 then
Response.write "市分銷點用戶"
else
Response.write "縣分銷點用戶"
end if
end if
%></td>
</tr>
<tr class="tdbg">
<td class="tdbg">用戶權限</td>
<td class="tdbg">
<%
if Rs("UserPower") ="A" then
Response.write "超級用戶"
elseif Rs("UserPower") ="B" then
Response.write "審核用戶"
elseif Rs("UserPower") ="C" then
Response.write "普通用戶"
end if
%>
</td>
</tr>
<tr class="tdbg">
<td class="tdbg">加入時間</td>
<td class="tdbg"><%=Rs("UserInTime")%></td>
</tr>
<tr class="tdbg">
<td height="22" class="tdbg">狀態</td>
<td class="tdbg"><%
if Rs("UserIsCheck")=0 then
Response.write "未審核"
else
Response.write "審核"
end if
%></td>
</tr>
</table>
<%
end if
Call Rs_end(Rs)
end if
%>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -