Question

ASP达人进来看一下，为什么表单提交了，但写不进数据库？

想用这段程序实现修改广告的，但改完了数据后提交，返回到ads_manage.asp页面后还是原来的样子，数据没修改，请达人帮我看看是哪出错了？真郁闷。。。如果修改成功，再追加100分！
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

<!--#include file="Conn.asp"-->
<!--#include file="Admin.asp"-->
<!-- #include file="Inc/Head.asp" -->
<%
if Request.QueryString("mark")="southidc" then
ads_id=request("ads_id")
bname=request("wzname")
kstime=request("kstime")
dqtime=request("dqtime")
ads_sm=request("ads_sm")
ads_content=Request("ads_content")
ads_tp=request("ads_tp")

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from ADS where id="&ads_id
rs.open sql,conn,1,3
rs("bname")=bname
Set rsb = Server.CreateObject("ADODB.Recordset")
sqlb="select * from ads_class "
rsb.open sqlb,conn,1,1
do while not rsb.eof
if rsb("bname")=bname then
rs("wzname")=rsb("wzname")
end if
rsb.movenext
loop
rsb.close
set rsb=nothing
rs("kstime")=kstime
rs("dqtime")=dqtime
rs("ads_sm")=ads_sm
rs("ads_content")=ads_content
rs("ads_tp")=ads_tp
rs("ok")=true
rs.update
rs.close
set rs=nothing
response.redirect "ads_manage.asp"
end if
%>
<%
ads_id=request("id")
Set rs= Server.CreateObject("ADODB.Recordset")
sql="Select * From ADS where id="&ads_id
rs.open sql,conn,3,3
%>
<div align="center"><table width ="100%" border="0" align="center">
<tr><td>
<form method="POST" action="ads_modify.asp?mark=southidc" >
<input type=hidden name=id value="<%=ads_id%>">
<div align="center">

中间内容省略，这部分都对了

<tr>
<td>
<p align="center"><input name="submit" type="submit" value="提交">    
<input type="reset" name="reset" value="重置"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</form>
</td></tr></table>
</div>
lydawen ：你这种方法跟我那种没什么根本区别啊。。。只不过是合起来写而已

二楼的，你说的那地方就对！呵呵，都怪自已不小心啊，真想哭！～～～谢谢你啊！非常非常感谢，没说的，分给你了！300分，及时查收 ！呵呵～～

三楼的同学，你。。会不？来这么一句。。

Answer 1

ads_id=request("ads_id")
<input type=hidden name=id value="<%=ads_id%>"> 'name=id

是不是这个错了？

改成
ads_id=request("id") 看看呢。、

建议先将response.redirect "ads_manage.asp"
改成
response.Write "修改成功"
response.end
否则调试时候出错看不到！！！

Answer 2

把第一个：sql="select * from ADS where id="&ads_id
改为：sql="update ADS set 字段＝'"+值"'"+" 字段...." +" where id="&ads_id

Answer 3

因该是电脑问题～～！
查一查！