I'm trying to retrieve the page content without success. Please see the small sample below. I can retrieve many properties without troubles, but the "Document" one or other objects which are always retrieved as "Numbers" instead of "Objects".
Should I use call the "GetProperty" method (http://msdn.microsoft.com/en-us/library/aa768398(VS.85).aspx) to retrieve the document object, or am I missing something obvious ?
Thank you,
Davide
- Code: Select all Expand view
Function Main()
Local oWnd,oActiveX
DEFINE WINDOW oWnd TITLE "Test"
oActiveX = TActiveX():New( oWnd, "Shell.Explorer" )
oWnd:oClient := oActiveX // To fill the entire window surface
oActiveX:Do( "Navigate2", "http://www.fivetechsoft.com" )
ACTIVATE WINDOW oWnd MAXIMIZED
Do While oActiveX:GetProp( "Busy" )
SysWait(.5)
Enddo
? "ok, finished, so far, so good"
? "ReadyState",oActiveX:GetProp( "ReadyState" ) // -> 4 ok
? "FullName", oActiveX:GetProp( "FullName" ) // -> HB_ARGV(0)
? "Type",oActiveX:GetProp( "Type" ) // -> "Documento HTML"
? "StatusText",oActiveX:GetProp( "StatusText" ) // -> ""
? ValType( oActiveX:GetProp( "Document" ) ) // -> N
? ValType (oActiveX:GetProp( "Application" ) ) // -> N
? "Parent", ValType(oActiveX:GetProp( "Parent" )) // -> N