title image


Smiley Re: Wie hänge ich per VBA mehere Anhänge an eine Notes-Email an ?
Sicher bin ich mir nicht, wie man mehrere

Files anhängt, grade weil Notes eigentlich nur von großen Firmen eingesetzt wird.



In Bezug auf denn DB - Wiki Artikel

http://dbwiki.de/wiki.php?title=VBA_Tipp:_Notes



' Einstellen des Embedded Object und der Anlage

' If Attachment "" And Dir(Attachment) "" Then

' Set AttachME = MailDoc.CREATERICHTEXTITEM("Attachment")

' Set EmbedObj = AttachME.EMBEDOBJECT(1454, "", Attachment, "Attachment")

' ' MailDoc.CREATERICHTEXTITEM ("Attachment")

' End If







Liegt der Schlüssel wohl hier drin

MailDoc.CREATERICHTEXTITEM("Attachment")



Wenn wir davon ausgehen das Attachment nicht ein Text sondern eine String - Variable ist könnte es funktioneren...DAchte ich :D



Probier mal lieber folgendes :

Set EmbedObj = AttachME.EMBEDOBJECT(1454, "", Attachment1, "Attachment")

Set EmbedObj = AttachME.EMBEDOBJECT(1454, "", Attachment2, "Attachment")







HTH


War das jetzt mehr Hot oder mehr Not ?

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: