<link href="style.css" type="text/css" rel="stylesheet">
<!--#include file="conn.asp"-->
<%if session("usertype")="admin" then
response.Write("<div>權(quán)限:管理員&nbsp;&nbsp;&nbsp;請(qǐng)?jiān)谧蟛藛芜x擇操作</div><br>")
sql="select * from admin where id="&session("adminid")
set rs=db.execute(sql)%><div>
<table width="200" border="1">
  <tr>
    <td>用戶名</td>
    <td><%=rs("name")%></td>
  </tr>
  <tr>
    <td>密碼</td>
    <td><%=rs("pwd")%></td>
  </tr>
</table></div>
<%else 
sql="select * from u where id="&Session("userid")
set rs=db.execute(sql)
response.Write("<div>權(quán)限:用戶&nbsp;&nbsp;&nbsp;<a href='my_borrow.asp?id="&rs("id")&"' target='right'>查看借書(shū)詳情</a></div><br>")
%><div>
<table width="200" border:1pt solid #666666>
  <tr>
    <td>用戶名</td>
    <td><%=rs("name")%></td>
  </tr>
  <tr>
    <td>密碼</td>
    <td><%=rs("pwd")%></td>
  </tr>
  <tr>
    <td>用戶狀態(tài)</td>
    <td><%if rs("lock") then
	response.Write("鎖定狀態(tài)")
	else 
	response.Write("開(kāi)通狀態(tài)")
	end if%></td>
  </tr>
  <tr>
    <td>借書(shū)數(shù)目</td>
    <td><%=rs("loan_num")%></td>
  </tr>
  <tr>
    <td>我的信箱</td>
    <td><%
	uid=session("userid")
  'msg導(dǎo)出數(shù)據(jù)，如果有的話
  sql="select count(*) as msg_num from msg where uid="&uid
  set rs=db.execute(sql)
  if rs("msg_num") >=1 then
  response.Write"<a href='readmsg.asp?uid="&uid&"' target=right>有"&rs("msg_num")&"個(gè)消息，查看？</a>"
  else response.Write("沒(méi)有超期消息")
  end if%></td>
  </tr>
</table></div><%end if%><br><br><br><div><a href="index.asp" target="right">首頁(yè)</a>
&nbsp;&nbsp;&nbsp;<a href="javascript:history.go(-1)" target="right">返回</a>
</div>