UtterAccess.com
X   Site Message
(Message will auto close in 2 seconds)

Welcome to UtterAccess! Please ( Login   or   Register )

Custom Search
> Copy The Current Internet Explorer URL To A Field, Any Versions    
 
   
BuzyG
post Dec 6 2017, 08:42 AM
Post#1



Posts: 421
Joined: 20-September 12
From: Cornwall UK


Hello again folks. I'm hoping this one is straight forward.

I have internet Explorer 11 open and simply need to copy the current URL from the address bar, into a field, [DiscLink], on the current form. The Microsoft Internet controls Library is loaded.

Presently this is what I have, alas it does not work.

CODE
Private Sub btnGetURL_Click()

  Dim IE As SHDocVw.InternetExplorer
  Dim StrURL As String

  StrURL = IE.LocationURL
  Me![DiscLink] = StrURL

End Sub
Go to the top of the page
 
 
Start new topic
Replies
DanielPineault
post Dec 6 2017, 09:00 AM
Post#2


UtterAccess VIP
Posts: 7,061
Joined: 30-June 11



Perhaps this could help.

http://www.devhut.net/2017/02/03/internet-...orer-save-tabs/
Go to the top of the page
 

Posts in this topic



Custom Search


RSSSearch   Top   Lo-Fi    20th January 2020 - 05:19 AM