跳出 for循环后不执行语句

来源:百度知道 编辑:UC知道 时间:2024/05/20 15:08:41
dim chargedate,chargecode,chargeamount,i
if request("action")="update" then

for i=1 to 10

Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "select * from bill",conn,1,3
rs.addnew
rs("chargedate")=replace(request.form("chargedate")(i),"'","")
rs("chargeamount")=replace(request.form("chargeamount")(i),"'","")
rs("chargecode")=replace(request.form("chargecode")(i),"'","")
rs.update
if request.form("chargeamount")=" " then
exit for

end if
next

conn.close
set conn=nothing
response.write "<script language=javascript>alert('fill!');window.location.href='admin_info.asp';</script>"
end if

我的目的是当request.form("chargeamount"

没什么错误, 如果能正确执行到弹出个框显示"fill!", 就没错了.

但假如没有弹出这个框来, 就要看具体是什么错误信息.

你这段ASP代码给得也不全, 比如创建conn的部分没给出来.

所以还是自己再调试调试, 就从你给出的这段代码看, 是没什么问题的.