Email from qtp to Microsoft outlook through vb script

[siri]

Hi Ankur and All,

I am tryting to send an email notification form qtp to Ms outlook
.
Can any one provide me with some information on this .

I am using the below specified code .Herein an error is populating saying that "The test run cannot continue due to an unrecoverable error.The "SendUsing" configuration value is invalid."for the objmessage.send function can any one help me

Code:

Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "Simple plain text CDO example"
objMessage.From = "sirisha_guntur@yahoo.com"
objMessage.To = "test
objMessage.TextBody = "This is a test."
objMessage.Send

[surya_7mar]

Are you using Quality Center.
If so i have a solution for you.

[siri]

Hi Surya,

Yes i have QC option

[surya_7mar]

I think you need to add the below lines to your above code

Code:

objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "your smtp server name"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update

[surya_7mar]

If you have QC Connection and Your QC is properly configured with all the Mail ReLay setteings

Code:

QCUtil.QCConnection.SendMail  "Sentto@mycompany.com", "sentfrom@mycompany.com", "Subject", "Body", "my attachment"

Will send a mail directly

[siri]

what surya_7mar no reply

[surya_7mar]

i already sent a reply

[siri]

Hi

Object required: 'QCUtil.QCConnection' error is coming if i use QC and qtp

[surya_7mar]

Did your QTP connected to QC.

[surya_7mar]

I just tried it is working find for me...

Try only the below one...

Code:

QCUtil.QCConnection.SendMail "yourmailsid@mycompany.com"