Das Notes Forum

Domino 9 und frühere Versionen => ND7: Entwicklung => Thema gestartet von: giochips am 04.09.08 - 16:48:05

Titel: Mails direkt aus mail.box versenden
Beitrag von: giochips am 04.09.08 - 16:48:05
Hallo Leute,

ich suche schon seit einiger Zeit im Forum nach Beiträgen i.S. Mails direkt aus Mail.box versenden, damit der Absender beliebig vorgegeben werden kann. Hab auch einiges gefunden. Allerdings hab ichs noch nicht hinbekommen eine BlindCopy zu versenden!! In keinem Codeschnippsel wird dieses Feld genannt. Wie heißt das entsprechende Feld?? Doch BlindCopyTo oder? Ich kriegs nicht hin.

Mein Code:
Code
Dim mailbox As New NotesDatabase("","mail.box") 
Dim mail As notesDocument
Set mail = mailbox.CreateDocument
Call mail.ReplaceItemValue("Form","Memo")
Call mail.ReplaceItemValue("Subject","ICH BIN EIN BETREFF")
Call mail.ReplaceItemValue("From", |test@test.com|)
Call mail.ReplaceItemValue("ReplyTo", |test@test.com|)
Call mail.ReplaceItemValue("Recipients", |test@test.com|)
Call mail.ReplaceItemValue("SendTo", |test@test.com|)
Call mail.ReplaceItemValue("BlindCopyTo", "keine@Ahnung.de")               <-------- HIER??????
Set rtitem = New NotesRichTextItem ( mail, "Body" )
Call rtitem .AppendText("Ich bin ein Fake Absender und lege meine Post immer in der mail.box ab :-)")
Call rtitem.AddNewLine( 1 )
Call mail.ComputeWithForm(True,False) 
Call mail.Save(False,False)

Vielen Dank!!
Marco
Titel: Re: Mails direkt aus mail.box versenden
Beitrag von: WildVirus am 05.09.08 - 07:28:47
Hallo Marco,

hast Du mal Deine Admins gefragt, was die davon halten - vermutlich nichts.

Was machst Du, wenn ein Server mehr als eine Mailbox hat ? Dann ist der Dateiname nicht Mail.box !

Soll der Agent lokal auf dem Client laufen ? Oder in einer Datenbank auf einem Server ? .......

Außerdem fehlt ein    
Code
Dim rtitem As NotesRichTextItem
, was bei Aktivierung von
Code
Option Declare
direkt ersichtlich wird.

Warum willst Du so arbeiten ? Es gibt saubere und unsaubere Wege ein Ziel zu erreichen und Du bist mir hier m.E. auf dem zweiten Weg ! :(

Schönen Tag,
Axel
Titel: Re: Mails direkt aus mail.box versenden
Beitrag von: eknori am 05.09.08 - 07:43:08
Zitat
Wie heißt das entsprechende Feld??
Das kann man sehr leicht im Designer herausfinden, wenn man sich das Design der Memo Maske ansieht.
Titel: Re: Mails direkt aus mail.box versenden
Beitrag von: giochips am 05.09.08 - 11:40:34
Hallo Axel, hallo Ulrich,

@Axel:
Zitat
hast Du mal Deine Admins gefragt, was die davon halten - vermutlich nichts.
Der Admin hat nix dagegen... ich hab mich schon gefragt!  ;)
Zitat
Was machst Du, wenn ein Server mehr als eine Mailbox hat ? Dann ist der Dateiname nicht Mail.box !
Der Server hat mehr als eine Mailbox. Die heißen, wie üblich, mail1.box, mail2.box...
Zitat
Außerdem fehlt ein Dim rtitem As NotesRichTextItem
Den Code den ich gepostet hab hab ich aus einer anderen Anfrage rauskopiert. Mir gehts ja nur darum, das ich keine Blindkopien verschicken kann. "Normale" Empfänger funzt ja.

Mein Ziel ist: Verschicken eines "Newsletters". Deshalb auch das Versenden als Blindkopien! Soll ja nicht jeder sehen, wer die Mail noch bekommen hat!
Als Absender soll eine bestimmte Mailadresse stehen. Egal wer das Verschicken aus dieser "Kundendatenbank" auslöst!! Verschicke ich ein Mail mit Notesdocument.send, erscheint ja immer der "Auslöser" als Absender, weils über seine Mailbox geht.
Kennst du eine bessere Vorgehensweise um dieses Problem zu umgehen??

@Ulrich:
Zitat
Das kann man sehr leicht im Designer herausfinden, wenn man sich das Design der Memo Maske ansieht.
Das hab ich ja auch gemacht. Das Feld heißt "BlindCopyTo". Wenn ich aber dieses Feld im neuerstellten Doc in mail.box mit einer Adresse belege, erhält dieser Empfänger keine Mail. ???

Gruß
Marco
Titel: Re: Mails direkt aus mail.box versenden
Beitrag von: klaussal am 05.09.08 - 11:51:07
Für solche Sachen bietet sich die Team-Mailbox von Openntf an.