Problem mi Funktion LS

[TomLudwig]

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

[ata]

... versuch es mal mit einer anderen Variable als "Source" anzunehmen...

ata

[Glombi]

Du musst die Sub mit Call aufrufen:

call NotFinish(docOrg)

Andreas

[Semeaphoros]

... oder die Klammern weglassen.


PS: Andreas: im Moment wird man automatisch umfangreicher, wenn man Deine Postings anschaut .....  

[TomLudwig]

Danke an alle....

mit

Call NotFinisch(blablabla)

hats funktioniert....

[Glombi]

PS: Andreas: im Moment wird man automatisch umfangreicher, wenn man Deine Postings anschaut .....  

und die Toblerone wird auch immer kürzer  

[Semeaphoros]

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