Creates a new instance of the clsD3SelectList class and executes a TCL command that creates a select list.
Set oSelectList = object.brOpenSelectList( sCmd)
| Parameter | Description |
|---|---|
| oSelectList | An object variable that represents a clsD3SelectList object to be created. |
| object | An object variable that represents a clsD3Environment object. |
| sCmd | A String containing the TCL command that creates a select list. |
With an RPC connectioin, use the full path.
With an ODBC connection, use the Master Dictionary to resolve the path.
An exception is generated if no list is returned from the statement.
Sub Main()
Dim oEnv As New clsD3Environment
Dim oConn As clsD3Connection
Dim oList As clsD3SelectList
Dim sItemId As String
Set oConn = oEnv.brOpenConnection("ODBC", "production")
Set oList = oConn.brOpenSelectList("SELECT Customers")
Do While oList.brReadnext(sItemId)
Debug.Print sItemId
Loop
oConn.brCloseSelectList oList
oEnv.brCloseConnection oConn
Set oEnv = Nothing
End Sub