Returns a string containing a specific attribute, value, or sub-value extracted from a clsD3DynamicArray object.
sValue = object.brExtractStr( vnAMC, [ vnVMC], [ vnSVMC])
Parameter | Description |
---|---|
sValue | The return value is a String data type that is the extracted element. |
object | An object variable that represents a clsD3DynamicArray object from which an element is extracted. |
vnAMC | A Variant (Long subtype) specifying the attribute mark count where the extraction will begin. |
vnVMC | Optional. A Variant (Long subtype) specifying the value mark count where the extraction will begin. |
vnSVMC | Optional. A Variant (Long subtype) specifying the sub-value mark count where the extraction will begin. |
If vnAMC is zero, the entire dynamic array is returned.
The following program displays the output of the list command to show a random sampling of data from the customers file.
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
extract