Indsætte et billede men sti og filnavn gemmes ikke
Jeg ønsker at indsætte et billede i en record og har fundet en kode, der fungerer i eksemplet.Når jeg bruger koden kan jeg vælge billedet og som vist i koden nedenfor får jeg fat i strPath og Me.Picture. Problemet er, at værdien IKKE bliver gemt i feltet .... Jeg har prøvet at håndskrive sti/fil ind i feltet, så fungerer det som det skal.
Nogen forslag til at værdien ikke bliver gemt?????
Private Sub cmdAdd_Click()
On Error GoTo Err_Handler
Dim strPath As String
' open 'file open' dialogue and get path to selected file
strPath = GetFilePath()
If Len(strPath) > 0 Then
Me.Picture = strPath
Me.ctrlPicture.Visible = True
End If
'test for at se om sti-fil er valgt rigtigt
MsgBox strPath
MsgBox Me.Picture
Exit_here:
Exit Sub
Err_Handler:
MsgBox Err.Description, vbExclamation, "Error"
Resume Exit_here
End Sub