Ciao a tutti.
Sono nuovo, mi chiamo Luca e scrivo perchè aavrei bisogno del Vostro aiuto.
Ho una tabella Access 2010 chiamata DATABASE. Al suo interno vi sono alcuni campi tra cui uno chiamato "CODICEFARM" ed uno campo che dovrà contenere l'immagine associata al codice o il link all'immagine.
Ho la necessità di realizzare una routine che spazzoli in modo sequenziale tutti i record, controlla in una specifica cartella se c'è l'immagine il cui nome corrisponde con il CODICEFARM, se la trova ho due scelte: caricare la foto in un campo OLE e memorizzare il nome foto comprensivo di percorso.
A tal proposito allego il codice per caricare cel campo "File" il Nome completo di percorso del file.
Sub Load_Photo()
Dim Directory, NomeFile, NomeFoto As String
Dim dbase As DAO.Database
Dim rsbase As DAO.Recordset
Dim rsPictures As DAO.Recordset
Set dbase = CurrentDb
Directory = "D:\GDRIVE\F O T O\resize\"
'Directory = "D:\GDRIVE\F O T O\resize\BMP\"
' Instantiate the parent recordset.
Set rsbase = dbase.OpenRecordset("BASEDATI")
' Activate edit mode.
' Instantiate the child recordset.
'Set rsPictures = rsbase.Fields("Immagine").Value
rsbase.MoveFirst
While Not rsbase.EOF
NomeFoto = rsbase.Fields("CODICEFARM").Value
NomeFile = Directory & NomeFoto & ".jpg"
If Dir(NomeFile) <>"" Then
rsbase.Edit
rsbase.Fields("File").Value = NomeFile
rsbase.Update
Else
rsbase.Edit
rsbase.Fields("File").Value = ""
rsbase.Update
End If
rsbase.MoveNext
Wend
End Sub
Vorrei realizzare / modificare questa subroutine pechè possa caricare nel campo "Immagine" una foto JPG o BMP.
Il risultato dovrà essere che nlla form vorrei vedere la foto dell'articolo e cambando record cambia foto, ma sopratutto mi serve vedere la foto in un report di tipo tabellare (esempio elenco articoli con la foto accanto.
Come faccio a fare questo nell'ipotesi di usare un link invece dell'imagine OLE?
Grazie
Luca