How to send QTP test results to an email...(with out using
Quality Center)?
Answers were Sorted based on User's Feedback
Answer / raj
Try this function
Function SendMail(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
| Is This Answer Correct ? | 24 Yes | 3 No |
Answer / murali krishna
hi,
QTP will prepare the results in xml file format... if we
want to send the result...to mail.. By attaching the
respective file we can send it... if we want to send the
runtime data table... we can also attach it...
quality_muralikrishna@yahoo.com
| Is This Answer Correct ? | 11 Yes | 6 No |
Answer / bharath
Good framework should automatically send the test results to
all the stakeholders, once the test is complete.
Best approach would be using CDO object, it is not required
to install MS Outlook on the PC where test is getting
executed. Attaching the link.
http://bharath-marrivada.blogspot.com/2010/02/how-to-send-email-with-attachments.html
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / sreelaxmi
Save the test results in HTML format.
Navigation: FIle -> Export to HTML.
U will get the results in HTML format which is very much
understandable. U can mail this as an attachment.
| Is This Answer Correct ? | 2 Yes | 2 No |
Answer / allan
''' use Raj's code above (#5) modifying this line
If (Attachment <> "") Then
Mail.Attachments.Add(Attachment)
End If
'''
set listattach = wildFileList(".*4.*jpg")
for each n in listattach
Mail.Attachments.Add(n)
next 'n
Function wildFileList(regx) ', fext)
'step 1 string list of filenames
Dim fso, tmp, tmp1, folder, File, regEx, Match, Matches, n,
fext
fext = right(regx,3)
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.getfolder(".")
For Each File in folder.Files
If fso.GetExtensionName(File)= fext Then 'regx & fext
tmp = File & vbcrlf & tmp 'regx & fext & vbcrlf & tmp
End If
Next
'step 2 exec regex on raw string
Set regEx = New RegExp ' Create a regular expression.
regEx.Pattern = regx ' Set pattern.
regEx.IgnoreCase = True ' Set case insensitivity.
regEx.Global = True ' Set global applicability.
Set Matches = regEx.Execute(tmp) ' Execute search.
set wildFileList = Matches
End Function
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / a
¿forgot how to attach?
dim sScreenshotPath
sScreenshotPath = "c:\somepath\" ' with trailing slash
Desktop.CaptureBitmap sScreenshotPath & "Err_" &
Environment( "TestName") & "_" & sTimestamp & ".png"
Function sTimeStamp()
sTimestamp = Right( "0" & Month( Now ), 2 ) & Right( "0" &
Day( Now ), 2 ) & Right( "0" & Hour( Now ), 2 ) & Right( "0"
& Minute( Now ), 2 ) & Right( "0" & Second( Now ), 2 )
End Function
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / lakshman
In above, mentioned only attachment not how to save result
and sent it as an attachment .
Can you please explain with script clearly
| Is This Answer Correct ? | 0 Yes | 2 No |
Answer / freak
Function SendMailOutlook(strMailto, Subject, Message,
strMailfrom)
'Create an Outlook object
Dim Outlook 'As New Outlook.Application
Set Outlook = CreateObject("Outlook.Application")
'Create e new message
Dim Message 'As Outlook.MailItem
Set Message = Outlook.CreateItem(olMailItem)
With Message
'You can display the message To debug And see state
'.Display
.Subject = Subject
.Body = Message
'Set destination email address
.Recipients.Add (strMailto)
'Set sender address If specified.
Const olOriginator = 0
IfLen(strMailfrom) > 0 Then .Recipients.Add
(strMailfrom).Type = olOriginator
'Send the message
.Send
End With
End Function
| Is This Answer Correct ? | 7 Yes | 10 No |
Answer / issac
ANKITHA why dont u find some other job.and stop pestering
| Is This Answer Correct ? | 5 Yes | 10 No |
What is meant by virtual obj and Y do v need virtual obj configuration.
Hello Friends, I am working with QTP 9.2 descriptive programming. Can you please let me know how to work with below. Browser is IE, for my site, it opens another page with different browser name, For example Parent Page is google.com and child page is inteview questions. How to work with this second page.
How to do the scripting. Is there any inbuilt functions in QTP as in QTP-S. Whatz the difference between them? how to handle script issues?
When should I use smart identification?
Hybrid framework supports Descriptive programming. Is it true?
ACTUALLY I AM WORKING IN THE DISTRIBUTION DOMAIN.MY COMPANY IS PROVIDING DISTRIBUTION SOFTWARE FOR PHARMA AND FMCG DISTRIBUTORS.HERE I AM USING QTP 9.2.HERE IN MY APPLICATION WHILE RECORDING ONE WINDOW APPEARS.IN THAT I CAN SELECT THE ITEM OR NO NEED TO SELECT.BUT WHILE RUNNING THE SAME SCRIPT THE WINDOW MAY NOT APPEAR OR APPEAR.HOW TO WRITE SCRIPT FOR THIS
what is the latest version of QTP? Main difference between 9.2 and 10 version
what is frame work of qtp?
how we connect oracle or sql data server database to qtp. Hi Ram I was your answer for this. Can you kindly let me know in details steps on How we can connect to database. i am using QTP9.2 and SQL Server Database. I am new for QTP and this would be of great help.Thanks
Hi I am from delhi, Now I can surely say that no institution of QTP here in Delhi After reading you people I want to get cry, from last six month I am trying to learn QTP, I have knowledge too but dont know VB Script. Now it appears that without learning QTP no one can learn complete QTP, I want to get a formal learning in QTP. Can you suggest me the best institution. and please let me know the charges and span of the course too. thanks in advance to you alkaa.dugaal@gmail.com
After fixing the bug, the same bug is raising again and again in new builds what we have to do? That bug is high level bug.
how to load all resource files(function libraries,object repositories etc) into tests without associating them?