经典 ASP 和 MS 访问批处理更新



我使用以下代码更新具有经典 Asp 的访问数据库:

<%@ Language=VBScript %>
<% Option Explicit %>
<%
Response.Buffer = True
'First, we need to get the total number of items that could be updated
Dim iCount
iCount = Request("Count")
'We need to obtain each cost and ID
Dim strstudent, strcourse, strgrade, strcomments
'We will also need to build a SQL statement
Dim strSQL
Dim conn

set conn=server.CreateObject("ADODB.connection")
conn.ConnectionString="provider=Microsoft.jet.OLEDB.4.0;data source=C:dbagsystem.mdb"
conn.Open
'Now, we want to loop through each form element
Dim iLoop
For iLoop = 0 to iCount
'student data
strstudent = Request(iLoop & ".Student")
'course data
strcourse = Request(iLoop & ".course")
'grade
if isNull(Request(iLoop & ".grade")) or Request(iLoop & ".grade")="" then
strgrade="null"
else
strgrade= Request(iLoop & ".grade")
end if
if isNull(Request(iLoop & ".comments"))  or Request(iLoop & ".comments")="" then
strcomments=null
else
strcomments=Request(iLoop & ".comments")
end if
strSQL = "UPDATE testing SET semester2 = " & strgrade & ", commentss=" & "'" & strcomments & "'" & "  WHERE newstudentid = " &"'"& strstudent&"'" & " and Courseid = " & "'"& strcourse & "'"
conn.Execute strSQL
Next
conn.Close
Set conn = Nothing
Response.Redirect "protected.asp"
%>

问题是,在服务器中进行测试时,它会毫无问题地更新。但是当从无线网络访问时,它不会更新。

要更新的目标表有大约 27,000 条记录我需要知道我做错了什么,或者是否有其他方法。

我在仔细分析情况后发现了错误。

主键中具有空格(例如"2 OR 13")的记录将不会更新。但是主键中没有空格的记录(如"2CEN13")可以完美更新。我没有时间在我的asp代码中解决它,所以我编辑了所有带有空格的记录并解决了问题。

相关内容

  • 没有找到相关文章

最新更新