Answer / manjunathareddy

Function AppTest(ObjectType,Objname,Testvalue)
Set oBrowser=Browser("name:=.*")
Set oPage=oBrowser.Page("title:=.*")
Select Case ObjectType
Case "WebEdit"
If oPage.WebEdit("name:="& Objname).Exist Then
oPage.WebEdit("name:="& Objname).Highlight
oPage.WebEdit("name:="& Objname).Set Testvalue
Reporter.ReportEvent micPass,"WebEdit Exist","Set
the"&Testvalue
Else
Reporter.ReportEvent micFail,"WebEdit not Exist","Not
set the"&Testvalue
End If
Case "Image"
If oPage.Image("name:="& Objname).Exist Then
oPage.Image("name:="& Objname).Highlight
oPage.Image("name:="& Objname).Click
Reporter.ReportEvent micPass,"Image Exist","Complted
click task"
Else
Reporter.ReportEvent micFail,"Image not Exist","Not
completed click task"
End If
Case "Link"
If oPage.Link("name:="& Objname).Exist Then
oPage.Link("name:="& Objname).Highlight
oPage.Link("name:="& Objname).Click
Reporter.ReportEvent micPass,"Link Exist","Complted
click task"
Else
Reporter.ReportEvent micFail,"Link not Exist","Not
completed click task"
End If
Case "WebList"
If oPage.WebList("name:="& Objname).Exist Then
oPage.WebList("name:="& Objname).Highlight
oPage.WebList("name:="& Objname).Select Testvalue
Reporter.ReportEvent micPass,"WebList
Exist","Selection done"
Else
Reporter.ReportEvent micFail,"WebList not
Exist","Selection not done"
End If
End Select
End Function

When are redim statement and preserve keyword used in the vbscript language?

0 Answers  

---

when you use For Loop, While..do, do..while? at what situations which loop will use.

1 Answers  

---

How will you get a combined string from array of string in vbscript?

0 Answers  

---

How to pass the parameter from one function to another function in VB Scripting?

1 Answers   Fastenal,

---

who you define variables and functions in VB?

1 Answers  

---

what is test scenario?

1 Answers  

---

hi Set myobj=Description.Create() myobj("type").value="submit" myobj("name").value="google search" myobj("html tag").value="button" browser("title:=google").page("title:=google").webButton (myobj).Click i was running above code in one weak back it was working fine i got result,again i opened after few days ,again i was trying to run the code it shows run time error in last line of my code ,why ?pls answer my question?

0 Answers  

---

accept a string & display whether a is present or not

1 Answers  

---

What purpose does ‘on error resume next’ serves?

0 Answers  

---

How will you convert a string to lower case string using vbscript?

0 Answers  

---

Can anyone send me a vb script function for verifying the functionality of active links on a web page

0 Answers   Zensar,

---

does anyone have qtp11.0 license key.Please sendit to my mail id-rrvv2011@gmail.com...Thanks

0 Answers  

---