Thank You Sir! Worked as expected 

On Monday, August 12, 2013 2:27:12 PM UTC-4, udayanem wrote:
>
> The other work around is:
> *fText="Redemption Allowance: \$1,000"*
> *fText1="Redemption Allowance: $1,000"*
> Set myp=Browser("title:=.*").page("title:=.*")
> Set myo=description.Create()
> myo("micclass").value="WebElement"
> myo ("innertext").value=fText
> 'myo ("innertext").RegularExpression=false
> myo("index").value=0
>
> If myp.WebElement(myo).GetROProperty("innertext")= * fText1* then
>     msgbox "pass"
> Else
>     msgbox "Fail"
> End if
> set myp= nothing
> set myo= nothing
>
>
> Thanks,
> Uday
> QTP \ UFT Videos <http://www.youtube.com/user/AnemUday/videos>
> On Monday, 12 August 2013 23:45:51 UTC+5:30, udayanem wrote:
>>
>> Hi,
>>
>> Check the added line in Red color.
>>
>> Reason:
>> Since "$" is a special char and object description is evaluated as 
>> regular expression, i dont want to evaluate as regular exp.
>> So i made that property to false.
>>
>> Check and let me know whether it worked for you or not.
>>
>> Thanks,
>> Uday
>> QTP \ UFT Videos <http://www.youtube.com/user/AnemUday/videos>
>>
>> On Monday, 12 August 2013 20:30:11 UTC+5:30, [email protected] wrote:
>>>
>>> Can someone check and tell me where is my function wrong. 
>>>
>>> Open "Iexplore","
>>> https://gmcard.preprod.drmp.gm.com/core/vehicles/ra-2012";
>>>
>>> Text_Check "Redemption Allowance: $1,000"
>>>
>>>  
>>>
>>> Function Open(fBro,fUrl)
>>>
>>>    systemutil.Run fBro,fUrl
>>>
>>> End Function
>>>
>>> Function Text_Check(fText)
>>>
>>> Set myp=Browser("title:=.*").page("title:=.*")
>>>
>>> Set myo=description.Create()
>>>
>>> '     myo("micclass").value="WebElement"
>>>
>>> '               myo("html tag").Value="LI"
>>>
>>>                 myo ("innertext").value=fText
>>>
>> * myo ("innertext").RegularExpression=false
>>
>> *
>>
>>>                                 myo("index").value=0
>>>
>>> If myp.WebElement(myo).GetROProperty("innertext")=  fText then
>>>
>>>                                 msgbox "pass"
>>>
>>>                 Else
>>>
>>>                 msgbox "Fail"
>>>
>>>                 End if
>>>
>>> set myp= nothing
>>>
>>> set myo= nothing
>>>
>>>  
>>>
>>> End Function
>>>
>>

-- 
-- 
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/groups/opt_out.


Reply via email to