Hallo,
Ik probeer vanuit VBA een internetsnelkoppeling te openen die "gewoon" vbij ons op het netwerk staat.
Deze internetsnelkoppeling heeft het formaat <klantnr>.url
Als ik deze vanuit VBA open, krijg ik een beveiliginswaarschuwing die vraagt "Openen" of "Opslaan". Ik lijk hier niet om heen te kunnen (heb zelfs een registersleutel aangepast aan de hand van Windows-informatie die het euvel zou moeten verhelpen, maar niet bij mij ...).
Als ik de volledige link erachter direct open, krijg ik de beveiligingswaarschuwing niet.
Heeft iemand een idee of/hoe ik de volledige naam van de shortcut in VBA kan oppakken? Want dan kan ik "die naam" openen ipv de short cut.
De volledige naam is iets als:
http://.../knowledgebasebrowse?action=showitem&unid=VO0004
waarbij de "unid" dus steeds verschillend is, maar een "nietszeggend" ID is.
Als ik nou via "getfile" of dergelijke de volledige naam behorende bij een url kan oppikken, dan ben ik eruit. Maar wie o wie weet hoe dat moet ??
De VBA-code om een shortcut of een volledige link te openen is als volgt en werkt in principe goed:
Sub OpenURL(urlName)
Dim ie As Object
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.navigate urlName
Set ie = Nothing
End Sub
Ik probeer vanuit VBA een internetsnelkoppeling te openen die "gewoon" vbij ons op het netwerk staat.
Deze internetsnelkoppeling heeft het formaat <klantnr>.url
Als ik deze vanuit VBA open, krijg ik een beveiliginswaarschuwing die vraagt "Openen" of "Opslaan". Ik lijk hier niet om heen te kunnen (heb zelfs een registersleutel aangepast aan de hand van Windows-informatie die het euvel zou moeten verhelpen, maar niet bij mij ...).
Als ik de volledige link erachter direct open, krijg ik de beveiligingswaarschuwing niet.
Heeft iemand een idee of/hoe ik de volledige naam van de shortcut in VBA kan oppakken? Want dan kan ik "die naam" openen ipv de short cut.
De volledige naam is iets als:
http://.../knowledgebasebrowse?action=showitem&unid=VO0004
waarbij de "unid" dus steeds verschillend is, maar een "nietszeggend" ID is.
Als ik nou via "getfile" of dergelijke de volledige naam behorende bij een url kan oppikken, dan ben ik eruit. Maar wie o wie weet hoe dat moet ??
De VBA-code om een shortcut of een volledige link te openen is als volgt en werkt in principe goed:
Sub OpenURL(urlName)
Dim ie As Object
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.navigate urlName
Set ie = Nothing
End Sub