Network Programming in .NET

Dim SDO                 As SageDataObject90.sdoEngine
    Dim WS                  As SageDataObject90.WorkSpace
    Dim sdoCompany          As SageDataObject90.SetupData
           
    Set SDO = New SageDataObject90.sdoEngine
    Set WS = SDO.Workspaces.Add("Myconnection")
   
    ‘Connect to data files
    WS.Connect SageLocation, SageUsername, SagePassword, "ThisIsUnique"
   
    ‘Create an instance of InvoicePost & Record object’s
    Set sdoCompany = WS.CreateObject("SetupData")
   
    Me.txtCompanyName.Text = sdoCompany.Fields("NAME")
    Me.txtVatNumber.Text = sdoCompany.Fields("VAT_REG_NUMBER")
   
    ‘ Disconnect
    WS.Disconnect