?? e.asp
字號(hào):
<!--#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="function.asp"-->
<!--#include file="inc/MD5.asp"-->
<HTML>
<HEAD>
<TITLE>修改注冊(cè)信息 - <%=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請(qǐng)完整輸入貼吧名稱!")
document.form1.Key.focus()
return false
}
}
// -->
</script>
<script language="JavaScript">
<!--
function form_onsubmit() {
if (document.form.username.value=="")
{
alert("友情提示!\n\n請(qǐng)完整輸入會(huì)員帳號(hào)!")
document.form.username.focus()
return false
}
else if(document.form.checkPassword.value!=document.form.password.value)
{
alert("友情提示!\n\n驗(yàn)證密碼和會(huì)員密碼不一致。")
document.form.password.focus()
return false
}
else if (document.form.sex.value=="")
{
alert("友情提示!\n\n請(qǐng)完整輸入會(huì)員性別!")
document.form.sex.focus()
return false
}
else if (document.form.area.value=="")
{
alert("友情提示!\n\n請(qǐng)完整輸入會(huì)員地區(qū)!")
document.form.area.focus()
return false
}
else if (document.form.email.value=="")
{
alert("友情提示!\n\n請(qǐng)完整輸入郵件地址!")
document.form.email.focus()
return false
}
else if (document.form.oicq.value=="")
{
alert("友情提示!\n\n請(qǐng)完整輸入OICQ號(hào)碼!")
document.form.oicq.focus()
return false
}
else if (document.form.question.value=="")
{
alert("友情提示!\n\n請(qǐng)完整輸入密碼問(wèn)題!")
document.form.question.focus()
return false
}
else if (document.form.answer.value=="")
{
alert("友情提示!\n\n請(qǐng)完整輸入密碼答案!")
document.form.answer.focus()
return false
}
else if (document.form.verifycode.value=="")
{
alert("友情提示!\n\n請(qǐng)完整輸入驗(yàn)證編碼!")
document.form.verifycode.focus()
return false
}
else if (document.form.username.value.length <3 )
{
alert("友情提示!\n\n帳號(hào)長(zhǎng)度不得小于3字節(jié)或大于18字節(jié),當(dāng)前的帳號(hào)長(zhǎng)度為："+form.username.value.length+"")
document.form.username.focus()
return false
}
else if (document.form.username.value.length >18 )
{
alert("友情提示!\n\n帳號(hào)長(zhǎng)度不得小于3字節(jié)或大于18字節(jié),當(dāng)前的帳號(hào)長(zhǎng)度為："+form.username.value.length+"")
document.form.username.focus()
return false
}
else if (document.form.question.value.length <3 )
{
alert("友情提示!\n\n密碼問(wèn)題長(zhǎng)度不得小于3字節(jié)或大于30字節(jié),當(dāng)前的密碼問(wèn)題長(zhǎng)度為："+form.question.value.length+"")
document.form.question.focus()
return false
}
else if (document.form.question.value.length >30 )
{
alert("友情提示!\n\n密碼問(wèn)題長(zhǎng)度不得小于3字節(jié)或大于30字節(jié),當(dāng)前的密碼問(wèn)題長(zhǎng)度為："+form.question.value.length+"")
document.form.question.focus()
return false
}
else if (document.form.answer.value.length <3 )
{
alert("友情提示!\n\n密碼答案長(zhǎng)度不得小于3字節(jié)或大于50字節(jié),當(dāng)前的密碼答案長(zhǎng)度為："+form.answer.value.length+"")
document.form.answer.focus()
return false
}
else if (document.form.answer.value.length >50 )
{
alert("友情提示!\n\n密碼答案長(zhǎng)度不得小于3字節(jié)或大于50字節(jié),當(dāng)前的密碼答案長(zhǎng)度為："+form.answer.value.length+"")
document.form.answer.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=#ffffff>首頁(yè)</font></a> <font color=<%=HOST_FONT%>>></font> <font color=<%=HOST_FONT%>><u>修改注冊(cè)信息</u></font></TD></TR></TBODY></TABLE>
<% if Request.QueryString("action") <> "modifyuser" then %>
<%
Sql="select * from QiQiBoy_User_Disp where UserName='"&UserName&"' and Pwd='"&Request.Cookies("Pwd")&"'"
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>
<form name="form" onsubmit="return form_onsubmit()" method="post" action="e.asp?action=modifyuser">
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30" align="right" class=INDEX_XMALL>會(huì)員帳號(hào)：</td><TD width="70%" height="30"><INPUT maxLength=18 size=25 name=username value="<%=Response.Write(rs(1))%>" readonly> *</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>會(huì)員密碼：</td><TD width="70%" height="30" class=INDEX_XMALL><INPUT type=password maxLength=18 size=25 name=password> (留空不做修改密碼)</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>驗(yàn)證密碼：</td><TD width="70%" height="30" class=INDEX_XMALL><INPUT type=password maxLength=18 size=25 name=checkPassword></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>會(huì)員性別：</td><TD width="70%" height="30"><SELECT name="sex" size="1"><OPTION value="1" <% if Rs("sex")=1 then response.Write("selected") end if%>>帥哥</OPTION><OPTION value="2" <% if Rs("sex")=2 then response.Write("selected") end if%>>靚女</OPTION></SELECT> *</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>會(huì)員地區(qū)：</td><TD width="70%" height="30"><INPUT maxLength=180 size=30 name=area value="<%=Response.Write(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"><INPUT maxLength=180 size=40 name=email value="<%=Response.Write(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號(hào)碼：</td><TD width="70%" height="30"><INPUT maxLength=20 size=25 name=oicq value="<%=Response.Write(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>密碼問(wèn)題：</td><TD width="70%" height="30"><INPUT maxLength=30 size=30 name=question value="<%=Response.Write(rs(6))%>"> *</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"><INPUT maxLength=50 size=50 name=answer value="<%=Response.Write(rs(7))%>"> *</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>個(gè)人主頁(yè)：</td><TD width="70%" height="30"><INPUT size=60 name=websites value="<%=Response.Write(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>個(gè)人簡(jiǎn)介：</td><TD width="70%" height="30"><TEXTAREA name="list" rows="8" cols="60"><%=Response.Write(rs(21))%></TEXTAREA></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><INPUT size=50 name=Photo id=photo> <% 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="20%" height="30" align="right" class=INDEX_XMALL>照片上傳：</td><TD width="70%" height="30" class=INDEX_XMALL><iframe frameborder="0" marginheight="0" marginwidth="0" scrolling="no" height="25" width="100%" name="upfile" src="my_up.asp"></iframe></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>驗(yàn)證編碼：</td><TD width="70%" height="30"><input type="text" name="verifycode" maxLength=4 size="8"> * <%Call GetSafeCode%></TD>
<TD width="5%" height="30"></TD></TR>
<TR>
<TD width="5%" height="30"></TD>
<TD width="20%" height="30"></td><TD width="70%" height="30"><INPUT type=submit value=" 提交修改信息 "> <INPUT type=reset value=" 擦除重填 "> </TD>
<TD width="5%" height="30"></TD></TR></form>
<TR>
<TD width="5%" height="30"></TD>
<TD width="90%" height="10" colspan="2"></TD>
<TD width="5%" height="30"></TD></TR>
<% end if%>
<% else %>
<%
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>友情提示：服務(wù)器禁止非法操作...</u></font></center>"
response.write "</td></tr></table></center>"
response.end
end if
%>
<%
fqys=request.servervariables("query_string")
dim nothis(18)
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"
nothis(18)="%"
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>友情提示：服務(wù)器禁止非法操作...</u></font></center>"
response.write "</td></tr></table></center>"
response.end
end if
%>
<%
dim Sex,Email,OICQ,Question,Answer
UserName=replace(trim(Request.Form("UserName")),"'","‘")
Password=replace(trim(Request.Form("Password")),"'","‘")
Sex=replace(trim(Request.Form("Sex")),"'","‘")
Area=replace(trim(Request.Form("Area")),"'","‘")
Email=replace(trim(Request.Form("Email")),"'","‘")
OICQ=replace(trim(Request.Form("OICQ")),"'","‘")
Question=replace(trim(Request.Form("Question")),"'","‘")
Answer=replace(trim(Request.Form("Answer")),"'","‘")
Websites=replace(trim(Request.Form("Websites")),"'","‘")
List=replace(trim(Request.Form("List")),"'","‘")
Photo=replace(trim(Request.Form("Photo")),"'","‘")
if not IsNumeric(request("verifycode")) then
rs.close
set rs=nothing
Response.Write ("<script>alert('友情提示!\n\n登陸驗(yàn)證碼必須是數(shù)字!');history.back();</script>")
Response.end
end if
if (int(session("SafeCode"))<>int(request("verifycode"))) then
rs.close
set rs=nothing
Response.Write ("<script>alert('友情提示!\n\n發(fā)送驗(yàn)證編碼錯(cuò)誤!');history.back();</script>")
Response.end
end if
If UserName="" or Sex="" or Area="" or Email="" or OICQ="" or Question="" or Answer="" Then
Response.Write ("<script>alert('友情提示!\n\n請(qǐng)完整填寫各項(xiàng)信息!');history.back();</script>")
Response.end
End If
if Trim(UserName)="" or Len(UserName)>18 or Len(UserName)<3 then
Response.Write ("<script>alert('友情提示!\n\n會(huì)員帳號(hào)不得小于3或大于18字節(jié)!');history.back();</script>")
Response.end
else
UserName=Trim(UserName)
end if
if Instr(UserName,">")>0 or Instr(UserName,"<")>0 or Instr(UserName,"=")>0 or Instr(UserName,"%")>0 or Instr(UserName,chr(32))>0 or Instr(UserName,"?")>0 or Instr(UserName,"&")>0 or Instr(UserName,";")>0 or Instr(UserName,",")>0 or Instr(UserName,"'")>0 or Instr(UserName,",")>0 or Instr(UserName,chr(34))>0 or Instr(UserName,chr(9))>0 or Instr(UserName,"?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -