02-01-2010, 06:02 PM
Function SetSource
Hi,
I am getting syntax error, end of statement required.
Any help will be really appreciated
Regards;
vijay
Hi,
Code:
Set WbEdit = Description.Create()
WbEdit("micclass").Value = "Link"
WbEdit("name").Value = "C"
Set AllWbEdit = Browser("micclass:=browser").Page("micclass:=Page").ChildObjects(WbEdit)
NumberOfEdits=AllWbEdit.Count
msgbox(NumberOfEdits)
For i=0 to (NumberOfEdits-1)
if AllWbEdit(i).GetRoproperty("href")<>"javascript:Copy"("'nessusId','0','2'") " " then
AllWbEdit(i).Click
End if
Next
End Function
Any help will be really appreciated
Regards;
vijay