将第二条记录数据插入数据库时​​遇到问题

Question

用户可以在表单中添加多个字段。

当他们提交表单时，我需要接收这些数据，将其保存在数据库中并将用户重定向到表单页面。

但是，只有第一个数据被插入到数据库中，并且用户被立即重定向回表单页面。

我在这里做错了什么？

For i = 0 to Request.Form("totalGRADES") 
    If Request.Form("x") = "p" AND Session("Access") = "On" Then 

     classYEAR = Clean(Request.Form("classYEAR" & i)) 
     gpa   = Clean(Request.Form("gpa" & i)) 

     Call AddGrades (classYEAR, gpa) 

    End If 
Next 


Sub AddGrades (classYEAR, gpa) 

    SQL = "INSERT INTO grades (memberid, classYEAR, gpa, dateENTERED) VALUES ('"& Session("MEMBERID") &"', '"& classYEAR &"', '"& gpa &"', '"& FormatDateMySQL(NOW) &"')" 
    Set objAddGRADE = objConn.execute(SQL) 

Response.Redirect Request.ServerVariables("HTTP_REFERER") 

End Sub 

Answer 1

从Sub移动Response.Redirect Request.ServerVariables("HTTP_REFERER")，并将其放置后Next声明。 顺便说一句，你的代码是不安全的。在将表单字段值传递给SQL之前，您需要检查它是否为'等等......