asp表单提交没反映，帮帮忙啊~

Question

sql的数据库，添加的没有问题，修改数据的表单提交没有反映，一点就出一个占CPU很高的进程——W3WP.exe！！！网页代码如下：
1.ASP

<!--#include file="conn.asp"-->
<%
dim id
id=Request("id")
If id="" Then
response.write "非法的请求"
Else
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM cldata where id="+id
rs.Open sql,conn,3,2
%>
<link rel="stylesheet" href="css.css">
<br><br><br><br>
<table border="1" cellspacing="1" cellpadding="5" align="center" height="10" bordercolor="#7C96B8" bordercolordark="#FFFFFF" width="582">
<form method="post" action="2.asp?id=<%=request("id")%>" name="Form1">
<TR bgcolor="#7C96B8">
<td height="20" colspan="2"><font color="#FFFFFF">修改</font></td>
</TR>
<tr>
<td width="61">1：</td>
<td width="492">
<input name="xm" type="text" id="xm" value="<%=rs("name")%> " size="20"></td>
</tr>
<tr>
<td width="61">2：</td>
<td width="492">
<input name="cp" type="text" id="cp" size="18" value="<%=rs("cepai")%>"></td>
</tr>
<tr>
<td width="61">3：</td>
<td width="492">
<input name="cjh" type="text" id="cjh" size="38" value="<%=rs("cjh")%>"></td>
</tr>
<tr>
<td width="61">4：</td>
<td width="492">
<input name="fdjh" type="text" id="fdjh" size="38" value="<%=rs("fdjh")%>"></td>
</tr>
<tr>
<td width="61">5：</td>
<td width="492">
<input type="text" name="sj" onFocus="CalendarWebControl.show(this,false,this.value);" size="20" value="<%=rs("shijian")%>"><script src="time.js"></script></td>
</tr>
<tr>
<td width="61">6：</td>
<td width="492">
<input name="dd" type="text" id="dd" size="50" value="<%=rs("didian")%>"></td>
</tr>
<tr>
<td width="61">7：</td>
<td width="492">
<input name="aq" type="text" id="aq" size="80" value="<%=rs("anqing")%>"></td>
</tr>
<tr>
<td width="61">8：</td>
<td width="492">
<input name="dw" type="text" id="dw" size="50" value="<%=rs("ladw")%>"></td>
</tr>
<tr align="center">
<td height="16" colspan="2"><input type="submit" name="Submit" value="修改">
<input type="reset" name="Submit2" value="重置"></td>
</tr>
</FORM>
</table>
<%end if%>

2.ASP

<!--#include file="conn.asp"-->
<%
xm=request.form("xm")
cp=request.form("cp")
cjh=request.form("cjh")
fdjh=request.form("fdjh")
sj=request.form("sj")
dd=request.form("dd")
ladw=request.form("aq")
ladw=request.form("ladw")
id=request("id")
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM cldata where id="&id
rs.Open sql,conn,3,2
rs("name")=xm
rs("cepai")=cp
rs("cjh")=cjh
rs("fdjh")=fdjh
rs("shijian")=sj
rs("didian")=dd
rs("anqing")=aq
rs("ladw")=ladw
rs.update
rs.close

conn.close
set conn=nothing
response.write "<script>alert('数据修改成功.');location.replace('index.asp')</script>"
%>

Answer 1

sql = "SELECT * FROM cldata where id="+id 有误
没有打开纪录级，当然修改不了
改为sql = "SELECT * FROM cldata where id=" & id

Answer 2

把2.asp中的提交代码改如下:

<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM cldata where id="&id
rs.Open sql,conn,1,3
rs("name")=xm
rs("cepai")=cp
rs("cjh")=cjh
rs("fdjh")=fdjh
rs("shijian")=sj
rs("didian")=dd
rs("anqing")=aq
rs("ladw")=ladw
rs.update
rs.close

conn.close
set conn=nothing
response.write "<script>alert('数据修改成功.');location.replace('index.asp')</script>"
%>

参考资料：随心所欲

本回答被网友采纳

Answer 3

你传的值是个空的。<form method="post" action="2.asp?id=<%=request("id")%>" name="Form1"> 中的id 后面应该有值的。但<%=request("id")%>本身是要先得到一个值的。你的id 是那儿来的值？加我QQ：94583908

Answer 4

在2.asp中，出现这个错误：
ladw=request.form("aq")
ladw=request.form("ladw")
看来应改为：
aq=request.form("aq")
ladw=request.form("ladw")

Answer 5

<form method="post" action="2.asp?id=<%=request("id")%>
试一下,将id的双引号改为单引号