Hi guys,
After setting up a test database and getting data from another "normal" website I get a result but not THE result I like to have.
With the code:
DoCmd.GoToControl "TITLE"
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Dim Header As String
Dim objIE As Object
Dim URL As String
URL = "https://intranetsite.nl/link/standaard/626"
Set objIE = New InternetExplorerMedium
objIE.Visible = True
objIE.Navigate URL
While objIE.Busy = True Or objIE.ReadyState <> 4: DoEvents: Wend
Header = objIE.Document.getElementsByTagName("title")(0).innerText
Forms!Frm_1_Proces!SubFrm_Ref!TITLE = Header
The only problem now is that the TITLE is the title of a INTRANET mainpage instaed of the opened URL page.
The retrieved TITLE is from intranet url mainpage:
https://intranetsite.nl/index.html
instead of the page on the screen, the opened URL:
https://intranetsite.nl/link/standaard/626
How do I get data from the screenpage?
Any suggestions are highly appreciated