Follow my blog...........

                Dim session As New NotesSession                 Dim uiWs As New NotesUIWorkspace                 Dim uiDoc As NotesUIDocument                 Dim db As NotesDatabase                 Dim serverName, dbName As String                 Dim formDataType As NotesForm                 Dim msgFormVar As Variant                 Dim msgForms List As String          ...