Discussions
Categories
Groups
Community Home
Categories
INTERNAL ENABLEMENT
POPULAR
THRUST SERVICES & TOOLS
CLOUD EDITIONS
Quick Links
MY LINKS
HELPFUL TIPS
Back to website
Home
Web CMS (TeamSite)
IManExt.OpenCmd problem
icebox
Hi im integrating Desksite into Lotus Notes and are right now trying to make a function to open documents through the OpenCmd command from Desksite.
Im guessing that its the "SelectedNRTDocuments" that is coursing problems. All operations seems to run just fine, but when i get to the Execute command the the status is 1 -> error, and i know for a fact that the window is grabbed.
Anyone knows what is wring with this?
Dim oOpenCmd As Variant ' IMANEXT.OpenCmd
Dim oContext As Variant ' IMANEXT.ContextItems
Dim pArrDox(0) As Variant ' IManage.NRTDocument
Dim status As Integer
Set oOpenCmd = CreateObject("IMANEXT.OpenCmd")
Set oContext = CreateObject("IMANEXT.ContextItems")
' The information is from a previous search
Set pArrDox( 0 ) = myDb.getDocument("577741", 1)
oContext.add "ParentWindow", GetActiveWindow()
oContext.add "SelectedNRTDocuments", pArrDox()
oOpenCmd.Initialize oContext
oOpenCmd.Update
If oOpencmd.status = 0 Then
oOpenCmd.Execute
End If
Find more posts tagged with
Comments
jny
There seems to be a syntax error: you cannot pass in a safearray in late-bound.
The imanext.dll does not fully support late-binding.