0

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

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

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

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

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

4

1 回答 1

1

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

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

通过将过滤器设置为空字符串来清除过滤器：

rs.Filter = ""

可以使用以下Delete方法从记录集中删除当前记录：

rs.Delete

MoveFirst通过/ MoveLast/ MoveNext/MovePrevious浏览记录。

于 2013-08-07T07:23:33.263 回答