Yes. This code is working fine. If i pass one email at a time..i mean single email to each parameter..
On Tue, Jun 15, 2010 at 10:12 AM, Tanveer <[email protected]> wrote: > Is there a outlook account created, on the system from where you are > running the script. > > -Tanveer > > > On Tue, Jun 15, 2010 at 7:35 PM, Mr. Joy Vaz <[email protected]> wrote: > >> Hi, >> as per Tanveer's comment i used following code, but still getting same >> errro >> >> sendto="[email protected];[email protected];[email protected]; >> [email protected]" >> >> call TestSendMail (sendto,"testsubject","body","") >> >> Function TestSendMail(SendTo,Subject, Body, Attachment) >> >> Set ol=CreateObject("Outlook.Application") >> Set Mail=ol.CreateItem(0) >> Mail.to=SendTo >> Mail.Subject=Subject >> Mail.Body=Body >> If (Attachment <> "") Then >> Mail.Attachments.Add(Attachment) >> End If >> Mail.Send >> ol.Quit >> >> Set Mail = Nothing >> Set ol = Nothing >> End Function >> >> >> On Tue, Jun 15, 2010 at 10:00 AM, Ganesh muralidharan < >> [email protected]> wrote: >> >>> Try out Tanveers code not sure how the variables values will be >>> substituted as you are using double quotes " - "emailid1; emailid2; >>> emailid3" >>> >>> On Tue, Jun 15, 2010 at 8:58 AM, Tanveer <[email protected]> wrote: >>> >>>> Sorry forgot to mention. >>>> >>>> The delimiter used for separating the email addresses is ";" not "," >>>> >>>> Thanks >>>> Tanveer >>>> >>>> >>>> On Tue, Jun 15, 2010 at 7:27 PM, Tanveer <[email protected]>wrote: >>>> >>>>> Instead of trying that code, just pass your *SentTo* variable value = >>>>> "emailid1; emailid2; emailid3" to the function. >>>>> >>>>> It will work. >>>>> >>>>> Thanks >>>>> Tanveer >>>>> >>>>> >>>>> >>>>> >>>>> On Tue, Jun 15, 2010 at 7:22 PM, Mr. Joy Vaz <[email protected]> wrote: >>>>> >>>>>> >>>>>> Hi, >>>>>> I used script provided by Ganesh. But i got the same error. >>>>>> SS attached:-QTP_Mail.JPG >>>>>> >>>>>> On Tue, Jun 15, 2010 at 9:46 AM, Ganesh muralidharan < >>>>>> [email protected]> wrote: >>>>>> >>>>>>> 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]<mercuryqtp%[email protected]> >>>>>>> For more options, visit this group at >>>>>>> http://groups.google.com/group/MercuryQTP?hl=en >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> -- >>>>>> Cheers...!!!!! >>>>>> >>>>>> Joy >>>>>> -- >>>>>> 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 >>>>>> >>>>> >>>>> >>>> -- >>>> 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]<mercuryqtp%[email protected]> >>> For more options, visit this group at >>> http://groups.google.com/group/MercuryQTP?hl=en >>> >> >> >> >> -- >> Cheers...!!!!! >> >> Joy >> >> -- >> 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 >> > > -- > 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 > -- Cheers...!!!!! Joy -- 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
