QTP Scripting

[Unleash Rajesh]

Hi,

Let me know how to write scripts in QTP...! I couldnt find a proper material for web based application to gothrough....!

[supputuri]

Please refer to the QTP Help and VB scripting help documents.

[Anand]

These help documents you can find in Help folder inside QTP installed folder

[Unleash Rajesh]

I want to write scripting of my own without using record and playback...Try to post some codes (For Eg: Login Screen)so that its easy for me to understand and learn with the real time web application..

[Saket]

Search this Forum , you will surely get loads of code to refer.

[Unleash Rajesh]

Code:

Function Open( ) dim IE set IE = CreateObject("InternetExplorer.Application") IE.visible = true IE.stop wait(5) IE.navigate "http://www.google.com" set Open = IE Set IE= nothing End Function Dim IEexp set IEexp = Open() Dim IEobj, obrowser,opage,links,objlink,linkcount Set IEobj = open() Set oBrowser= Description.Create() oBrowser("micclass").Value = "Browser" set oPage = Description.Create() oPage("micclass").Value = "page" set Links = Description.Create() Links("micclass").Value = "Link" set objLinks = Browser( oBrowser).Page( oPage).ChildObjects(Links) LinkCount = objLinks.Count msgbox LinkCount For i = 0 To LinkCount-1 set Links = Description.Create() Links("micclass").Value = "Link" set objLinks = Browser( oBrowser).Page( oPage).ChildObjects(Links) objLinks(i).Click datatable.SetCurrentRow(i+1) datatable("Lname",global)=Browser( oBrowser).Page(oPage).GetROProperty("href") Browser(oBrowser).Back Next...

It throws an error in Lname...Could u plz guide me how to overcm this..is there anything i need to add in the datatable of Expert view.

How i can start learning scripts in QTP...I feel i can go fm the concepts and then to deeper into it...Provide sm materials.....

[deepaksporty]

[Unleash Rajesh]

Exception Handling:
Exception Handling is available in qtp. If u r going to test a scenario first time using qtp how would u know that there will be an exception?....