📄 right.asp
字号:
<DIV class=main-box-3>
<DIV class=box-top>
<DIV></DIV></DIV>
<%
if request.Cookies("Userid")="" then
Response.Write "<script>alert('发布信息出错,下面是产生错误的可能原因:\n\n·对不起,您没有权限做此操作');history.go(-1);</Script>"
Response.End
end if
response.Write"<TABLE cellSpacing=0 cellPadding=0 width='100%' border=0>"
response.Write"<TBODY><TR>"
set rsm=server.createobject("adodb.recordset")
sql="select * from "&WebSqlType&"_member where "&WebSqlType&"_id="&request.Cookies("Userid")&" "
rsm.open sql,conn,1,1
if rsm.eof and rsm.bof then
flaguser=0
else
if rsm(""&WebSqlType&"_pic")<>"" then
upic=rsm(""&WebSqlType&"_pic")
else
upic="images/mm.gif"
end if
uuser=rsm(""&WebSqlType&"_username")
if rsm(""&WebSqlType&"_realname")<>"" then
ureal="("&rsm(""&WebSqlType&"_realname")&")"
end if
utop=rsm(""&WebSqlType&"_top")
umx=rsm(""&WebSqlType&"_"&WebSqlType&"")
ulinks="<a href='"&cityurl&"jiaoyou/index.asp?username="&rsm(""&WebSqlType&"_id")&"' target='_blank'>发消息</a> | <a href='"&cityurl&"space/book.asp?id="&rsm(""&WebSqlType&"_id")&"' target='_blank'>留言</a>"
rsm.close
end if
response.Write"<TD align=middle colSpan=2 height=118><IMG src='/"&upic&"' width=120><BR>"
response.Write"<A href='/space/index.asp?id="&request.Cookies("Userid")&"' target=_blank><STRONG>"
response.Write""&uuser&"</STRONG></A> "&ureal&"</TD></TR>"
response.Write"<TR><TD align=middle colSpan=2 height=30><INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/group.asp'"" type=submit value=我的圈子 name=myorg>"
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/activitx.asp'"" type=submit value=我的活动 name=myorg> "
response.Write"</TD></TR><TR><TD align=middle colSpan=2 height=30>"
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/bbs.asp'"" type=submit value=我的话题 name=mymsg> "
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/photo.asp'"" type=submit value=我的相片 name=mymsg>"
response.Write"</TD></TR><TR><TD align=middle colSpan=2 height=30>"
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/blog.asp'"" type=submit value=我的博客 name=myinfo> "
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/info.asp'"" type=submit value=分类信息 name=mymsg> "
response.Write"</TD></TR><TR><TD align=middle colSpan=2 height=30>"
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/user.asp'"" type=submit value=我的好友 name=mymsg> "
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/soudao.asp'"" type=submit value=我的信箱 name=mymsg> "
response.Write"</TD></TR><TR><TD align=middle colSpan=2 height=30>"
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/web.asp'"" type=submit value=邀请好友 name=mymsg> "
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/book.asp'"" type=submit value=留言管理 name=mymsg> "
response.Write"</TD></TR><TR><TD align=middle colSpan=2 height=30>"
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/member.asp'"" type=submit value=修改资料 name=myinfo> "
response.Write"<INPUT class=but1 onclick=""window.location.href='"&cityurl&"person/password.asp'"" type=submit value=修改密码 name=Submit3> "
response.Write"</TD></TR><TR><TD align=middle colSpan=2 height=55><A href='"&cityurl&"person/add.asp'>"
response.Write"<IMG src='"&cityurl&"images/c.gif' vspace=5 border=0></A><BR><A href='"&cityurl&"person/web.asp'"
response.Write" target=_blank>邀请我的朋友一起加入!</A> "
response.Write" </TD></TR></TBODY></TABLE>"
%>
<DIV class=box-bot>
<DIV></DIV></DIV></DIV>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -