oForm = CREATEOBJECT([Form1]) oForm.Show(1) DEFINE CLASS form1 AS form DoCreate = .T. Name = "Form1" Height = 400 Width = 402 ADD OBJECT olecontrol1 AS olecontrol WITH ; Top = 1, ; Left = 1, ; Height = 300, ; Width = 400, ; Name = "oleWebBroser",; oleClass = [Shell.Explorer.2] ADD OBJECT command1 AS commandbutton WITH ; Top = 320, ; Left = 1, ; Height = 27, ; Width = 400, ; Caption = "Click to load Google", ; Name = "Command1" PROCEDURE command1.Click thisform.oleWebBroser.Navigate2([http://www.google.com]) ENDPROC ENDDEFINENo error handling is included in that example.