PROCEDURE DWebBrowserEvents2_NewWindow2(ppDisp AS VARIANT @, Cancel AS LOGICAL @) AS VOID; HELPSTRING "A new, hidden, non-navigated WebBrowser window is needed." ppDisp = CreateObject("InternetExplorer.Application") && reference to new browser This.oNewBrowser = ppDisp && custom property ENDPROCSince you have to implement the entire DWebBrowserEvents2 interface, you also have to trap for the FileDownload type library bug: http://www.west-wind.com/wwthreads/Message17N0YECXT.wwt
>oIE = CreateObject("InternetExplorer.Application") >oIE.Visible = .t. >oIE.Navigate("https://goldleafach.com/achbeta/?8435017") >? oIE.Document.Forms.Length && returns 1 (initial form only) >? oIE.Document.Forms(0).Name && returns name of initial form >? oIE.Document.Forms(1).Name && fails >