Function openbrowser(iexplore)
   systemutil.Run "iexplore"
End Function

Function navigate(url)
   browser("creationtime:=0").Navigate "http://salesforce.com"
    browser("creationtime:=0").Sync
End Function

Function input(ObjectName,data)
   FindObject(ObjectName).set data
   input="pass"
End Function