Attachmate.Reflection.Objects Library (Web) > WebControl Object : NativeBrowerControl Property |
Object.NativeBrowerControl As Object
Dim msDoc As MSHTML.HtmlDocument
Dim webCtrl As SHDocVw.WebBrowser
Set webCtrl = ThisWebControl.NativeBrowerControl
Set msDoc = webCtrl.Document
Debug.Print msDoc.url 'show current document URL