Domino 9 und frühere Versionen > ND8: Entwicklung

E-Mail Per Lotus Script Versenden

<< < (3/4) > >>

Mitch:
Heyho,

eine ordentliche Fehlerbehandlung wird dir bei der Suche nach dem Problem sicherlich helfen.

Lies dir doch mal das hier durch: http://atnotes.de/index.php/topic,11980.0.html

Zusätzlich solltest du dir den Prozess mal im Debugger ansehen.

Beste Grüße,

Mitch

niu:
@Mitch Vielen Dank für deine Info die hat mich weitergebracht


@Andreas
Habe das ganze Debuggen lassen der Fehler liegt bei dieser Zeile Code:
Set doc = CurrentDocument.Document

Die Variable "doc" wurde so definiert:
Dim doc As NotesDocument

Peter Klett:

--- Zitat von: ascabg am 18.04.13 - 11:10:18 ---...
Und das Dokument, welches Du versenden willst, ist hoffentlich bereits gespeichert?
...

--- Ende Zitat ---
Das ist nicht nötig, ein Dokument kann versendet werden, ohne gespeichert zu sein.

Peter Klett:

--- Zitat von: niu am 18.04.13 - 11:40:45 ---@Mitch Vielen Dank für deine Info die hat mich weitergebracht


@Andreas
Habe das ganze Debuggen lassen der Fehler liegt bei dieser Zeile Code:
Set doc = CurrentDocument.Document

Die Variable "doc" wurde so definiert:
Dim doc As NotesDocument




--- Ende Zitat ---

Dim workspace As New NotesUIWorkspace
Dim doc As NotesDocument
Set doc = workspace.CurrentDocument.Document


Besser wäre m.E.

Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.Document

ist aber Geschmacksache ...

Mitch:
Weiterer Tipp:

Gibt unter "Options" mal folgendes ein:


--- Code: ---Option Explicit
--- Ende Code ---

Damit erzwingst du, dass du alle verwendeten Variablen auch deklarieren musst.

Ich vermute dein Fehler hängt damit zusammen, dass du "ws" nicht deklariert/initialisiert hast. Kein Workspace, kein CurrentDocument, kein Document.

Gruß,

Mitch

Edit: Korrektur.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete