Qui sotto inserisco un codice sql di access perchè volevo visualizzare nella maschera un immagine da una cartella predefinita, diversa per ogni record ed identificata in base al valore di un altro campo. Nel caso in cui l'immagine non ci fosse ne visualizzerebbe una di default dal nome 0.jpg
Nelle righe evidenziate da "NON FUNZIONA" ci sarebbe la parte che mi interessa attivare perchè non mi serve un percorso testo, ma un collegamento ad un oggetto immagine.
codice:
Private Sub Form_Current()
Dim visua As Integer
Dim valore1 As Integer
Dim Percorso As String
Dim fs
valore1 = Nz([Forms]![Anagrafico]![IDGiocatore], 0)
Set fs = CreateObject("Scripting.FileSystemObject")
If fs.FileExists("C:\Database_COSOV\Foto\" & valore1 & ".jpg") Then
visua = valore1
Else
visua = 0
End If
Percorso = "C:\Database_COSOV\Foto\" & visua & ".jpg"
'---- FUNZIONA!!!! ---------
'---------------------------
[Forms]![Anagrafico]![PercImm] = Percorso
' Il campo PercImm è un testo con il percorso dell'immagine
'---------------------------
'---- NON FUNZIONA!!!! ----
'---------------------------
[Forms]![Anagrafico]![Foto].[Picture] = percorso
'Il campo Foto è un oggetto immagine non associato
'---------------------------
End Sub
Grazie mille.