Sending emails via ls using groups -->> receiving emails twice

HCL Domino Domino Forum
1

Hi,we´re sending emails manually via lotusscript.

For the delivery we use groups (nested groups).

Now we´ve the problem , that the emails are delivered twice.

Where´s the problem, what can we do to change it ?

Your help is greatly appreciated.

Stefanie

Script :

Sub FormErstelleMail_Stoerung_iSeries_OFF

On Error Goto Errorhandling

Dim ws As New NotesUIWorkspace, uidoc As NotesUIDocument, doc As NotesDocument, vDoc As NotesDocument

Dim Fehler As String, vUIDoc As NotesUIDocument, sn As New NotesSession

Set uidoc = ws.CurrentDocument

Set doc = uidoc.Document



If ErzeugeVermerk( doc, vDoc, "", "", "", 0, Fehler ) = False Then Error 15100, Fehler

vDoc.ReplaceItemValue "f_isEMail", "1"

vDoc.ReplaceItemValue "MailStatus", "1"

vDoc.ReplaceItemValue "SendTo", "$Webfacing, $Shop_Anwendung, Partner International"

vDoc.ReplaceItemValue "From", "CN=IT Service/O=aswo"

vDoc.ReplaceItemValue "FromDate", Now

vDoc.ReplaceItemValue "DeliveryPriority", "N"

vDoc.ReplaceItemValue "ReturnReceipt", "0"

vDoc.ReplaceItemValue "Subject", "XX"



vDoc.ReplaceItemValue "Body", "XX"

	

Set vUIDoc = ws.EditDocument( True, vDoc )

Exit Sub

ErrorHandling:

If Err > 15000 Then

	Messagebox Error$, 16, "Fehler:"

Else

	Messagebox Error$ & " in [FormErstelleMail_Stoerung_iSeries_OFF] in [sbActions], Zeile " & Cstr(Erl), 16, "Fehler:"

End If	

Exit Sub

End Sub

2

Subject: Sending emails via ls using groups -->> receiving emails twice

Stefanie,

I don’t see a mail send anywhere in your code?

Is there other code that sends the doc? Also, if the user who receives the mail is in a group and a nested group then they will receive it twice.

Shawn

3

Subject: RE: Sending emails via ls using groups -->> receiving emails twice

Hi Shawn,yes, you´re right. That´s the script, which opens / creates an email-form. To send this email we click on the “send” button.

We´re working with nested groups.

Ok, so we must check our groups.

Thanks for your help.