Database Asp Classic ADODB记录集缺少记录

我的网站中最简单的组件之一就是在代码没有任何变化的情况下，一天又一天停止工作

'Connection Declaration as connection
Set rs = Server.CreateObject ("ADODB.Recordset")
rs.Open "SELECT * FROM tablename ORDER BY id DESC", connection, 1, 3
while not rs.EOF
  'writing some Table from the records in DB
  'Simplified Code %>
  <tr><td><%=rs("id")%></td><td><%=rs("description")&></td></tr>
  <%
  rs.MoveNext
Wend

“作为连接的连接声明”
Set rs=Server.CreateObject（“ADODB.Recordset”）
rs.打开“按id描述从表名顺序中选择*”，连接，1，3
而不是卢比
'从数据库中的记录写入一些表
'简化代码%>
一些建议

如果尚未使用Option Explicit-（我在代码中没有看到它），这将显示SQL错误，因此可能会有所帮助

检查一下你没有破坏RS

此外，“连接，1，3”表示“活动连接”、“游标类型”、“锁定类型”

你的游标类型是'adOpenKeySet'-3或'adOpenStatic'更好，除非你特别想要一个键集？尝试以这种方式调用Open来强制默认值（奇怪的是分别为3和1！）：

我通常也会这样写RS输出循环：

If Not RS.BOF Then
   ' write table tag HTML
   Do While Not RS.EOF
      ' write table row + row data
      RS.MoveNext
   Loop
   ' write end table tag HTML
Else
   ' write "RS is empty!"
End If

这将更容易判断记录集是否为空。
一些建议

如果尚未使用Option Explicit-（我在代码中没有看到它），这将显示SQL错误，因此可能会有所帮助

检查一下你没有破坏RS

此外，“连接，1，3”表示“活动连接”、“游标类型”、“锁定类型”

你的游标类型是'adOpenKeySet'-3或'adOpenStatic'更好，除非你特别想要一个键集？尝试以这种方式调用Open来强制默认值（奇怪的是分别为3和1！）：

我通常也会这样写RS输出循环：

If Not RS.BOF Then
   ' write table tag HTML
   Do While Not RS.EOF
      ' write table row + row data
      RS.MoveNext
   Loop
   ' write end table tag HTML
Else
   ' write "RS is empty!"
End If

这将更容易判断记录集是否为空。
查询结束时连接1、3的目的是什么？这不再是查询，而是连接和游标的定义。您也可以这样做：rs.Connection=Connection rs.Cursors=1,3 rs.open（query）如果您的代码使用不同的数据库，那么错误更可能出现在数据库中，而不是ASP。在查询结束时，
Connection，1,3
的目的是什么？这不再是查询，而是连接和Cursors的定义。您也可以这样做：rs.Connection=Connection rs.Cursors=1,3 rs.open（query）如果您的代码使用不同的数据库，那么错误更可能出现在数据库中，而不是数据库中。谢谢您的建议。我休假了一个月，所以我的同事尝试了一下，发现造成错误的环境有一点不同。就因为你想知道，
连接，1，3
是我们的“编码标准”（我们没有，只有nvm）。最后，在表中使用的一些丢失的文件夹中发现了错误（如果它们存在的话）。我的同事解决了这个问题，所以我接受你的回答谢谢你的建议。我休假了一个月，所以我的同事尝试了一下，发现造成错误的环境有一点不同。就因为你想知道，
连接，1，3
是我们的“编码标准”（我们没有，只有nvm）。最后，在表中使用的一些丢失的文件夹中发现了错误（如果它们存在的话）。我的同事解决了这个问题，所以我接受你的答案