Return a text string from a hyperlinked field?

  • Thread starter Thread starter Shadrack
  • Start date Start date
S

Shadrack

I would like to obtain the path to a hyperlinked object in Field 1 and store
it in a seperate text field Field 2 and have it displayed as text. How do I
do this?

Field1 is hyperlinked
Field 2 is not
 
Shadrack said:
I would like to obtain the path to a hyperlinked object in Field 1 and store
it in a seperate text field Field 2 and have it displayed as text. How do I
do this?

Field1 is hyperlinked
Field 2 is not
Click to expand...

Hi...!

YourPath=RetPathFromHyper(Me.ControlFiled1)


'Put this code in Module
Public Function RetPathFromHyper(strHyper as string) as string
Dim PosLinK As Byte 'Start Position Hyperlinj.
Dim StrFoto As String
PosLinK = InStr(strHyper , "#") + 1
StrFoto = Mid(strHyper , PosLinK, Len(strHyper ) - PosLinK)
End Function

That's all.

Alessandro(IT)
 
Back
Top