Skip to Content
avatar image
Former Member

Addon Connection Time Out

Hi,

I am trying to install my addon but it always says AddOn Connection Time Out.

I have created an addon in Vb.net.

This is my code, please help me in this.

Dim oSboGuiApi As New SAPbouiCOM.SboGuiApi

Dim sConnStr As String

sConnStr = Environment.GetCommandLineArgs.GetValue(1) 'Set the AddOn identifier (optional) – some long string with numbers

oSboGuiApi.Connect(sConnStr)

SBO_Application = oSboGuiApi.GetApplication()

oSboGuiApi = Nothing

Dim oItems As SAPbouiCOM.Items = SBO_Application.Forms.Item(FormUID).Items

Dim oMatrix As SAPbouiCOM.Matrix

Dim oItem As SAPbouiCOM.Item

'Dim oSetting As SAPbouiCOM.CommonSetting

Dim oComboBox As SAPbouiCOM.ComboBox

oItem = oItems.Item("38")

oMatrix = oItem.Specific

oComboBox = oItems.Item("88").Specific

If oComboBox.Selected.Value = "59" Then

oMatrix.Columns.Item("15").Visible = True

oMatrix.Columns.Item("31").Visible = False

oMatrix.Columns.Item("35").Visible = False

oMatrix.Columns.Item("158").Visible = False

oMatrix.Columns.Item("U_PODate").Visible = False

oMatrix.Columns.Item("U_Inspection").Visible = False

oMatrix.Columns.Item("U_Agency").Visible = False

oMatrix.Columns.Item("U_DrawingRecieved").Visible = False

oMatrix.Columns.Item("U_ExpectedDate").Visible = False

oMatrix.Columns.Item("U_ExpectedDateInsp").Visible = False

oMatrix.Columns.Item("U_DispatchDate").Visible = False

oMatrix.Columns.Item("U_CheckItem").Visible = False

oMatrix.Columns.Item("U_SubmittedApproval").Visible = False

oMatrix.Columns.Item("U_ApprovalRead").Visible = False

oMatrix.Columns.Item("U_ManufacturingClear").Visible = False

ElseIf oComboBox.Selected.Value = "61" Then

oMatrix.Columns.Item("15").Visible = False

oMatrix.Columns.Item("158").Visible = True

oMatrix.Columns.Item("U_PODate").Visible = True

ElseIf oComboBox.Selected.Value = "60" Then

oMatrix.Columns.Item("15").Visible = False

oMatrix.Columns.Item("158").Visible = False

oMatrix.Columns.Item("U_PODate").Visible = False

oMatrix.Columns.Item("U_Inspection").Visible = True

oMatrix.Columns.Item("U_Agency").Visible = True

oMatrix.Columns.Item("U_DrawingRecieved").Visible = True

oMatrix.Columns.Item("U_ExpectedDate").Visible = True

oMatrix.Columns.Item("U_ExpectedDateInsp").Visible = True

oMatrix.Columns.Item("U_DispatchDate").Visible = True

oMatrix.Columns.Item("U_CheckItem").Visible = True

oMatrix.Columns.Item("U_SubmittedApproval").Visible = True

oMatrix.Columns.Item("U_ApprovalRead").Visible = True

oMatrix.Columns.Item("U_ManufacturingClear").Visible = True

oMatrix.Columns.Item("31").Visible = True

End If

Add comment
10|10000 characters needed characters exceeded

  • Follow
  • Get RSS Feed

1 Answer

  • May 27, 2015 at 06:59 AM

    Hi Ravi,,

    removing

    oSboGuiApi = Nothing


    might help.


    regards


    Ad

    Add comment
    10|10000 characters needed characters exceeded