?? zl.asp
字號:
<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<%
Response.Buffer = True
if session("netname")="" then
response.redirect "index.asp"
end if
if request("action")="save" then
sex=trim(request("sex"))
qq=trim(request("qq"))
email=trim(request("email"))
face=trim(request("face"))
conn.execute("update [user] set sex='"&sex&"',qq='"&qq&"',email='"&email&"',face='"&face&"' where name='"&session("netname")&"'")
response.write "<script Language=JavaScript>{window.alert('資料修改成功！');window.location='zl.asp';}</script>"
response.end
end if
%>
<html>
<head>
<title>資料修改</title>
<meta http-equiv='content-type' content='text/html; charset=gb2312'>
<script>
function no_newwin(){
if((event.ctrlKey)&&(event.keyCode==78)){
event.keyCode=0;
event.returnValue=false;
}
}
function click()
{
return false;
}
document.oncontextmenu=click;
document.onmousemove=click;
document.ondragstart=doDragStart
function doDragStart() {event.returnValue=false}
var winbgcolor = parent.cbg();
var winbgimage = parent.cbi();
document.writeln("<body bgcolor=" + winbgcolor + " background=" + winbgimage + " bgproperties=fixed topmargin=3>");
</script>
<style type="text/css">
A:visited{TEXT-DECORATION: none;Color:#000000}
A:active{TEXT-DECORATION: none;Color:#000000}
A:hover{TEXT-DECORATION: underline;Color:#000000}
A:link{text-decoration: none;Color:#000000}
.t{LINE-HEIGHT: 1.4}
BODY{FONT-FAMILY: "宋體"; FONT-SIZE: 12px;
}
TD,p,div,br{FONT-FAMILY: "宋體"; FONT-SIZE: 12px;Color:#000000;}
FORM{FONT-FAMILY: "宋體"; FONT-SIZE: 12px}
OPTION{FONT-FAMILY: "宋體"; FONT-SIZE: 12px}
INPUT{BORDER-TOP-WIDTH: 1px; PADDING-RIGHT: 1px; PADDING-LEFT: 1px; BORDER-LEFT-WIDTH: 1px; FONT-SIZE: 9pt; BORDER-LEFT-COLOR: #cccccc; BORDER-BOTTOM-WIDTH: 1px; BORDER-BOTTOM-COLOR: #cccccc; PADDING-BOTTOM: 1px; BORDER-TOP-COLOR: #cccccc; PADDING-TOP: 1px; HEIGHT: 18px; BORDER-RIGHT-WIDTH: 1px; BORDER-RIGHT-COLOR: #cccccc; font-family: "宋體"; font-size: 12px}
textarea {border-width: 1; border-color: #000000; background-color: #efefef; font-family: "宋體"; font-size: 12px; font-style: bold;}
select {border-width: 1; border-color: #000000; background-color: #eeeeee; font-family: "宋體"; font-size: 12px; font-style: bold;}
</style>
</head>
<script>
var winbgcolor = parent.cbg();
var winbgimage = parent.cbi();
document.writeln("<body bgcolor=" + winbgcolor + " background=" + winbgimage + " bgproperties=fixed topmargin=3>");
</script>
<div align=center><font color="#FFFF00" style="font-size:12pt">資料修改</font></div>
<hr size=1 color=FFFF00>
<%set rs=conn.execute("select name,sex,qq,email,face from [user] where name='"&session("netname")&"'")%>
<table border="0" width="100%">
<form method="post" action="zl.asp?action=save" name="reg">
<tr>
<td>
<p><font color="#FFFF00">用戶名：</font><%=rs(0)%>
</p>
<p><font color="#FFFF00">性別：</font><input type="radio" name="sex" value="男" <%if rs(1)="男" then%>checked<%end if%> id="2"><label for="2">男</label><input type="radio" name="sex" value="女" <%if rs(1)="女" then%>checked<%end if%> id="3"><label for="3">女</label>
</p>
<p><font color="#FFFF00">QQ號碼：</font><br>
<input name="qq" value="<%=rs(2)%>" size="15" maxlength="10" onBlur="this.value=ignoreSpaces(this.value);" onKeypress="if (event.keyCode < 45 || event.keyCode > 57) event.returnValue = false;">
</p>
<p><font color="#FFFF00">E-mail：</font><br>
<input name="email" value="<%=rs(3)%>" size="15" maxlength="30" onBlur="this.value=ignoreSpaces(this.value);">
</p>
<p><font color="#FFFF00">頭 像：</font><br>
<select name="face" onChange="document.images['face'].src=options[selectedIndex].value;">
<%
for i=1 to 35
facestr="face/"&i&".gif"
%>
<option value="<%=facestr%>" <%if facestr=rs(4) then%>selected<%end if%>>頭像<%=i%></option>
<%next%>
</select><br><br>
<img id=face src="<%=rs(4)%>"><br><br>
<a href="allface.asp" target="_blank"><font color="#000000">查看頭像列表</font></a>
</p>
<table border="0" cellpadding="4">
<tr>
<td>
<input type="submit" value="修改" style="CURSOR:hand">
</td>
<td align="right">
<input type="reset" value="重寫" style="CURSOR:hand">
</td>
</tr>
</table>
</td>
</tr>
</form>
</table>
</body>
</html>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -