Have you tried saving the script without selecting the active screen check box

> On Oct 8, 2015, at 9:54 AM, axn700 <[email protected]> wrote:
> 
> Please suggest Improvements.
> The page has Div tags and inside span and list tags.
>  I have about 200 small objects to be recognized to see the answers to 200 
> questions.
> Here is the script.
> 
> Dim objWebelement,objOptions,ObjText,Answer,vOptions,WshShell
> Systemutil.run"Firefox.exe","Link here"
> Set objWebelement=description.Create()
> objWebelement("micclass").Value="WebElement"
>       Set objButton=description.Create()
>       objButton("micclass").value="WebElement"
>       objButton("html tag").value="LI"
>       objButton("height").value="27"
>       
>       Set objText=description.Create()
>       ObjText("micclass").Value="WebElement"
>       ObjText("Class").Value="explanation"
>       ObjText("html tag").Value="DIV"
>       
> For i = 1 To 200 Step 1
>       objButton("innertext").value=i
>       Browser(" ").Page("").WebElement(objButton).Click
>       
>       objText("innertext").Value=i&".*"       
>       Answer=Browser("").Page(" 
> ").WebElement(ObjText).GetROProperty("innertext")
>       Print Answer
>       
> Next
> 
> Set objText=Nothing
> Set objButton=Nothing
> Set WshShell=Nothing
> Set objWebelement=Nothing
> 
> 
> Thanks in advance.
> -- 
> -- 
> 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.

-- 
-- 
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