Error in opening DialogBox

Hi, I’m a VB developer. Currently I hava a integration with Lotus Notes using VB program below is my sample code.

=============================

Private Sub Command1_Click()

Dim ws As Object

Dim uidoc As Object

Dim doc As Object

Set ws = CreateObject(“Notes.NotesUIWorkspace”)

Set uidoc = ws.COMPOSEDOCUMENT(“server”, “problem.nsf”, “VBNewDoc”)

Set doc = uidoc.Document

doc.field1= Text1

Call ws.DIALOGBOX(“DlgBox”, True, True, False, False, False, False, “Doc1”)

End Sub

===================================

This code working fine, if the Notes Client window is open in Maximize mode. However, if i minimize the Notes Client window, Notes’s error will prompted “Notes automate error”.

Could anyone help me to solve problem.

Thanks

Iris

Subject: Error in opening DialogBox

In the Domino Designer help for NotesUIWorkspace it says “Note This class is not supported in COM.”

Subject: This is not COM, it’s OLE

Set ws = CreateObject(“Notes.NotesUIWorkspace”)is OLE automation and supports UI-classes

Set ws = CreateObject(“Lotus.NotesUIWorkspace”)

is COM and does NOT support UI-classes

It seems that the Notes client cannot bring up UI actions when it’s minimized.

Perhaps you should first maximize the Notes client again within VB (Appactivate)