下面是一个修改页面，使用中发现：个别用户在修改了信息后，可以修改的字段会被清空，包括密码。以至于登录都不行了。求高人指点！
本帖最后由 jvxie 于 2013-10-20 08:30:31 编辑 下面是一个修改页面，使用中发现：个别用户在修改了信息后，可以修改的字段会被清空，包括密码。以至于登录都不行了。求高人指点！
<!--#include file="conn.asp"-->
<%
if session("Name") = "" then
response.write "<script language=javascript> alert('对不起，登录超时，请重新登录！');location.href('login.asp');</script>"
response.end
end if
%>
<%
if request("action")="edit" then
name=session("name")
session.timeout=20
set rs=server.createobject("adodb.recordset")
sql="select * from user where name='"&name&"'"
rs.open sql,conn,1,3
rs("pwd")=trim(request.form("pwd"))
rs("wenti")=trim(request.form("wenti"))
rs("daan")=trim(request.form("daan"))
rs("C2")=trim(request.form("C2"))
rs("C4")=trim(request.form("C4"))
rs("C6")=trim(request.form("C6"))
rs("C7")=trim(request.form("C7"))
rs("C8")=trim(request.form("C8"))
rs("C9")=trim(request.form("C9"))
rs("jielun")=trim(request.form("jielun"))
rs("now")=trim(request.form("now"))
Rs("datetime")=Now()
Rs("getip")=getip()
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write "<script language=javascript>alert('提交成功！');location.href('edit.asp');</script>"
Response.End
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312>
<title>信息登记、核对页面...</title>
<style type="text/css">
<!--
.STYLE15 {
font-size: 12px;
color:#006666;
}
.STYLE16 {
font-size: 12px;
color:#666666;
}
.STYLE17 {
font-size: 18px;
font-weight: bold;
color:#0891D7;
}
.STYLE18 {
font-size: 14px;
font-weight: bold;
color:#ff0000;
}
-->
</style>
</head>
<body background="../images/bj2.gif">
<!--#include file="top.asp"-->
<%
Private Function getIP()
Dim strIPAddr
If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" OR InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") > 0 Then
strIPAddr = Request.ServerVariables("REMOTE_ADDR")
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",") > 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",")-1)
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";") > 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";")-1)
Else
strIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
End If
getIP = Trim(Mid(strIPAddr, 1, 30))
End Function
%>
<table width="950" border="0" align="center" cellpadding="10" cellspacing="0">
<tr>
<td align="left" class="STYLE18"><p> 重要说明：本系统</p>
<%
if session("name")="" then
%>
对不起你还没有登陆，请<a href="login.asp">登陆</a>或者<a href="reg.asp">注册</a>
<%
else
%>
<%
name=session("name")
set rs=server.createobject("adodb.recordset")
sql="select * from user where name='"&name&"'"
rs.open sql,conn,1,1
%>
</p>
<form action="" method="post" name="form" id="form">
<table width="850" cellspacing="0" cellpadding="5" align="center" border="1" bordercolorlight="#006666" bordercolordark="#FFFFFF">
<tr>
<td class="STYLE16" colspan="4" align="center"><b>登录信息</b></td>
<tr >
<td class="STYLE16" width="170">用户名</td>
<td class="STYLE16"><%=rs("name")%> </td>
<td class="STYLE16">密码</td>
<td class="STYLE16"><input name="pwd" type="text" id="pwd" style="width:180px;" class="STYLE16" value="<%=rs("pwd")%>"> </td>
</tr>
<tr>
<td class="STYLE16">密码提示问题</td>
<td class="STYLE16"><input name="wenti" type="text" id="wenti" style="width:180px;" class="STYLE16" value="<%=rs("wenti")%>"> </td>
<td class="STYLE16">密码提示答案</td>
<td class="STYLE16"><input name="daan" type="text" id="daan" style="width:180px;" class="STYLE16" value="<%=rs("daan")%>"> </td>
</tr>
<tr><td class="STYLE16">最后登录IP</td><td class="STYLE16"><%=rs("getIP")%> </td><td class="STYLE16">最后登记时间</td><td class="STYLE16"><%=rs("datetime")%> </td></tr>
<tr >
<td colspan="4" align="center"><b><font size="3" color="#CC6600" >下面为需要核对或采集的信息</font></b></td></tr>
<tr><td colspan="2" align="center"><b>信息登记栏</b></td><td colspan="2" align="center"><b>提 示 栏</b></td></tr>
<tr><td>班级</td><td>
<select name="C2" style="width:180px;">
<option selected="selected" value="<%=rs("C2")%>"><%=rs("C2")%></option>
<option value="请选择...">请选择...</option>
<option value="111">111</option>
<option value="222">222</option>
</select>
</td><td colspan="2">请选择...</td></tr>
<tr><td>姓名</td><td><input name="C4" type="text" id="C4" style="width:180px;" class="STYLE16" value="<%=rs("C4")%>"> </td><td colspan="2">请填写...</td></tr>
<tr><td>性别</td><td><input name="C6" type="text" id="C6" style="width:180px;" class="STYLE16" value="<%=rs("C6")%>"> </td><td colspan="2">请填写...</td></tr>
<tr><td>等级</td><td>
<select name="C8" style="width:180px;">
<option selected="selected" value="<%=rs("C8")%>" ><%=rs("C8")%></option>
<option value="请选择...">请选择...</option>
<option value="111">111</option>
<option value="222">222</option>
<option value="333">333</option>
</select>
</td><td colspan="2">请选择...</td></tr>
<tr><td>身份证号</td><td><input name="C9" type="text" id="C9" style="width:180px;" class="STYLE16" value="<%=rs("C9")%>"> </td><td colspan="2">请填写...</td></tr>
<tr ><td colspan="4"><b>*我的登记结论：</b><br><textarea name="jielun" id="jielun" cols ="115" rows = "5"><%=rs("jielun")%></textarea><br>本栏填写你最终的登记结果：<br>如果登记正确无误，请填写： 我是XXX，我保证我登记的就业信息真实无误！</td></tr>
<tr><td colspan="4" height="40">为保障信息畅通，请务必在此输入本人现在的手机号码：<input name="C7" maxlength=11 style="width:130px;" type="text" id="C7" value="<%=rs("C7")%>"> </td></tr>
<tr>
<td colspan="4" align="center" height="80"><input type="submit" name="submit" value="提交信息"><!-- <input type="reset" name="submit" value="重置"> --></td></tr>
</table>
</form>
<p> <%
end if
%>
</p></td>
</tr>
<TR ><TD colspan="2" height=1000></TD></TR>
</table>
</body>
</html>
[解决办法]
你有
rs("now")
now这个字段吗
另外有name="action" value="edit"的表单元素吗？确保执行的代码是if 条件里面的
[解决办法]
<form action="" method="post" name="form" id="form">
<input type="hidden" name="action" value="edit"/>
...其他内容
</form>
