Hi,
I tried below code with 2 e-mail adrs in a vbs and it worked fine :
Set ol=CreateObject("Outlook.Application")
Set Mail=ol.CreateItem(0)
Mail.to="[email protected];[email protected]"
Mail.Send
Set Mail = Nothing
Set ol = Nothing
On Tue, Jun 15, 2010 at 8:38 AM, Joy <[email protected]> wrote:
> I am using following function to send a mail from outlook. It can send
> a mail to 3 email ids at a time. i.e. SendTo,SendToCC,SendToBCC. I
> want to send to more than three email Ids.
> I tried to pass endToBCC = "emailid1,emailid2". but it display me
> error as "General run error." at line "Line (277): " Mail.Send"."
> is it possible to pass two email ids?
>
> Function SendMail(SendTo,SendToCC,SendToBCC ,Subject, Body,
> Attachment)
> Set ol=CreateObject("Outlook.Application")
> Set Mail=ol.CreateItem(0)
> Mail.to=SendTo
> Mail.CC=SendToCC
> Mail.BCC=SendToBCC
> Mail.Subject=Subject
> Mail.Body=Body
> If (Attachment <> "") Then
> Mail.Attachments.Add(Attachment)
> End If
> Mail.Send
> Set Mail = Nothing
> Set ol = Nothing
> End Function
>
> --
> You received this message because you are subscribed to the Google
> "QTP - HP Quick Test Professional - Automated Software Testing"
> group.
> To post to this group, send email to [email protected]
> To unsubscribe from this group, send email to
> [email protected]<mercuryqtp%[email protected]>
> For more options, visit this group at
> http://groups.google.com/group/MercuryQTP?hl=en
--
Regards,
Ganesh Muralidharan
'God Never Forgets'
--
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
