|
我的实现代码如下:
<%
bh=Replace(Request.Form("bh"),"'","''")
huifu=Replace(Request.Form("huifu"),"'","''")
%>
<% if huifu="" then
response.write"<script>alert('没有回复,请填写回复内容,谢谢!');history.back(-1);</script>"
response.End()
end if%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "Select * From liuyan"
rs.Open sql,cn,1,3
%><%
do until rs.eof
if bh=("bh") then
rs.addnew
rs("huifu")=huifu
rs.update
end if
rs.movenext
loop
rs.close
set rs=nothing
%>
代码没有错误显示,也成功地转到了指定页面
但是根本没有把要添加的数据插入到数据库中。
是什么原因呢?
各位希望大侠能给予指点!谢谢! |
|