Error:
Failed To Connect, Please Check The License Configuration.....Connection to license service failed; license service address is not valid, or license service is stopped (or does not respond)
Plz check anyone of you same code working for other Addon getting an issue
Sub Main()
Try
oGFun.SetApplication() '1)
'oApplication.SetFilter(New SAPbouiCOM.EventFilter) '2)
oApplication = oGFun.oApplication
If Not oGFun.CookieConnect() = 0 Then '3)
oApplication.MessageBox("DI Api Conection Failed")
End
End If
oGFun.HWKEY = HWKEY
If Not oGFun.ConnectionContext() = 0 Then '4)
System.Windows.Forms.MessageBox.Show("Failed to Connect Company", addonName)
If oGFun.oCompany.Connected Then oGFun.oCompany.Disconnect()
System.Windows.Forms.Application.Exit()
End
End If
oCompany = oGFun.oCompany
Catch ex As Exception
System.Windows.Forms.MessageBox.Show("Application Not Found", addonName)
System.Windows.Forms.Application.ExitThread()
Finally
End Try
Try
Try
Dim oTableCreation As New TableCreation '5)
EventHandler.SetEventFilter()
' oGFun.AddXML("Menu.Xml")
'7)
' oApplication.Forms.Item("1174000000").Items.Add("ll", SAPbouiCOM.BoFormItemTypes.it_EDIT)
' Dim oMeniItem As SAPbouiCOM.MenuItem = EventHandler.oApplication.Menus.Item("INM")
' oMeniItem.Image = System.Windows.Forms.Application.StartupPath & "\ManImage.bmp"
'Changed by Sankaralakshmi
Catch ex As Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
System.Windows.Forms.Application.ExitThread()
Finally
End Try
oApplication.StatusBar.SetText("Connected.......", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success)
oApplication.Menus.Item("51201").Activate()
't = New System.Threading.Thread(Application())
't.Start()
Application.Run()
'AddOn Menu activation
Catch ex As Exception
oApplication.StatusBar.SetText(addonName & " Main Method Failed : ", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error)
Finally
End Try
End Sub