[MS Access] Pulsante per inserire allegati in campo maschera

Discussione in 'MS Access' iniziata da Alessio Forconi, 13 Gennaio 2019.

  1. Alessio Forconi

    Alessio Forconi Nuovo Utente

    Registrato:
    1 Gennaio 2019
    Messaggi:
    3
    Mi Piace Ricevuti:
    0
    Punteggio:
    1
    Sesso:
    Maschio
    Salve a tutti,

    vorrei creare un pulsante per inserire un allegato in un campo di una maschera, che ovviamente è collegato ad una tabella.

    Per ora sono arrivato a questo codice:

    Codice:
    Dim fDialog As Office.FileDialog
    Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
       
    With fDialog
        .AllowMultiSelect = False
        .Title = "Seleziona la foto da allegare"
        .Filters.Clear
        .Filters.Add "Jpg", "*.jpg"
        .Filters.Add "Jpeg", "*.jpeg"
        .Filters.Add "Png", "*.png"
        If .Show = True Then
            For Each selezione In .SelectedItems
                FileDaInserire = selezione
            Next
        Else
            MsgBox "Operazione annullata!", vbInformation
            Exit Sub
          End If
        End With
    
    A questo punto pensavo ad una query di inserimento che abbia il percorso del file, cioè FileDaInserire, come contenuto del campo allegato della tabella.

    È corretto come ragionamento logico?
    Se sì, va bene passare il nome del file completo di percorso alla query?

    Grazie
     
Sto caricando...

Condividi questa Pagina