Jose Vicente, function conecta(cDirWeb, lVisible, lToolBar, lStatusBar, lMenuBar) local Ole DEFAULT lVisible := .t., lToolBar:= .t., lStatusBar:= .t., lMenuBar:= .t. ole:=TOleAuto():New("InternetExplorer.Application") ole:Set("Visible", lVisible) ...