⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 showuser.asp

📁 这是去年开发的中移鼎讯手机进销存系统 大家
💻 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>&nbsp;|&nbsp; <a href="Mpwd.asp?ID=<%=id%>">修改资料</a>&nbsp;|&nbsp; <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 + -