'######################################################################################
case:-->If You Know the Link name get Generated in application during
run time (ie, passing data form excel)
set pagobj=Browser("Browser").page("Page")
runtimelinkname=given from excel sheet
call linkclick(pagobj,runtimelinkname)
set pagobj=nothing
'**********************************************************************************************
Function linkclick(pagobj,runtimelinkname)
LnkCount=Trim(pagobj.object.links.length)
For i=0 to LnkCount-1
AllRuntimeLnkName=Trim(pagobj.object.links
(i).innertext)
Res=strcomp(runtimelinkname,AllRuntimeLnkName,1)
If (Res=0) Then
pagobj.object.links(i).click
Exit For
End If
Next
'######################################################################################
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
