QTP : GetTOProperties of Web Edit Object

' Program to get the Test Object Properties of a Web Edit Field
' Assumption:Objects are already learned into the Object Repository

Set we=Browser("Login").Page("Login").WebEdit("usernameField")
Set toProps=we.GetTOProperties()


Dim i,icount
icount=TOProps.Count-1
For i=0 to iCount
     sName=TOProps(i).Name
     sValue=TOProps(i).Value
 Reporter.ReportEvent micPass,"Property:=" & sName & " Value :="&sValue,""
Next

Output :

Property :=type Value :=text
Property :=name Value :=usernameField
Property :=micclass Value :=WebEdit
Property :=html tag Value :=INPUT

QTP : Create a text file using File System Object

'Create a file system object
Set fso=createObject("Scripting.FileSystemObject")

'Create a file over the file system object -
' Parameters -
' 1 - Path of the object
' 2 - True - denotes overwrite the file if it exists
set file1=fso.CreateTextFile("C:\test.txt",True)

' Write the text into the file
 file1.write("hello world");

' file 1 is a TextStream Object
' Close the file
file1.close

Top Quotes for the Day

• When your down and out, keep the faith and you will see that it was a necessary step for you to fly high

• If you love someone, tell them, show them ... Life is too short to hold back love. No Future is guarenteed

• The privilege of lifetime is being who you are - Joseph Campbell

• Forgiveness is the business of love

• If you are committed to your dream & don't give up, it's not a matter of "if" but "when"

• Give people room to decide for themselves ... that's LOVE

• Reminder : Letting go is another way of holding on

Word of the Day

Egocentric -
A self centered person with little regard for others.
Limited to or caring only about yourself and your needs.

• They are of the opinion that man is "Egocentric" by nature.

• Children are born egocentric, they stop crying when they are provided with what they require, and give nothing in return. 

Trepedation -
A feeling of alarm or dread
- A state of confusion, anxiety

Synonyms : apprehension

• We all experience moments of trepedations and fear in our lives.

Number of Words in English Language

> 1,000,000 ( 1 million as on 2009 ) 1 millionth controversial word was "web2.0"