Question

我创建了一个传递查询（qMasterPass），通过该查询，我可以使用以下代码轻松调用任何其他SQL存储过程-该示例还更新了一个列表框，并且可以正常工作：

With CurrentDb.QueryDefs("qMasterPass")
     .SQL = "exec DeliverySearch " & txtSearch
     Set Me.lstSearchResults.Recordset = .OpenRecordset
End With

我将如何修改以上内容以附加到本地Access表（tmpDelPack）。 GeneralSearch SP包含两个字段，DeliveryNum和Package

Answer 1

该参数已经写入传递查询中，因此您可以简单地将其用作INSERT查询的源。

INSERT INTO tmpDelPack
SELECT * FROM qMasterPass

您可以像这样运行它：

Set Db = CurrentDb
Db.QueryDefs("qMasterPass").SQL = "exec DeliverySearch " & txtSearch
Db.Execute "INSERT INTO tmpDelPack SELECT * FROM qMasterPass"

使用参数的访问传递附加到本地表

1 个答案: