Returns a clsD3DynamicArray object containing the captured output produced by the last brExecute, if the brResults property specified D3ExecuteCapturing or D3ExecuteWithBoth.
Set oDynArray = object.brCapturing
Parameter | Description |
---|---|
odynArray | The return value is an object variable that represents a clsD3DynamicArray object. |
object | An object variable that represents an object in the Applies To list. |
Sub Main() Dim oEnv As New clsD3Environment Dim oConn As clsD3Connection Dim oTCLCmd As clsD3TclCommand Dim sResult As String Dim sNumOrders As String Set oConn = oEnv.brOpenConnection("ODBC", "Production") Set oTCLCmd = oConn.brOpenTclCommand("") oTCLCmd.brCommand = "run dm,bp, process.orders" ' Provide appropriate data that is typically ' entered by the user. oTCLCmd.brData "Y" & D3AMChr & "Y" oTCLCmd.brResults = D3ExecuteCapturing oTCLCmd.brExecute Debug.Print oTCLCmd.brCapturing.brCString sResult = oTCLCmd.brCapturing.brExtractStr(1) sNumOrders = oTCLCmd.brCapturing.brExtractStr(2) oConn.brCloseTclCommand oTCLCmd oEnv.brCloseConnection oConn Set oEnv = Nothing End Sub
execute - "capturing" clause