falsches Feld wird kopiert

[aba]

Hallo ich habe in meinem Notes Adressbuch ein weiters Feld für eine private email Adresse erstellt. Wenn ich allerdings auf den Hotspot (Link) dieser Adresse klicke wird eine neues Mail mit der Adresse aus dem Orginalfeld erstellt. Ich habe herausgefunden, das es einen Agenten gibt der CreateMailMemo heißt und auch schon die Stelle gefunden an der ich drehen muß damit er nicht mehr den Inhalt des Orginalfeldes ausgibt. Die Stelle lautet "mailnote.SendTo = SendToNames" Wenn ich anstatt SendToNames, Räuber Hotzenplotz schreibe, dann erscheint das als Empfängeradresse in meiner neuen Mail. Ich würde eben gerne wissen was ich wo verändern muß damit es den Inhalt aus meinem neu erstellten Feld nimmt?!?!?

Hier ist der Script:

Sub Initialize
'declare local variables
   Dim x As Integer
   
'instantiate objects    
   InstantiateVariables
   
   
   If (collection.Count = 0) Then
      Messagebox "Es wurden keine Dokumente ausgewählt.",0,"Fehler"
      Exit Sub
   End If
   
   Redim SendToNames(collection.Count-1)
   
'for each document in the collection, get the mail address
'we use the GetNth method since the resulting collection is an IDTable
   For x = 1 To collection.Count
      Set note = collection.GetNthDocument(x)
      SendToNames(counter) = GetMailAddress
      counter = counter + 1
   Next
   
   Set mailnote = New NotesDocument(maildb)
   mailnote.SendTo = SendToNames
   mailnote.Form = "Memo"
   mailnote.Logo = session.GetEnvironmentString("DefaultLogo",False)
   mailnote.Principal = profile.Owner(0)
   
   Call ws.EditDocument(True,mailnote)
End Sub

[Performance]

aba wenn du dir eine etwas veränderte Mail machen willst benutze doch einfach eine eigene Mail Maske ohne jegliches Skript/Bibliotheksgewurschtel

hauptsächlich brauchst du nur 3 Felder damit der Router nicht ins straucheln kommt : SendTo, Subject und dein Body Feld

cu

[DeBugger]

Hallo ich habe in meinem Notes Adressbuch ein weiters Feld für eine private email Adresse erstellt. Wenn ich allerdings auf den Hotspot (Link) dieser Adresse klicke wird eine neues Mail mit der Adresse aus dem Orginalfeld erstellt. Ich habe herausgefunden, das es einen Agenten gibt der CreateMailMemo heißt und auch schon die Stelle gefunden an der ich drehen muß damit er nicht mehr den Inhalt des Orginalfeldes ausgibt. Die Stelle lautet "mailnote.SendTo = SendToNames" Wenn ich anstatt SendToNames, Räuber Hotzenplotz schreibe, dann erscheint das als Empfängeradresse in meiner neuen Mail. Ich würde eben gerne wissen was ich wo verändern muß damit es den Inhalt aus meinem neu erstellten Feld nimmt?!?!?

Hier ist der Script:

Sub Initialize
'declare local variables
   Dim x As Integer
   
'instantiate objects    
   InstantiateVariables
   
   
   If (collection.Count = 0) Then
      Messagebox "Es wurden keine Dokumente ausgewählt.",0,"Fehler"
      Exit Sub
   End If
   
   Redim SendToNames(collection.Count-1)
   
'for each document in the collection, get the mail address
'we use the GetNth method since the resulting collection is an IDTable
   For x = 1 To collection.Count
      Set note = collection.GetNthDocument(x)
'###################################
       SendToNames(counter) = note.MeinFeldMailFeld(0)
'###################################
      counter = counter + 1
   Next
   
   Set mailnote = New NotesDocument(maildb)
   mailnote.SendTo = SendToNames
   mailnote.Form = "Memo"
   mailnote.Logo = session.GetEnvironmentString("DefaultLogo",False)
   mailnote.Principal = profile.Owner(0)
   
   Call ws.EditDocument(True,mailnote)
End Sub