Skip to Content
author's profile photo Former Member
Former Member

Link betwwen xml object and VB code

Posted on Jun 01, 2004 at 04:37 PM 11 Views

Hello,

I don't arrive to link my xml objet and my VB code.

I load my XML form.

I'm connected to the company.

My object (business partners) in the VB code have the right value.

But I can't show the object value in my object it_EDIT)on the xml form.

Could you help me.

Thanks

Jerome

SAP Business One Extensibility
Add comment
10|10000 characters needed characters exceeded

2 Answers

  • author's profile photo Former Member
    Former Member
    Posted on Jun 06, 2004 at 02:15 PM

    Hi

    I could not understand what is it that you need to do.

    Please attach some code - so I'll have better understanding of what you're trying to do.

    Best regards

    Yaniv G.

    SDK Support

    SAP Manage Israel.

    Add comment
    10|10000 characters needed characters exceeded

    • Former Member
      Jun 11, 2004 at 12:56 PM

      Hi,

      Thank you for you help.

      There are my 3 files (XML, global and form1)

      The XML file (test_XML) :

      0 Then

      Obj_Company.GetLastError(lErrCode, sErrMsg)

      MsgBox(sErrMsg)

      Else

      MsgBox("Connecté à la société : " & Obj_Company.CompanyName)

      'aff()

      End If

      End Sub

      ' Private Sub Proc_Load(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Load

      Private Sub aff()

      Obj_Business_Partners = Obj_Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oBusinessPartners)

      Obj_Record_Set = Obj_Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)

      Obj_Record_Set.DoQuery("Select cardcode from ocrd where cardtype = 'C'")

      Obj_Business_Partners.Browser.Recordset = Obj_Record_Set

      Affiche_Resultat()

      End Sub

      Private Sub Affiche_Resultat()

      MsgBox("CardCode : " & Obj_Business_Partners.CardCode)

      MsgBox("CardName : " & Obj_Business_Partners.CardName)

      ' Here is my problem.

      ' I would like that CardCode and CardName containt the data and show in my windows called test_XML.

      ' Whit the two above lignes, I check that my Obj_Business_Partners containt the data.

      'CardCode.Text = Obj_Business_Partners.CardCode

      'CardName.Text = Obj_Business_Partners.CardName

      End Sub

      End Class

  • author's profile photo Former Member
    Former Member
    Posted on Jun 07, 2004 at 11:36 AM

    Hi Jerome,

    make sure that you have linked your EditText to a valid dbdatasource referring your table and column.

    Before any data is displayed, you also need to execute

    MyDbDatasource.Query to actually get the data.

    Also look into the basic sample code provided by SAP.

    HTH

    Lutz Morrien

    Add comment
    10|10000 characters needed characters exceeded