Query Disconnected RecordSet

Question

背景：据我所知，我们使用的LOB应用程序能够使用用VBScript编写的宏，但无法访问WScript等。

我已成功接收用户输入，并将其传递给SQL Server上的存储过程，并将记录集返回给应用程序中的VBScript宏。

我现在想要做的就是编写一个函数或循环或其他东西，只要记录集中还有一条记录，接受附加的用户输入，并根据返回的记录集检查它。

从SQL Server返回的记录集包含两列：PART_ID和PART_QTY。对于尽可能多的条目数量，我想接受额外的用户输入，可以说PART_ID_INPUT和PART_QTY_INPUT，并根据内存记录集对其进行验证。

我最大的问题是使用断开连接的记录集。

Answer 1

如有疑问，请阅读documentation。您可以使用Filter和RecordCount属性来确定如果记录包含匹配的记录：

rs.Filter = "" 

目前的战绩可以将其删除：

part_id_input = InputBox("Enter part ID:") 

If part_id_input <> "" Then 
    rs.Filter = "PART_ID = '" & part_id_input & "'" 
    If rs.RecordCount > 0 Then WScript.Echo "Found matching record." 
End If 

该过滤器是通过将其设置为空字符串清除使用Delete方法的记录集：

rs.Delete 

通过导航记录。