<%
M_login=session("M_login")
M_id=session("M_id")
sql="Select * from SL_member Where M_id="&M_id
		set rs=Server.CreateObject("ADODB.RecordSet")
		rs.open sql,conn,1,1
		M_pwd=rs("M_pwd")
		M_name=rs("M_name")
		M_code=rs("M_code")
		M_fen=rs("M_fen")
		M_pic=rs("M_pic")
		M_pic2=rs("M_pic")
		M_email=rs("M_email")
		M_qq=rs("M_qq")
		M_add=rs("M_add")
		M_mobile=rs("M_mobile")
		M_pic="member.jpg"
		if rs("M_pic")<>"" then
		M_pic=rs("M_pic")
		end if
		if M_name="" or isnull(M_name) then
		M_name="未填写"
		end if
		if M_code="" or isnull(M_code) then
		M_code="未填写"
		end if
		if M_mobile="" or isnull(M_mobile) then
		M_mobile="未填写"
		end if
		if M_add="" or isnull(M_add) then
		M_add="未填写"
		end if
		
		rs.close
set rs=nothing

if left(M_pic,4)<>"http" then
M_pic=C_dir&"media/"&M_pic
end if

%>
<div style="position: relative;width:200px; height:100%; float:left; z-index:99; border-right:#999999 solid 1px; background-color:#dddddd">
<div align="center">
<img src="<%=M_pic%>" style="width:150px; height:150px; border-radius:50%; overflow:hidden; margin:20px 0 10px 0;" />
<br>会员：<%=M_login%><div style="height:10px;"></div>
<hr style="border : 1px dashed #999999;" /><a href="../index.asp">网站首页</a>
<hr style="border : 1px dashed #999999;" /><a href="index.asp">会员中心</a>
<hr style="border : 1px dashed #999999;" /><a href="member_edit.asp">修改资料</a>
<hr style="border : 1px dashed #999999;" /><a href="member_pwdedit.asp">修改密码</a>
<hr style="border : 1px dashed #999999;" /><a href="member_order.asp">订单记录</a>
<hr style="border : 1px dashed #999999;" /><a href="member_wuliu.asp">查物流</a>
<hr style="border : 1px dashed #999999;" /><a href="member_news.asp">文章投稿</a>
<hr style="border : 1px dashed #999999;" /><a href="member_form.asp">表单管理</a>
<hr style="border : 1px dashed #999999;" /><a href="member_login.asp?action=unlogin">退出登录</a>
<hr style="border : 1px dashed #999999;" /></div>
</div>