Newsgroup: it.comp.appl.access
Titolo: Immagini! Non riesco!

Ho letto tutte le faq e quant'altro, ma non riesco a preparare il form in
modo da inserire delle foto residenti in una cartella, senza collegarle o
incorporarle. Se qualche anima pia mi aiutasse. Potrei inviare il file per
una "controllatina". Si tratta di un database per la gestione di carte
d'identità di un piccolo comune.

 d'identità di un piccolo comune.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:AGbma.33059$DT4.9...@twister1.libero.it...

Allora ho copiato letteralmente il codice che compare nella maschera
"Impiegati" del Database di esempio Northwind che ha sistemate le foto in
una cartella esterna (proprio quello che cerco io)
Quando aziono il pulsante per assegnare la foto mi da un errore di runtime
"438". Il problema viene da:
Sub getFileName()
    ' Visualizza la finestra di dialogo Apri file di Office per selezionare
un file
    ' per il record dell'impiegato corrente. Se l'utente seleziona un file,
tale file
    ' viene visualizzato nel controllo Immagine.
    Dim fileName As String
    Dim result As Integer
    With Application.FileDialog(msoFileDialogFolderPicker)
        .Title = "Seleziona foto impiegato"
        .Filters.Add "Tutti i file", "*.*"
        .Filters.Add "JPEG", "*.jpg"
        .Filters.Add "Bitmap", "*.bmp"
        .FilterIndex = 3
        .AllowMultiSelect = False
        .InitialFileName = CurrentProject.path
        result = .Show
        If (result <> 0) Then
            fileName = Trim(.SelectedItems.Item(1))
            Me![ImagePath].Visible = True
            Me![ImagePath].SetFocus
            Me![ImagePath].Text = fileName
            Me![Nome].SetFocus
            Me![ImagePath].Visible = False
        End If
    End With
End Sub
La causa pare essere la variabile fileName
Infatti se metto una interruzione nel file Northwind compare il percorso
dove si trovano le immagini.
Nel mio NO!
Scusate la lungaggine

 ha scritto nel messaggio
news:Cwgma.33861$DT4.1...@twister1.libero.it...

Non so che versione di Access usi, ma io uso Access 97 e nel mio database di
esempio Northwind nella maschera Impiegati la foto non è visualizzata in un
controllo Immagine ma in una Cornice oggetto associata ad un campo OLE e le
immagini sono quindi inglobate nel database e non sono contenute in una
cartella esterna al database; non sono quindi in grado di aiutarti ad
interpretare e spiegarti cosa fa il programma Northwind che hai installato
sul tuo PC.
Io con Access 97 per aprire una finestra di dialogo Apri file devo usare le
API di Windows: a tale scopo uso infatti normalmente la funzione di Stefano
Bettini contenuta nella FAQ intitolata "Richiamare la finestra di dialogo
per la selezione di un file" che si trova nella Sezione General del Sito
Comune. Prova ad usare quella per selezionare un file: una volta registrato
il codice VBA indicato nella FAQ in un modulo è molto più facile gestire la
selezione del file effettuata.


 ha scritto nel messaggio
news:q2hma.33927$DT4.1...@twister1.libero.it...

Uso il pacchetto Office XP (l'esempio di Northwind è diverso!)
Comunque il database che devo preparare andrà a "girare" con access 97
(faccio la conversione in tale formato)