Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Internet explorer application x webbroser
Message
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Title:
Internet explorer application x webbroser
Environment versions
Visual FoxPro:
VFP 9 SP2
Miscellaneous
Thread ID:
01341052
Message ID:
01341052
Views:
78
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
Next
Reply
Map
View

Click here to load this message in the networking platform