10 Jul 2008 - 06:41:22 pm
Sending Mail Automatically
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
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
attached the answers of the above ...
2008-07-10 @ 04:38:52 pm
by Ramu
Can you please provide the answers ...
2008-07-10 @ 04:07:58 pm
by chakri