Answer / chaitu.c

This is process of the above asked question
step1 QTP Tool put in Record mode after that
step2 Double click on the internet explore
Step3 enter the web site
step4 after enter the we site stop the recoreding in QTP
after you will get the following lines( 2,3,5,8)of code in
QTP

Line: 1 Dim a,b
Line: 2 Window("Program Manager").WinListView
("SysListView32").Activate "Internet Explorer"
Line: 3 Browser("Browser").Page("Page").Sync
Line: 4 b = Inputbox("Enter the Site")
Line: 5 Browser("Browser").Navigate b
Line: 6 a = Browser("Browser").Page("ALL
Interview .com ::").GetROProperty("url")
Line: 7 msgbox a
Line: 8 Browser("Browser").Page("ALL
Interview .com ::").Sync
'Create the Notepad file and Save the url in that
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("D:\Documents and
Settings\Administrator.SEERVER\Desktop\chaitu.txt", True)
MyFile.WriteLine(a)
MyFile.Close

Answer / chaitu.c

Browser("Browser").Page("Welcome: Mercury Tours").WebEdit
("userName").Set "chaitanyakumar2005"
a = Browser("Browser").Page("Welcome: Mercury
Tours").WebEdit("userName").GetROProperty("name")
msgbox a
Browser("Browser").Page("Welcome: Mercury Tours").WebEdit
("password").SetSecure "462974ae67a58c7d26974858f8a5b00fa630
"

Answer / chaitu

Line: 1 Set a = Browser("Browser").Page
("Page").StaticLabeltext

Line: 2 msgbox a

Step:3
'Create the Notepad file and Save the url in that

Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("D:\Documents and
Settings\Administrator.SEERVER\Desktop\chaitu.txt", True)
MyFile.WriteLine(a)
MyFile.Close

Answer / guest

Good Question.......

here i used regular expressions concept with descriptive
prgming...Rough idea given to u...surely this approach can
work out...

Set opage=browser("Gmail: Email from Google").Page("Gmail:
Email from Google")
Set childobjdes = Description.Create()
childobjdes("mic class").value="Web Element"
childobjdes("html tag").value=".*[A-Za-z0-9].*"
childobjdes("outer text").value =".*[A-Za-z0-9].*"
set allobj = opage.ChildObjects(childobjdes)
msgbox allobj.count
For i=1 to allobj.count-1
text=text&allobj(i).getroproperty("outer text")
Next
msgbox text

give me the code to save all messages of inbox of gmail into a folder and notepad

0 Answers   Infosys,

---

Ex : some mail name with surname Email id's there that is string fetch the particular surname only how to get particular surname all emails

1 Answers   Infosys,

---

hi everybody this questions is only for qtp real time users. anyone please clearly explain the approach u r following for qtp testing in ur company or qtp framework u r following in ur company pelase give me clear explanation then u did great favour to inexeprienced qtp users

0 Answers   Automobile, EDP,

---

What is the difference between Dim And Redim

4 Answers   Hotel Jobs, IBM, Microsoft,

---

i don't have any experience in qtp? Can u please tell me What work i have to do?

4 Answers  

---

Hi all can any one give me roles and responsibilities for QTP (not WINRUNNER)

0 Answers   Autodesk, EDS, Wipro,

---

How did you use regular expressions in QTP and also in WR?

0 Answers  

---

How do you perform Regreession Testing?

0 Answers   Nokia,

---

In Test Directory, What are the contents in test case designing? if you prepare in excel sheet how u use thrw Test Directory?

0 Answers  

---

I have a WebEdit Object.It is added in object repository.It has two properties Name and Index.In the next release the Name Property is same but the index property is changed.when i run the script will the script Pass or Fail

9 Answers   ADP,

---

Tell some commonly used Excel VBA functions?

0 Answers  

---

What are the different types of functions available in qtp and explain ?

0 Answers  

---