Default path for Insert hyperlink code

[jaworski_m]

Hello,


I use the following code in the OnClick event to allow users to add a hyperlink.

'Opens hyperlink dialog
   On Error GoTo ErrEditHyper
   Me.link.SetFocus
   DoCmd.RunCommand acCmdEditHyperlink
   Exit Sub

A pop-up windows shows up to insert hyperlink.

QUESTION
Is there a way to modify this code so that when window opens it alredy shows a default path ("x:\folder1\folder2\...\folder n"), so that user doesn't have to manualy go through all folders to the needed location ?

This location is different than location of the database.

Thank you for hints

[June7]

I don't think can. Alternative is to not use the hyperlink dialog. Review http://bytes.com/topic/access/answer...default-folder

Don't even need the 'hyperlink' type field. Filename (with or without full path) can be saved to a text field. Then to open the file: http://allenbrowne.com/func-GoHyperlink.html

[jaworski_m]

Thank you reply.
It seems it is what I need. However, I have a question to the code.

strHyperlinkFile = Mid$(varItem, InStrRev(varItem, "\") + 1) & "#" & varItem

Why is the application of "$" in "MID" function?
The code works also well without "$" character.

I have been looking for explanation but without success.

[June7]

Here is best explanation I can find https://msdn.microsoft.com/en-us/lib...(v=vs.90).aspx