<%
         Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/userfriend_password.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_Info.asp?Action=ModifyPwd""  target=""use"">修改密码</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
        Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/userfriend_info.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_Info.asp?Action=Modify""  target=""use"">修改信息</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
		Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/detail_orderList.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_mailreg.asp""  target=""use"">邮件订阅</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
 If UserType = 0 Then
        Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/userfriend_list.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_Info.asp?Action=RegCompany""  target=""use"">注册我的企业</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
 End If
        Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/userfriend_logout.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_Logout.asp""  target=""use"">退出登录</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
 %>