Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Fis am 27.08.03 - 09:19:46

Titel: @Mailsend
Beitrag von: Fis am 27.08.03 - 09:19:46

Hallo,

kann man mit @mailsend auch die ganze Form mitsenden oder muß ich jedes Feld aus dieser Form dann angeben?

Oder gibt es eine alternative bei LS

Danke und Gruß
Rodan

Titel: Re:@Mailsend
Beitrag von: Till_21 am 27.08.03 - 09:23:29

Hi Fis,

mit @mailsend glaube ich nicht moeglich...

in script : guck dir die klasse notesdocument insbesondere die methode send an:

Auszug

Call notesDocument.Send( attachForm [, recipients ] )
Parameters
attachForm
Boolean. If True, the form is stored and sent along with the document. If False, it isn't.


gruss

Titel: Re:@Mailsend
Beitrag von: MrMagoo am 27.08.03 - 09:33:53

Hi fis,
was funktioniert ist: ein SendTo Feld mit ins Form, Email Adresse reinschreiben und denn mit Call doc.Send versenden

Gruß

Titel: Re:@Mailsend
Beitrag von: Fis am 27.08.03 - 09:44:26

Ja hab ich gerade gemacht, das SendTo Feld mit in die Form genommen, nur will er noch nicht das Doc schicken.

Feld heißt Mailfield

Dim doc As NotesDocument
Call doc.Send( True, doc.Mailfield )

Titel: Re:@Mailsend
Beitrag von: MrMagoo am 27.08.03 - 09:55:49

Also so hat das bei mir funktioniert:
einen senden Button mit diesem script

Sub Click(Source As Button)
   
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Dim doc As NotesDocument
   
   Set uidoc = workspace.CurrentDocument
   Set doc = uidoc.document
   doc.Subject =  uidoc.fieldgettext("Erstelldatum" )
   Call doc.Save( False, True )
   Call doc.Send( True )
End Sub


und die Email habe ich über eine Button so reingeschrieben
@Command([MailAddress];"SendTo");
@Command([FileSave])

das SendTo Feld ist bearbeitbar vom Typ Namen
bei Eingabeumsetzung: @OptimizeMailAddress(SendTo)

denn müsste es funktionieren
Gruß