Following statements will helps you to send mail automatically through QTP.
For that you need to have a MS Outlook with mail server connected to it in your machine
Dim objOutlookMsg
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(0)
objOutlookMsg.To = "ramu.palanki@gmail.com"
objOutlookMsg.BCC ="ramu.palanki@gmail.com"
objOutlookMsg.Subject = "Sending Mail through QTP Script"
objOutlookMsg.Body ="Hello QTP"
objOutlookMsg.Attachments.Add("C:\Result.html")
objOutlookMsg.Send
For that you need to have a MS Outlook with mail server connected to it in your machine
Dim objOutlookMsg
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(0)
objOutlookMsg.To = "ramu.palanki@gmail.com"
objOutlookMsg.BCC ="ramu.palanki@gmail.com"
objOutlookMsg.Subject = "Sending Mail through QTP Script"
objOutlookMsg.Body ="Hello QTP"
objOutlookMsg.Attachments.Add("C:\Result.html")
objOutlookMsg.Send
06:41:22 pm . 10 Jul 2008
2010-03-03 @ 12:42:51 pm
by rolex
replica watches,rolex watches,replica ...
2010-03-03 @ 12:41:12 pm
by rolex
How to get the Browser window ...
2008-11-20 @ 12:41:11 pm
by venugopal
there are many problems we will ...
2008-07-16 @ 03:58:49 pm
by Ramu
what r the challenges have faced ...
2008-07-15 @ 10:57:24 am
by veerachary