Domino 9 und frühere Versionen > ND8: Entwicklung

Per VB generierte Mail in Sent einer Group Mailbox anzeigen

(1/2) > >>

jochen_m:
Liebe Zielgruppe,

nachdem mich in der alten Firma eine Hassliebe mit Outlook verband, dass sich mit VB6 willig zurechtbiegen liess, plage ich mich nun mit Lotus Notes 8.02. Es ist, höflich formuliert, recht gewöhnungsbedürftig, seufz. Das könnte aber auch an meinen nicht vorhandenen Notes-Kenntnisssen liegen  ;)

Als kleine Bastelübung würde ich gerne vom VB6-Programm aus eine Mail generieren und senden. Soweit kein Problem, das funktioniert nach einigem googeln.
Mein Problem ist, dass die Mail über eine Group Mailbox versendet werden und dann im dortigen Sent sichtbar sein soll. Und da beginnt das Elend, denn ich weiß nicht mal, wie das Notes-technisch hier eingerichtet ist, wonch ich googeln muss  :( 
Ich habe (normaler User mit Windows Admin-Rechten) mein eigenes Postfach mit meiner Mailadresse, kann dort schalten und walten fast wie ich will und sogar Actions erstellen. Dann ist da noch ein weiteres Postfach mit anderer Mailadresse separat eingebunden. Könnte das eine Group Mailbox sein? Andere Kollegen haben darauf ebenfalls Zugriff und die Berechtigungen scheinen etwas eingeschränkt zu sein.
Mittlerweile verwendet das VB-Progrämmchen
oLNDocument.AppendItemValue("Principal", "Hierüber@SollsRaus.com")
Damit geht die Mail raus wie gewünscht, nämlich nicht mit meinem Absender sondern mit dem der Group Mailbox.
Nur (hier isses endlich, mein Problem): Die so gesendete Mail erscheint in der Sent-View meiner privaten Mailbox, soll aber im Sent der Group Mailbox erscheinen.
Lässt sich das irgendwie bewerkstelligen?

Danke schonmal im voraus für alle Hinweise
  Jochen

Fedaykin:
Hallo Jochen

Mich würde in dem Fall interessieren in welcher Datenbank Du das Mail erstellst bevor Du es absendest (habe das Gefühl das ist Deine private Mailbox)? Auf jeden Fall könnte ein Stück Code zur Analyse hilfreich sein.

Gruss
Remo

michael-r:
Was willst du denn erreichen?

Wenn du doch über die Gruppenmailbox senden willst, dann kannst du das doch direkt, dann erscheint die Mail auch unter gesendet.

Allerdings müsstest du die Mailbox ansich etwas ändern, damit der Absender der Gruppe gezeigt wird oder du benutzt die Teammailbox von Openntf.

MFG Michael

jochen_m:
Danke für die schnelle Reaktion!

@Remo
Ja, das ist gut möglich, dass ich über meine private Mailbox sende, anstatt über die zusätzlich eingebundene. Wobei dank »Principal« der Absender der eingebunden Mailbox wie gewünscht erscheint.

Hier der Code:

--- Code: ---    Dim oLNSession As Object 'NotesSession
    Dim oLNMailDB As Object 'NotesDatabase
    Dim oLNDocument As Object 'NotesDocument
    Dim oLNField As Object 'NotesItem
   
    'Get Connection to Notes
    Set oLNSession = CreateObject("Notes.NotesSession")
   
    'Get Connection to Mail File
    Set oLNMailDB = oLNSession.GetDatabase("", "")
   
    'Open Mail-DB
    If Not oLNMailDB.IsOpen = True Then
        Call oLNMailDB.OPENMAIL
    End If
   
    'Create New Memo
    Set oLNDocument = oLNMailDB.CreateDocument
    oLNDocument.Form = "Memo"
   
    'Create 'Subject Field
    Set oLNField = oLNDocument.AppendItemValue("Subject", "Hallo Test")
   
    'Sent by/group mailbox/delegate
    Set oLNField = oLNDocument.AppendItemValue("Principal", "AdresseDerEingebundenen@Mailbox.com")
   
    'Create 'Send To' Field
    Set oLNField = oLNDocument.AppendItemValue("SendTo", "empfänger@xyz.com")
   
    'Create 'Body' of memo
    Set oLNField = oLNDocument.CreateRichTextItem("Body")
   
    With oLNField
        .AppendText "Ich bin der Mailtext"
    End With
   
    oLNDocument.SaveMessageOnSend = True
    oLNDocument.Posteddate = Now()
    oLNDocument.Send (0)
--- Ende Code ---
   

@Michael
Mhm, wahrscheinlich sende ich tatsächlich über die falsche Mailbox. Der Absender ist in Ordnung, den setze ich ich, siehe oben, mit »Principal«.
Ich glaube nicht, dass das eine Teammailbox von Openntf ist. Woran würde ich das als Notes-Laie erkennen? Aussehen tut das Ding wie meine eigene Mailbox, allerdings liegt die eingebundene auf einen anderen Server und scheint einer älteren Notes-Version (wahrscheinlich 6) zu entstammen, die Icons (der Views, Ordner usw.) sehen etwas antiquarisch aus ...

Vielen Dank für Eure Hilfe!
  Jochen

Kadlec:
Wie heisst denn die Groupbox?
Den Namen müsstest Du dann in Deinen Code mit einbeziehen.

Boris

Navigation

[0] Themen-Index

[#] Nächste Seite