i'll try that
Thanks a Lot Buddy for precious time
On Wed, May 4, 2011 at 4:53 PM, Ganesh muralidharan <[email protected]>wrote:
> Instead of AllItems = "7-Technologies A/S;Blue Coat Systems Inc.;Cisco
> Systems Inc.;Dell Inc.;EMC Corp.;FIX Protocol Limited;IBM Corp." can you try
> creating the array using Array.
>
> AllItems = Array("7-Technologies A/S","Blue Coat Systems Inc.;Cisco Systems
> Inc.","Dell Inc.;EMC Corp.","FIX Protocol Limited;IBM Corp.")
>
> then loop through the array without split.
>
>
> On Wed, May 4, 2011 at 6:04 AM, Sheik Adil <[email protected]> wrote:
>
>> Hi Ganesh,
>> Every thing is working fine after the completion of the
>> operation the control is not coming out of the loop.
>> Thanks
>>
>>
>> On Wed, May 4, 2011 at 4:30 PM, Ganesh muralidharan
>> <[email protected]>wrote:
>>
>>> Put a Breakpoint at For j = 0 to Ubound(sItem) and
>>> check how value is saved in array sItem using debug viewer for sItem
>>> and sItem(j).
>>>
>>>
>>>
>>> On Wed, May 4, 2011 at 5:50 AM, Sheik Adil <[email protected]> wrote:
>>>
>>>> Hi All,
>>>> This is the code After Executing the code the control is not coming out
>>>> of the loop.
>>>> your help will be appreciated
>>>>
>>>>
>>>> AllItems = "7-Technologies A/S;Blue Coat Systems Inc.;Cisco Systems
>>>> Inc.;Dell Inc.;EMC Corp.;FIX Protocol Limited;IBM Corp."
>>>> Flag = False
>>>> Set objWEL = Description.Create
>>>> objWEL("micclass").Value = "WebElement"
>>>> objWEL("html id").Value ="j_id1:j_id2:0:j_id856:0:tree:n-.*:j_id1087"
>>>>
>>>> Set WELgroup =
>>>> Browser("micclass:=Browser").Page("micclass:=Page").ChildObjects(objWEL)
>>>> WELCount = WELgroup.Count
>>>>
>>>> Set objIMG = Description.Create
>>>> objIMG("micclass").Value = "Image"
>>>> objIMG("html id").Value ="j_id1:j_id2:0:j_id856:0:tree:n-.*:checkImage"
>>>> Set IMGgroup =
>>>> Browser("micclass:=Browser").Page("micclass:=Page").ChildObjects(objIMG)
>>>>
>>>> sItem = Split(AllItems,";")
>>>> For i = 0 to WELCount-1
>>>> ItemName = WELgroup(i).GetROProperty("innertext")
>>>> For j = 0 to Ubound(sItem)
>>>> If ItemName = sItem(j) Then
>>>> ' Flag = True
>>>> IMGgroup(i).Click
>>>> Wait(4)
>>>> Exit For
>>>> End If
>>>> Next
>>>> Next
>>>> '
>>>> Thank you,
>>>>
>>>> --
>>>> 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
>>>
>>>
>>>
>>>
>>> --
>>> Regards,
>>>
>>>
>>> Ganesh Muralidharan
>>> 'God Never Forgets'
>>>
>>> --
>>> 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
>>
>>
>> --
>> 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
>>
>
>
>
> --
> Regards,
>
>
> Ganesh Muralidharan
> 'God Never Forgets'
>
> --
> 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
>
--
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
