Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Internet explorer application x webbroser
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Titre:
Internet explorer application x webbroser
Versions des environnements
Visual FoxPro:
VFP 9 SP2
Divers
Thread ID:
01341052
Message ID:
01341052
Vues:
79
I can open aula01.htm in internetexplorer.application

*********************************************************************************************

lnLoadTimeout = 60 && seconds
loIE = Createobject("internetexplorer.application")
loIE.Visible = .T.
loIE.Navigate(SYS(5)+ CURDIR()+"aulas\"+ "aula01.htm")
* Wait for load to complete
lnSeconds = SECONDS()
DO WHILE (loIE.Busy OR loIE.ReadyState <> 4) ;
AND (SECONDS() - lnSeconds) < lnLoadTimeout
DOEVENTS
ENDDO
*************************************

But the same file in webbrowser does not open

"member document does not evaluate to an object"


*******************************************************


&& Load HTML into Web Browser Control
Thisform.olecontrol1.object.Document.Open()
Thisform.olecontrol1.object.Document.Write(loIE.Navigate(SYS(5)+ CURDIR()+"aulas\"+ "aula01.htm"))
Thisform.olecontrol1.object.Document.Close()
&& Wait for load completion
lnStartSeconds = SECONDS()
DO WHILE Thisform.olecontrol1.object.ReadyState <> 4 ;
AND (SECONDS()-lnStartSeconds <= lnLoadTimeout )
DOEVENTS
ENDDO
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform