how can I read text in browser and export the same into text
file?
- 5 Answers
- 6990 Views
- HP, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / eswar
'Modified answer foe above Script
systemutil.Run "Iexplore","www.google.com","open"
wait 5
Set desc=description.Create()
desc("micclass").value="WebElement"
desc("html tag").value="P"
Dim Fso,file_loc,Fc,Forreading,d
Set Fso=createobject("scripting.FileSystemObject")
Set Fc=Fso.CreateTextFile("D:\akh.txt",8)
Set a=browser("title:=.*").page("title:=.*").ChildObjects(desc)
b=a.count
msgbox b
For i=0 to b-1
d=a(i).getroproperty("outertext")
a(i).highlight
' print "Text -->" & d
MsgBox d
Fc.writeline"The text is : "&d
Next
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / akhaleshyadav1985
systemutil.Run "Iexplore","www.gmail.com","open"
wait 10
Set desc=description.Create()
desc("micclass").value="WebElement"
desc("html tag").value="P"
Set a=browser("title:=.*").page("title:=.*").ChildObjects(desc)
b=a.count
msgbox b
For i=0 to b-1
d=a(i).getroproperty("outertext")
a(i).highlight
print "Text -->" & d
Next
Dim Fso,file_loc,Fc,Forreading,d
Set Fso=createobject("scripting.FileSystemObject")
Set Fc=Fso.OpenTextFile("C:\aa\akh.txt",Forwriting,true)
Fc.Writeline(d)
Akhalesh Yadav
9555717928
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / uday
If u r looking the source code of a browser:
http://hpsqtp.blogspot.in/2012/03/how-to-get-source-code-of-webpage-using.html
| Is This Answer Correct ? | 1 Yes | 1 No |
''Take a value from application and copy it into the text
and excel file.
a=
Browser("CreationTime:=1").Page("Micclass:=page").webButton("html
id:=ctl00_contplhDynamic_imgSignIn").GetROProperty("name")
Set fo=CreateObject("scripting.FilesystemObject")
Set otext=fo.CreateTextFile ("c:\Text11.txt")
''otext.Write a
Set oExcel=CreateObject("Excel.Application")
oExcel.Visible=True
Set oWorkBook=oExcel.Workbooks.Open("c:\Test11.xls")
Set oWorkSheet=oWorkBook.Worksheets("Sheet1").cells(1,1)
oWorkSheet.value=a
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / rohit pathak
file name.Export("C:\Results\file name.xls")
First you have to tell which file you want to export and
then where you want too export that file.
| Is This Answer Correct ? | 0 Yes | 2 No |
What is regular expression?
Inserting a Call to Action is not importing all columns in Datatable of globalsheet. Why?
How you calling actions in qtp?
How to export data present in Datatable to an ".xls" file?
What is a Patch in QTP?
Where you are storing your script?
How to save your test using quicktest professional?
Explain about random testing of 500 test cases?
Hi Friendss..., can any body help me.. 1. Tell me your achievements(Technically)..? 2. Tell me your strengths(Technically) and weakness(Technical)..? 3. Why are you looking for change..?
How to give Table check points?
How can you pass value one action to another action?
In QTP can we feed the out of one browser(internet explorer) as an input to the another browser(mozilla firefox)? If yes explain how to do it with an example.
WinRunner 
