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

📄 right.asp

📁 WEB2.0圈子交友平台,以用户影音创意和分享为主导, 为用户提供:圈子,个人空间,博客,话题,相册,分类信息,短信,交友等免费服务,致力打造中国第一套 WEB2.0交友系统开源网站.
💻 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 + -