AccpacSession.Init Error 1.2796.37

[klaussang]

When I use AccpacCOMAPI in ACCPAC 5.3, the AccpacSession.Init method cause an Exception, the error message is "1.2796.37"

The Code:

Public session As AccpacCOMAPI.AccpacSession

Public Sub InitSession(ByVal adminpassword As String, ByVal company As String)
session = New AccpacCOMAPI.AccpacSession
session.Init("", "AS", "AS3001", "53A") 'Exception here
session.Open("ADMIN", adminpassword, company, Date.Now, 0, "")
End Sub


How can i deal it?

 

[ettienne]

Use .Clone instead.

 

[DjangMan]

I think you should have:

set session = New AccpacCOMAPI.AccpacSession
session.Init "", "XY", "XY0001", "53A"
session.open "ADMIN", adminpassword, company, Date.Now, 0, ""

 

[klaussang]

.Clone is not work either.
Can you give me more detail?

 

[ettienne]

How does .Clone not work?

 

[klaussang]

My VB.NET code with .Clone, It's still cause the same Exception sometime.

Public session As AccpacCOMAPI.AccpacSession
Public Sub InitSession(ByVal company As String)
session = New AccpacCOMAPI.AccpacSession
Try
session.Init("", "AS", "AS3001", "53A")
Catch
session.Clone(company)
End Try
End Sub