为什么这样会死循环

[稻草人seu]

Sid = SPLIT(ID,",")

For i = 0 To UBound(Sid)

Set Rs=Server.CreateObject("ADODB.Recordset")
Sql="Select * From [Food_Food]"
Rs.Open Sql,Conn,1,3

Rs.Addnew
Rs("Title") = HTMLEncode(Title)
Rs("Eatery") = Sid(i)
Rs("Content") = Content
Rs("Author") = "Admin"

Rs("Price") = Price
Rs("TasteScore") = TasteScore
Rs("PriceScore") = PriceScore
Rs("TotalScore") = TotalScore

Rs("isPass") = Request.Form("isPass")
Rs("isCommend") = Request.Form("isCommend")

Rs("UpTime") = Now()
Rs("UpIP") = request.serverVariables("remote_host")
Rs.Update

Rs.Close
Set Rs = Nothing

Conn.ExeCute("Update [Food_Eatery] Set FoodNum = FoodNum + 1 Where ID =" & Sid(i))

Next

[稻草人seu]

去掉中间的加入一条记录就不会死循环

[稻草人seu]

不停的写第一个

[浙外]

不可能吧。你确定是死循环？代码好象没有问题嘛。建议你先不要conn.execute，先把里面的sql语句输出看看。到底出来的是什么结果。

[稻草人seu]

不是conn.execute 的问题呢
是上面一大段的问题 去掉就没事了
否则不停写入第一个数据呢

[hymxtang]

去掉 Rs.Update

[xie_yanke]

Set Rs=Server.CreateObject("ADODB.Recordset")
Sql="Select * From [Food_Food]"
Rs.Open Sql,Conn,1,3
和

Rs.Close
Set Rs = Nothing

放到for 之外

[稻草人seu]

还是不行啊