Domino 9 und frühere Versionen > ND8: Entwicklung

aus dem Querysave einen NotesDocLink per Mail verschicken ? es geht ned !

(1/2) > >>

Scotty67:
...maaa ich gehe die Wände hoch...

Will über den querysave aus dem neu erzeugten dokument einen DocLink per Mail verschicken - bitte helft mir !!!

hier der entscheidende part im querysave

Notify:
   
   Dim docmail As New NotesDocument(db)
   docmail.Form="Memo"
   docmail.From=" Besuchsberichte Notifier"
   docmail.Principal=" Besuchsbericht Agent"
   docmail.Subject=" Besuchsbericht Datenbank"
   ' Notify Liste aufbauen
   Set uidoc = workspace.CurrentDocument
   Set doc=uidoc.document
   
   MailPrimary=doc.GetItemValue("SendTo")
   Mailcc=doc.GetItemValue("SendCc")
   
   Forall MailToReceipients In MailPrimary   
      'Msgbox MailToReceipients
      docmail.SendTo=MailToReceipients
      Set rtitem = New NotesRichTextItem(docmail,"Body")
      Set richStyle = session.CreateRichTextStyle
      Call rtitem.AddNewLine( 1 )
      richStyle.Bold = True
      Call rtitem.AppendStyle(richStyle)
      Call rtitem.AppendText( "Sie werden über nachstehendes neue/geänderte Dokument  in der  Besuchsbericht-Datenbank informiert :  " )
      'Set doc = uidoc.Document
      Call doc.Save(True,True)
      Set doc = uidoc.Document
      Call rtitem.AppendDocLink(doc,"der Link")
      Call rtitem.AddNewLine( 1 )
      Call rtitem.AddNewLine( 1 )
      richStyle.Bold = False
      Call rtitem.AppendStyle(richStyle)
      Call rtitem.AppendText( "firma XYZ " )
      Call docmail.Send(True)

koehlerbv:
Hat die Datenbank eine Vorgabeansicht?

Bernhard

BigWim:

--- Code: ---Set uidoc = workspace.CurrentDocument
Set doc=uidoc.document

--- Ende Code ---

ich meine mal gelesen zu haben, dass QuerySave ein ungünstiger Ort ist, weil Dokument zu diesem Zeitpunkt doch noch gar nicht gespeichert ist.

Wäre PostSave nicht angebrachter?

Markus

koehlerbv:
Hannes speichert es im Code explizit, Markus.

Bernhard

Peter Klett:
Kannst Du auch noch schreiben, was "ned geht"? Wird eine Mail verschickt und der Doclink fehlt, oder wird nichts verschickt? Gibt es Fehlermeldungen?

Mir ist aufgefallen, dass Du innerhalb der Forall-Schleife immer wieder ein neues Body-Item erzeugst und neu füllst. Ausserdem speicherst Du jedesmal und holst Dir das doc neu. Geschickter wäre doch, erst einmal das doc fertigzustellen (wenn es denn gespeichert werden muss, halt auch speichern, glaube aber nicht, dass das für den Doclink zwingend notwendig ist) das zu versendende Mail zu erzeugen (mit Body, Texten und Doclink) und dann in der Forall-Schleife nur den Empfänger auszutauschen und das Dokument zu versenden?

Navigation

[0] Themen-Index

[#] Nächste Seite