FiveTech Support Forums

#include "Fivewin.ch"


STATIC FUNCTION MAIN()

    LOCAL oWnd, oIe

    DEFINE WINDOW oWnd

    oIe = TActiveX():New( oWnd, "Shell.Explorer" )

    oIe:Do( "ToolBar", .T. )

    oIe:Do( "Navigate", "www.google.com" )

    oWnd:oClient = oIe

    ACTIVATE WINDOW oWnd;
             MAXIMIZED

    RETURN NIL