a = split(Browser("B").Page("P").WebList("L").getroproperty("all 
items"),";")

For i=0 To UBound(a)-1
For j=i+1 To UBound(a)
If StrComp(a(i),a(j),1)>0 then
     t=a(i)
     a(i)=a(j)
     a(j)=t
End if
Next
Next

For i=0 To UBound(a)
print a(i)&vbtab
next

Note: We can also use an arraylist instead of an array. The advantage of 
using an arraylist is that it has an inbuilt function for sorting the 
elements contained in it. Google it for more info.

-- 
-- 
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 Groups "QTP 
- HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Reply via email to