PL / SQL được lưu trữ thủ tục ra con trỏ tới VBA ADODB.RecordSet?

Tôi nghĩ nó phải là cái này:

With cmd
    .Properties("PLSQLRSet") = TRUE
    .ActiveConnection = conn
    .CommandType = adCmdText
    .CommandText = "{call their_package.get_product(?,?)}"
    .NamedParameters = True
    .Parameters.Append cmd.CreateParameter("rptid", adNumeric, adParamInput, 0, 98)
    .Parameters.Append cmd.CreateParameter("scenario", adVarChar, adParamInput, 4, "decline001")
End With
...

Set rs = cmd.Execute
cmd.Properties("PLSQLRSet") = FALSE

Lưu ý: Mặc dù họ_package.get_product () có ba tham số, chỉ cần hai tham số vì tham số con trỏ Tham chiếu được trình cung cấp tự động ràng buộc.

Để biết thêm thông tin, hãy kiểm tra tài liệu Oracle: Nhà cung cấp Oracle cho OLE Hướng dẫn của nhà phát triển DB - "Sử dụng OraOLEDB với Visual Basic"