Data Binding Fail

Question

Hi
   all i wana be featching data in combo box but i
   have still face a proble how can do it
   thanks

Answer 1

Hi Mohd,
Herewith an example of data entry into a combo box. Not sure where the problem is you are facing, but here's an example:
    Dim oForm As SAPbouiCOM.Form
    Dim oCombo As SAPbouiCOM.ComboBox
    Dim oRecord As SAPbobsCOM.Recordset
    Try
        oForm = oApplication.Forms.ActiveForm
        oForm.DataSources.UserDataSources.Add("u_Name", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 50)
        oCombo = oForm.Items.Item("c_Combo").Specific()
        oCombo.DataBind.SetBound(True, "", "u_Name")
        oRecord = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)
        oRecord.DoQuery("SELECT CardCode, CardName FROM OCRD")
        oRecord.MoveFirst()
        While Not oRecord.EoF
            oCombo.ValidValues.Add(oRecord.Fields.Item(0).Value, oRecord.Fields.Item(1).Value)
            oRecord.MoveNext()
        End While
        System.Runtime.InteropServices.Marshal.ReleaseComObject(oRecord)
    Catch ex As Exception
        oApplication.MessageBox("Error: " & ex.Message")
    End Try
Hope it helps,
Adele