Public Sub Query( _ Optional ByVal Conds As Conditions = 0 _ )
Public Sub QueryingDBDataSource() Dim oForm As SAPbouiCOM.Form Dim oDBDataSource As SAPbouiCOM.DBDataSource '// Add a new form Set oForm = SBO_Application.Forms.Add("SampleForm") '// Add a DBDataSource to the Business Partners table Set oDBDataSource = oForm.DataSources.DBDataSources.Add("OCRD") '// Execute the query with the conditions collection oDBDataSource.Query End Sub
DBDataSource Object