📄 usermodify.asp
字号:
<%PageName="UserModify"%>
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<%
if session("DJ58User")="" or isnull(session("DJ58User")) or session("HappyMusicPwd")="" or isnull(session("HappyMusicPwd")) then
Response.Write "你尚未登陆！"
Response.end
end if
username=session("DJ58User")
Password=session("HappyMusicPwd")
set rs=server.createobject("adodb.recordset")
sql="select * from user where username='"&username&"' and password='"&password&"'"
rs.open sql,conn,1,1
if rs.eof then
response.write "操作错误。请重新登陆！"
Response.end
else
id=rs("id")
Sex=rs("Sex")
email=rs("Email")
oicq=rs("oicq")
User_Birthday=rs("User_Birthday")
MyIntro=rs("sign")
UserWebName=rs("UserWebName")
UserWebUrl=rs("UserWebUrl")
UserPhoto=rs("UserPhoto")
Address=rs("Address")
ContactAddress=rs("ContactAddress")
TrueName=rs("TrueName")
rs.close
end if
%>
<!--#include file="top.asp"-->
<div align="center">
<center>
<table width="773" height="90" border="0" cellpadding="0" cellspacing="0" bgcolor="#30393D" id="AutoNumber1" style="border-collapse: collapse">
<tr>
<td width="5">
</td>
<td width="741" height="211">
<table cellpadding=0 cellspacing=0 border=0 width=100% align=center>
<FORM name=reg2 action="UserSave.asp" method=post>
<TR>
<td align=center width=100%>
<table border=0 cellpadding=0 cellspacing=0 width=200>
<tr>
<td><br>
<fieldset width=20%>
<legend align=center>□□□用户修改资料□□□</legend>
<div align="center">
<center>
<table border=1 cellpadding=0 cellspacing=1 width=610 style="border-collapse: collapse" bordercolor="#000000" >
<tr>
<TD width=97 align=right>**注 册 名</TD>
<TD width="510"><%=Username%> </TD>
</TR>
<TR>
<TD align=right width="97">**密 码：</TD>
<TD width="510"><INPUT type=password maxLength=16 size=13 name=password value="<%=password%>"></TD>
</TR>
<TR>
<TD align=right width="97">**密码确认：</TD>
<TD width="510"><INPUT type=password maxLength=16 size=13 name=password2 value="<%=password%>"></TD>
</TR>
<TR>
<TD align=right width="97">**Email地址：</TD>
<TD width="510"><INPUT maxLength=50 size=20 name=Email value="<%=email%>"></TD>
</TR>
<TR>
<TD align=right width="97">性 别：</TD>
<TD width="510">
<INPUT type=radio<%if sex=1 then%> CHECKED<%end if%> value="1" name=sex size="20"> 男孩
<INPUT type=radio<%if sex=0 then%> CHECKED<%end if%> value="0" name=sex size="20"> 女孩</TD>
</TR>
<tr>
<TD align=right width="97">出生日期：</TD>
<TD width="510">
<%
yeararr=split(User_birthday,"-")
byear=yeararr(0)
bmonth=yeararr(1)
bday=yeararr(2)
%>
<select size="1" name="Byear">
<option value="">－－</option>
<%for i=1940 to year(date)-3%>
<option value="<%=i%>" <%if cstr(byear)=cstr(i) then%> selected <%end if%>><%=i%></option>
<%next%>
</select>
年
<select size="1" name="Bmonth">
<option value="">－</option>
<%for i=1 to 12%>
<option value="<%=i%>" <%if cstr(Bmonth)=cstr(i) then%> selected <%end if%>><%=i%></option>
<%next%>
</select>
月
<select size="1" name="Bday">
<option value="">－</option>
<%for i=1 to 31%>
<option value="<%=i%>" <%if cstr(Bday)=cstr(i) then%> selected <%end if%>><%=i%></option>
<%next%>
</select>
日
</TD>
</tr>
<tr>
<TD align=right width="97">我的相片：</TD>
<TD width="510">
<iframe name="I1" frameborder=0 width="100%" height=48 scrolling=no src=upload.asp?id=<%=id%>></iframe>
<font color="#00FF00">相片路径</font><input maxlength=255 size=47 name=UserPhoto value="<%=UserPhoto%>"><br>
<font color="#FF0000">如果您上传了相片这里的路径是系统自动默认的，请不要更改。<br>
如果您不上传相片，但想远程调用其他网站中您所需要的图片，请在这里填入图片的相对路径，如:http://www.163.com/相片.gif</font></TD>
</tr>
<tr>
<TD align=right width="97"> </TD>
<TD width="510">
图像位置： </TD>
</tr>
<tr>
<TD align=right width="97">**地 区：</TD>
<TD width="510"><span class=tt4>
<select name=Address size=1>
<option value="" selected>请选择</option>
<option value="上海市">上海市</option>
<option value="北京市">北京市</option>
<option value="天津市">天津市</option>
<option value="河北省">河北省</option>
<option value="山西省">山西省</option>
<option value="内蒙古">内蒙古</option>
<option value="辽宁省">辽宁省</option>
<option value="吉林省">吉林省</option>
<option value="黑龙江省">黑龙江省</option>
<option value="江苏省">江苏省</option>
<option value="浙江省">浙江省</option>
<option value="安徽省">安徽省</option>
<option value="福建省">福建省</option>
<option value="江西省">江西省</option>
<option value="山东省">山东省</option>
<option value="河南省">河南省</option>
<option value="湖北省">湖北省</option>
<option value="湖南省">湖南省</option>
<option value="广东省">广东省</option>
<option value="广西省">广西省</option>
<option value="四川省">四川省</option>
<option value="贵州省">贵州省</option>
<option value="云南省">云南省</option>
<option value="西藏自治区">西藏自治区</option>
<option value="陕西省">陕西省</option>
<option value="甘肃省">甘肃省</option>
<option value="青海省">青海省</option>
<option value="宁夏">宁夏</option>
<option value="新疆">新疆</option>
<option value="香港">香港</option>
<option value="台湾省">台湾省</option>
<option value="澳门">澳门</option>
<option value="重庆市">重庆市</option>
<option value="海南省">海南省</option>
<option value="国外">国外</option>
<option value="其他">其他</option>
</select></span></TD>
</tr>
<tr>
<TD align=right width="97">联系地址：</TD>
<TD width="510">
<input maxlength=20 size=40 name=ContactAddress value="<%=ContactAddress%>"></TD>
</tr>
<tr>
<TD align=right width="97">真实姓名：</TD>
<TD width="510">
<input maxlength=20 size=16 name=TrueName value="<%=TrueName%>"></TD>
</tr>
<TR>
<TD align=right width="97">OICQ号码：</TD>
<TD width="510"><INPUT maxLength=20 size=20 name=OICQ value="<%=oicq%>"></TD>
</TR>
<tr>
<TD align=right width="97">主页名称：</TD>
<TD width="510"><INPUT maxLength=20 size=20 name=UserWebName value="<%=UserWebName%>"></TD>
</tr>
<tr>
<TD align=right width="97">主页地址：http://</TD>
<TD width="510"><INPUT maxLength=20 size=20 name=UserWebUrl value="<%=UserWebUrl%>">注意请不要填http://</TD>
</tr>
<TR>
<TD align=right width="97">签 名：</TD>
<TD width="510"><TEXTAREA name=MyIntro rows=5 wrap=PHYSICAL cols=40><%=MyIntro%></TEXTAREA></TD>
</TR>
<TR align=center bgcolor="#2E5667">
<TD colspan=2 height=30 width="608"><INPUT value="确 定" name=Submit type=submit> <INPUT type=reset value="取 消" name=Submit2></TD>
</TR>
</TABLE>
</center>
</div>
</fieldset>
</td>
</tr>
</table>
</td>
</tr>
</FORM>
</table>
</td>
<td width="5"> </td>
</tr>
<tr>
<td width="750" height="1" colspan="3"> </td>
</tr>
</table>
</center>
</div>
<div align="center">
<!--#include file="friendsite.asp"-->
</div>
<br>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -