?? u.asp
字號:
<!--#include file="boardconn.asp"-->
<!--#include file="inc/sql.asp"-->
<!--#include file="inc/inc.asp"-->
<!--#include file="inc/ip.asp"-->
<!--#include file="inc/const.asp"-->
<!--#include file="inc/validitycheck.asp"-->
<% call validitycheck("userinfo",0) %>
<!--#include file="inc/postubb.asp"-->
<%
server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(server_v1,8,len(server_v2))<>server_v2 then
response.write "<br><br><center><table border=1 cellpadding=20 bordercolor=black bgcolor=#EEEEEE width=450>"
response.write "<tr><td style=font:9pt Verdana>"
response.write "<center><font face=Georgia,Tahoma size=2><u>友情提示：服務器禁止非法操作...</u></font></center>"
response.write "</td></tr></table></center>"
response.end
end if
%>
<%
fqys=request.servervariables("query_string")
dim nothis(17)
nothis(0)="net user"
nothis(1)="xp_cmdshell"
nothis(2)="/add"
nothis(3)="exec%20master.dbo.xp_cmdshell"
nothis(4)="net localgroup administrators"
nothis(5)="select"
nothis(6)="count"
nothis(7)="asc"
nothis(8)="char"
nothis(9)="mid"
nothis(10)="'"
nothis(11)=":"
nothis(12)=""""
nothis(13)="insert"
nothis(14)="delete"
nothis(15)="drop"
nothis(16)="truncate"
nothis(17)="from"
errc=false
for i= 0 to ubound(nothis)
if instr(FQYs,nothis(i))<>0 then
errc=true
end if
next
if errc then
response.write "<br><br><center><table border=1 cellpadding=20 bordercolor=black bgcolor=#EEEEEE width=450>"
response.write "<tr><td style=font:9pt Verdana>"
response.write "<center><font face=Georgia,Tahoma size=2><u>友情提示：服務器禁止非法操作...</u></font></center>"
response.write "</td></tr></table></center>"
response.end
end if
%>
<% Call CheckUserNameValidity(Request.QueryString("/")) %>
<HTML>
<HEAD>
<TITLE>注冊信息 - <%=HOST_NAME%> - <%=HOST_LIST%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=GB2312">
<link rel="shortcut icon" href="images/bbs.ico">
<link href="style/style.css" rel="stylesheet" type="text/css">
<script language="JavaScript">
<!--
function form1_onsubmit() {
if (document.form1.Key.value=="")
{
alert("友情提示!\n\n請完整輸入貼吧名稱!")
document.form1.Key.focus()
return false
}
}
// -->
</script>
</HEAD>
<BODY bgColor=#ffffff leftMargin=0 topMargin=0>
<!--#include file="top.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width=100% align=center border=0>
<TBODY>
<TR>
<TD width=1% height=20 bgColor=<%=HOST_TITLE%>></TD><TD width=99% height=20 bgColor=<%=HOST_TITLE%> class=INDEX_VMALL><a href="index.asp"><font color=<%=HOST_FONT%>>首頁</font></a> <font color=<%=HOST_FONT%>>></font> <font color=<%=HOST_FONT%>><u>注冊信息</u></font></TD></TR></TBODY></TABLE>
<%
UserName=Request.QueryString("/")
Sql="select * from QiQiBoy_User_Disp where UserName='"&UserName&"'"
Set Rs=Conn.execute(Sql)
If not rs.eof then
%>
<TABLE cellSpacing=0 cellPadding=0 width=100%" align=center border=0 bgColor=#ffffff>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
<TBODY>
<TR>
<TD width="5%" height="30"></TD>
<TD width="90%" height="30" colspan="2"></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>會員帳號：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(HTMLCode(rs(1)))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>會員密碼：</td><TD width="70%" height="30" class=INDEX_XMALL>******</TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>會員性別：</td><TD width="70%" height="30" class=INDEX_XMALL><% if Rs("sex")=1 then response.Write("帥哥") else response.Write("靚女") end if %></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>會員地區：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(HTMLCode(rs(19)))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>郵件地址：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(HTMLCode(rs(4)))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>OICQ號碼：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(HTMLCode(rs(5)))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>個人主頁：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(HTMLCode(rs(20)))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>個人簡介：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(HTMLCode(rs(21)))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>會員級別：</td><TD width="70%" height="30" class=INDEX_XMALL><% if Rs("UserGroupID")=1 then response.Write("普通會員") else if Rs("UserGroupID")=2 then response.Write("普通斑竹") else response.Write("高級斑竹") end if%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>積分統計：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(rs(14))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>發表主題：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(rs(15))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>發表帖子：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(rs(16))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>精華帖數：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(rs(17))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>被刪帖數：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(rs(18))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>注冊時間：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(rs(10))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>最后登陸：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(rs(11))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>登陸次數：</td><TD width="70%" height="30" class=INDEX_XMALL><%=Response.Write(rs(12))%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>帳號狀態：</td><TD width="70%" height="30" class=INDEX_XMALL><% if Rs("LockUser")=1 then response.Write("[<font color=#cc0000>已鎖</font>]") else response.Write("正常") end if %></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>形象照片：</td><TD width="70%" height="30" class=INDEX_XMALL><% if Rs("Photo")<>"" then response.Write("<a href=my_file.asp?/="&rs(22)&" target=_blank><IMG src=my_file.asp?/="&rs(22)&" border=0 width=80 height=80 ></a>") else response.Write("...") end if %></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="90%" height="10" colspan="2"></TD>
<TD width="5%" height="30"></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<%
End if
%>
<!--#include file="end.asp"-->?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -