Como llamo a una pagina web desde un formulario en vfp 9.0

Quisiera una ayuda, para ver como llamo a una pagina web desde un formulario y que la pagina web se vea en el formulario yo estuve indagando en la web y desarrolle el siguiente ejemplo desde un PRG. Funciona pero si lo prueban verán la deficiencia, sale una ventana indicando error en el script de Internet, me podrían ayudar para subsanar este error, gracias

clear memory

PUBLIC oMiForm
oMiForm = CREATEOBJECT("MiForm")
oMiForm.SHOW
retur

DEFINE CLASS MiForm AS FORM
height = 665
widht = 775
autocenter = .T.
CAPTION = "AGRICOLA SOL DE VILLACURI"
NAME = "MiForm"
SHOWWINDOW = 1
ADD OBJECT cmdMostrar AS COMMANDBUTTON WITH ;
TOP = 10, LEFT = 350, HEIGHT = 27, WIDTH = 112, ;
CAPTION = "Mostrar Web", NAME = "cmdMostrar"
ADD OBJECT oleIE AS OLECONTROL WITH ;
TOP = 48, LEFT = 12, HEIGHT = 600, WIDTH = 750, ;
NAME = "oleIE", OLECLASS = "Shell.Explorer.2"
PROCEDURE cmdMostrar.CLICK
THISFORM.oleIE.Navigate("http://www.asv.pe/")
ENDPROC
ENDDEFINE
KEYBOARD '{Y}'
THISFORM.Refresh

Añade tu respuesta

Haz clic para o