Hi Joy,

You were running your function from a vbs directly or calling the function
from qtp?

On Tue, Jun 15, 2010 at 9:17 AM, Mr. Joy Vaz <[email protected]> wrote:

> 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]<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

Reply via email to