Knap til forward??

Du kan gøre det med et lille script - som dette fra "hjælpen":
Sub Click(Source As Button)
    Dim session As New NotesSession
    Dim workspace As New NotesUIWorkspace
    Dim db As NotesDatabase
    Dim uidoc As NotesUIDocument
    Dim doc As NotesDocument, doc2 As NotesDocument
    Dim item As NotesItem
    Set uidoc = workspace.CurrentDocument
    Set doc = uidoc.Document
    Set db = session.CurrentDatabase
    Set doc2 = New NotesDocument(db)
    Set item = doc.GetFirstItem("Subject")
    Call item.CopyItemToDocument(doc2, "Subject")
    Set item = doc.GetFirstItem("Body")
    Call item.CopyItemToDocument(doc2, "Body")
    Call doc2.Send(True, "Marketing")
End Sub

- eller du kan gøre det med en @-funktion:
@mailsend.
Den sender det aktuelle dokument;
Viser dialogboksen Send post, hvor brugeren kan vælge at kryptere, signere og sende det markerede memo.
Syntaks
@Command([MailSend])
Anvendelse
Et dokument skal være åbent i læse- eller redigeringstilstand, eller markeret i en oversigt. Dokumentet skal indeholde et SendTo-felt, der angiver dokumentets modtagere.

Er du vågen???

Sorry, er ved at gå alle mine spørgsmål igennem, og så lige at jeg ikke har acceptere/afvist denne... Sorry

Hvis jeg sætetr flg. ind:
Sub Click(Source As Button)
    Dim session As New NotesSession
    Dim workspace As New NotesUIWorkspace
    Dim db As NotesDatabase
    Dim uidoc As NotesUIDocument
    Dim doc As NotesDocument, doc2 As NotesDocument
    Dim item As NotesItem
    Set uidoc = workspace.CurrentDocument
    Set doc = uidoc.Document
    Set db = session.CurrentDatabase
    Set doc2 = New NotesDocument(db)
    Set item = doc.GetFirstItem(\"Subject\")
    Call item.CopyItemToDocument(doc2, \"Subject\")
    Set item = doc.GetFirstItem(\"Body\")
    Call item.CopyItemToDocument(doc2, \"Body\")
    Call doc2.Send(True, \"Marketing\")
End Sub


Får jeg en \"Object variabel not set\" når jeg vil forwarde det... Why?
Bruger LN 4.6.6b

Fejlen skyldes formentligt at du forsøger at sætte et richtext item - og for at dette skal lykkedes skal du huske at \"dim´e\" et richtext item først.

Hvis du debugger dit script vil du formodentligt se at det ikke får \"sat\" et rich text item.
:-)
JHR

Hvordan debugger man det så? Ja, jeg er ikke lige haj i LN...

Men hvordan \"dim\'er\" jeg så min ritchtext?

/thomas.

OK - debug det er nemt nok.
Du aktiverer debuggeren i \"File\\tools\\debug lotusscript\"

Problemet med Rich text items er at de ikke eksisterer før dokumentet er gemt - OG at man har forladt det.

Hvis du ikke absolut har behov for et rich text item - så lav det om til et text item el. lign.

Okay, jeg ser på det...

Tak for hjælpen!