【发布时间】:2019-06-27 08:56:03
【问题描述】:
我正在使用 Classic ASP 访问我们网络服务器上的 Access 数据库。应用程序检查网络/表格的传感器更新,即打印最后 5 条记录。该代码在历史上适用于多个表。我最近向数据库添加了一个新表,当我修改代码以从新表中检索记录时,我得到一个 recordcount = -1,它只输出最后一条记录。我已阅读有关 Recordset Cursor 的信息,但不确定我是否了解如何将其应用于我的代码,以及为什么该代码不适用于这个新表?下面是检索打印记录的基本代码:
WebName = "OurWeb"
MySite = "filedsn=" & Server.MapPath("/" & WebName & "/files/reffiles/accessdsn.dsn") & ";DBQ=" & Server.MapPath("/" & WebName & "/files/reffiles/loger.mdb") & ";DefaultDir=" _
& Server.MapPath("/" & WebName & "/") & ";"
set MyDatabase = server.createobject("ADODB.Connection")
if err.number <> 0 then response.write("<p>ODBC Error</p>")
Mydatabase.open MySite
set LastMyDate = MyDatabase.Execute("SELECT Format(Max([Date_Time]),'mm/dd/yy hh:mm:ss') AS Expr1 FROM Charger2;")
set LastMYDate = MyDatabase.Execute("SELECT Charger2.id FROM Charger2 WHERE Charger2.date_Time = #" & lastMGdate.fields(0).value & "#;")
MyIDLast = LastMyDate.fields(0).value -5
set LastMyRecord = MyDatabase.Execute("SELECT Charger2.id, Charger2.date_time, Charger2.INV_vdc, Charger2.INV_adc FROM Charger2 WHERE (((Charger2.id) > (" & MyIDLast & ")));")
Id 是一个自动编号整数。此时,recordcount 属性为“-1”。当我直接从 Access Program 界面运行 Select 查询时,它会返回正确的数字。
感谢您提供任何帮助并深入了解为什么此表会出现此问题...RDK
【问题讨论】:
标签: sql ms-access asp-classic