Gajendra:
You can run the two functions and determine in where the name occurs.
If the name shows up in the weblist group, then you will need to find
out if it is a multiple.
I do not know if the source index will be of any assistance or not.
(probably not)
Does the property, select type, have a value of Extended Selection for
the multiple? If yes, then that would solve the multiple problem.
Parke
Function CountNumberWebEdits(br,pg)
Dim oDesc
Set oDesc = Description.Create()
oDesc("micclass").value = "WebEdit"
print "looking at page " & pg
Set webedits =
Browser("name:="&br).Page("title:="&pg).ChildObjects(oDesc)
print "number of webedits = " & webedits.count & ", and the names are
below:"
For i = 0 to webedits.count - 1
print "name = " & webedits(i).GetROProperty("name") & ": the
source
index = " & webedits(i).GetROProperty("source_index")
Next
print vbcr
End Function
Function CountNumberWebLists(br,pg)
Dim oDesc
Set oDesc = Description.Create()
oDesc("micclass").value = "WebList"
print "looking at page " & pg
Set weblists =
Browser("name:="&br).Page("title:="&pg).ChildObjects(oDesc)
print "number of weblists = " & weblists.count & ", and the names are
below:"
For i = 0 to weblists.count - 1
print "name = " & weblists(i).GetROProperty("name") & ": the
source
index = " & weblists(i).GetROProperty("source_index")
Next
print vbcr
End Function
On 8/9/12, Gajendra Jain <[email protected]> wrote:
> Hi,
>
> I have a scenario where the object has to be changed from Webedit to
> Weblist or Weblist to Multiselect. but the common thing is the LABEL
> attached to it.
>
> Is there any way where i can find out which object is present(Webedit or
> weblist or multiselect) next to the LABEL at the Run time?
>
> Regards,
> Gajendra
>
> --
> You received this message because you are subscribed to the Google
> "QTP - HP Quick Test Professional - Automated Software Testing"
> group.
> To post to this group, send email to [email protected]
> To unsubscribe from this group, send email to
> [email protected]
> For more options, visit this group at
> http://groups.google.com/group/MercuryQTP?hl=en
>
--
Parke
Cell: 770-842-0121
--
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
