Public Sub retriveNodeValue(strClmName, strObjectName)
DataTable.Value (strClmName, dtGlobalSheet) =
strObjectName&.NodeValue
If Err.Number <> 0 Then
DataTable.Value(strClmName, dtGlobalSheet) =
Err.Description
End If
End Sub
'''
Call retriveNodeValue ("Title", nTitle)
''''
Hi Folks,
I am trying to use the above code and qtp is throwing an syntax error,
i am not sure at to what is the error....
Any help will be very much appreciated...
Thanks.
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
