Hallo zusammen,


Warum funktioniert folgender Code nicht?

Variable "no" ist größer 2.
Fehlermeldung:  Illegal Pass by value: (DOCORG)

Sub Initialize
...
   Dim docOrg As NotesDocument
...      
      If no > 2 Then
         NotFinish(docOrg)
      End If
End Sub


Function NotFinish(source As Notesdocument)
      ...
End Function

Du musst die Sub mit Call aufrufen:

call NotFinish(docOrg)

Andreas

Danke an alle....

mit

Call NotFinisch(blablabla)

hats funktioniert....

Na, kunststück, wenn alle dran knabbern ....