📄 bj.asp
字号:
<%
dim id
id=Request("id")
If id="" Then
response.redirect "help.asp"
Else
%>
<%
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("db.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM id where id="+id
rs.Open sql, conn, 1, 1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css">
<title>my bbs</title>
<script language="JavaScript">
<!--
function checkdata() {
if( form.name.value =="") {
alert("\请输入用户名")
return false;
}
if( form.password.value =="") {
alert("\请输入密码")
return false;
}
if( form.passwen.value =="") {
alert("\请输入密码提示问题")
return false;
}
if( form.passda.value =="") {
alert("\请输入密码提示答案")
return false;
}
if( form.email.value =="") {
alert("\请输入Email")
return false;
}
if( form.sex.value =="kong") {
alert("\请选择性别")
return false;
}
return true;
}
function isNumberString (InString,RefString)
{
if(InString.length==0) return (false);
for (Count=0; Count < InString.length; Count++) {
TempChar= InString.substring (Count, Count+1);
if (RefString.indexOf (TempChar, 0)==-1)
return (false);
}
return (true);
}
// -->
</script>
</head>
<body leftmargin="0" Topmargin="0" marginwidth="0" marginheight="0" background="images/greystrip.gIf">
<!--#include file="top2.asp"-->
<form method=post action="bj1.asp" name=form onSubmit="return checkdata()">
<table border="1" cellspacing="0" cellpadding="0" width="416" align="center" height="10" bordercolor="#7C96B8" bordercolordark="#FFFFFF">
<TR>
<td colspan="2" height="20" background="images/mmTo.gIf" width="416" bgcolor="#7C96B8"><DIV style="FILTER: dropshadow(color=#FFFFFF, offx=1, offy=1, positive=1); WIDTH: 100%; CURSOR: hAND; POSITION: relative">
<p align="center"><font color="#336699">
修 改 用 户</font></p>
</div>
</td>
</TR>
<TR>
<td>
<font color="#336699">用户名：</font>
</td>
<td>
<%=rs("name")%>
<input type=hidden name=name value="<%=rs("name")%>">
</td>
</TR>
<TR>
<td>
<font color="#336699">密码：</font>
</td>
<td>
<input type=password name='password' maxlength=16 value="<%=rs("pass")%>"> <font color="#FF0000">*</font>
</td>
</TR>
<TR>
<td>
<font color="#336699">密码问题：</font>
</td>
<td>
<input type=text name='passwen' value="<%=rs("passwen")%>"> <font color="#FF0000">*</font>
</td>
</TR>
<TR>
<td>
<font color="#336699">问题答案：</font>
</td>
<td>
<input type=text name='passda' value="<%=rs("passda")%>"> <font color="#FF0000">*</font>
</td>
</TR>
<TR>
<td>
<font color="#336699">Email地址：</font>
</td>
<td>
<input type=text name='email' value="<%=rs("email")%>"> <font color="#FF0000">*</font>
</td>
</TR>
<TR>
<td>
<font color="#336699">姓名：</font>
</td>
<td>
<input type=text name='xingming' maxlength=10 value="<%=rs("xingming")%>">
</td>
</TR>
<TR>
<td>
<font color="#336699">性别：</font>
</td>
<td>
<select name="sex">
<%Select case rs("sex")
case "男"%>
<option value="kong">请选择</option>
<option value="男" selected>男</option>
<option value="女">女</option>
<%case "女"%>
<option value="kong">请选择</option>
<option value="男">男</option>
<option value="女" selected>女</option>
<%case Else%>
<option value="kong" selected>请选择</option>
<option value="男">男</option>
<option value="女">女</option>
<%End Select%>
</select> <font color="#FF0000">*</font>
</td>
</TR>
<TR>
<td>
<font color="#336699">OICQ号码：</font>
</td>
<td>
<input type=text name='oicq' maxlength=10 value="<%=rs("oicq")%>">
</td>
<TR>
<td>
<font color="#336699">ICQ号码：</font>
</td>
<td>
<input type=text name='icq'maxlength=14 value="<%=rs("icq")%>">
</td>
</TR>
<TR>
<td>
<font color="#336699">MSN：</font>
</td>
<td>
<input type=text name='msn' value="<%=rs("msn")%>">
</td>
</TR>
<TR>
<td>
<font color="#336699">生日：</font>
</td>
<td>
<input type=text name='shengri' value="<%=rs("shengri")%>"> 格式:2002-06-21
</td>
</TR>
<TR>
<td>
<font color="#336699">主页：</font>
</td>
<td>
<input type=text name='home' value="<%=rs("home")%>">
</td>
</TR>
<TR>
<td>
<font color="#336699">头像：</font>
</td>
<td>
<select name=touxiang size=1 onChange="document.images['face'].src=options[selectedIndex].value;">
<option value='<%=rs("touxiang")%>' selected>修改头像</option>
<%
For NumberFace=1 to 108
Response.Write "<option value='pic/"&NumberFace&".gif'>"&NumberFace&"</option>"
Next
%>
</select> 选择头像 <img src=<%=rs("touxiang")%> name="face" width=32 height=32 hspace=15><a href="allface.asp" target="_blank">全部头像</a>
</td>
</TR>
<TR>
<td><font color="#336699">
提交修改：</font>
</td>
<td>
<input type="submit" value="确 认" name="submit" style="cursor:hand;" class="Tips_bo">
<input type="reset" value="重 写" name="reset" style="cursor:hand;" class="Tips_bo">
</td>
</TR>
</table>
</form>
</body>
</html>
<%end if%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -