Come creare un database - Video 1

[@Ivanostefanelli.]

Grazie. Molto utile. Decine di libri e mai niente di così chiaro come in questo video. Complimenti. Complimenti anche per il modo spedito di introduzione degli argomenti. Comunicazione: 10+++

[@emanuelelana6834]

+Ivano Stefanelli grazie per il tuo splendido commento: posso incorniciarlo... :-)

[@saraa.5664]

Sei bravissimo chiaro e veloce. Ci sono tutorial di 100 pagine per spiegare quello che tu hai spiegato in tre secondi grazie

[@emanuelelana6834]

grazie a te Sara per il commento! in effetti punto proprio a questo: pochi minuti e chi guarda deve capire se il video gli può servire o no

[@marianorossi7241]

Complimenti davvero..!! Il vero "sapere" e' , per quanto possibile , rendere semplici cose complesse..Grazie..!!

[@emanuelelana6834]

Mariano, sei gentilissimo! faccio del mio meglio :-)

[@robertobraicovick6867]

Grazie per le bellissime lezioni!

[@emanuelelana6834]

grazie per il feedback, Roberto!

[@milkovivaldi]

1:35 e se l’immagine la carichiamo come allegato la duplica comunque come fa con Oggetto OLE?

[@emanuelelana6834]

nel mio video non si parla di oggetti OLE

[@milkovivaldi]

@@emanuelelana6834 1:12 🙄

[@emanuelelana6834]

non uso mai allegati. anche questi fanno "esplodere" il db. li aggancio come file esterni.

[@antoniobonanzinga3614]

Ciao Emanuele. Sono un nuovo iscritto al tuo canale. Ho visto il tuo video di come creare un database video 1. Tutti i passaggi sono chiari precisi e di abbastanza facile comprensione anche per me che non sa nulla di vba. Volevo sapere se con il tempo avevi la possibilita' di fare un analogo video a quelli sopra descritto per anagrafica dipendenti con foto, ma invece di foto collegate documenti PDF. Intanto grazie.

[@emanuelelana6834]

ciao Antonio, grazie per il feedback. in effetti, se l'allegato non è una immagine, ma un pdf, in teoria non cambia nulla per il processo di memorizzazione. la differenza è per la visualizzazione, perché non puoi inserirlo in un controllo Picture, ma devi aprirlo con Acrobat o un PDF reader

[@antoniobonanzinga3614]

@@emanuelelana6834 Ok grazie per la risposta e provero' quindi con la soluzione da te descritta

[@lucagrazzini2595]

Gentilissimo Emanuele. sto preparando un db di ricette per l'Istituto alberghiero dove studia mia figlia. Premetto che ho scaricato dalla rete un form già pronto (in accordo con gli insegnati) ed al quale ho aggiunto le immagini seguendo i suoi preziosi consigli. Nel form vengono usati dei text box di ricerca ai quali corrispondono le finestre relative. E possibile concatenare l'immagine caricata nella finestra di inserimento ricetta con quella di ricerca e quindi nel relativo report di stampa?? Ottima Comunicazione e fluidità nelle spiegazoni

[@emanuelelana6834]

grazie per il feedback! direi che si può fare, vedi email che ti ho inviato

[@Daniele1410]

Il tutto si può applicare su una casella combinata?

[@emanuelelana6834]

il tutto che cosa?

[@Daniele1410]

@@emanuelelana6834 Scusa. Le istruzioni per implementare un immagine e memorizzarla è possibile applicarla ad una casella combinata piuttosto che ad un tasto sfoglia? Nella maschera ho già una casella combinata per selezionare i prodotti.

[@emanuelelana6834]

direi di sì. devi comunque in qualche modo recuperare la cartella, quindi prima o dopo dovrai far selezionare all'utente il percorso

[@WorldBootleg]

Grazie, molto utile.

[@emanuelelana6834]

grazie a te per il feedback!

[@ermannocaruso3723]

Invece di scrivere un codice per le immagini, non si potrebbe creare una tabella separata che contenga solo immagini e poi metterla in relazione con la tabella operai?

[@emanuelelana6834]

non lo suggerisco, perché una tabella con immagini "incollate" dentro aumenta la dimensione del database. lo stesso problema si verificherebbe quando si usasse un campo tipo allegato e si aggiungessero file al database. dopo un po' il database potrebbe avere problemi di efficienza.

[@ermannocaruso3723]

@@emanuelelana6834 Grazie!

[@Skarn73]

Anche a me il comando "Set fd = Application.FileDialog(msoFileDialogFilePicker)" non funziona, e mi ritorna una finestra di errore con su scritto "errore di compilazione: tipo definito dall'utente non definito". Ho cercato informazioni a riguardo e microsoft office dice che per poter funzionare il data-type deve: 1) essere definito in uno statement Type... End Type oppure 2) essere registrato in una Object Library oppure 3) essere registrato in una Type Library Sai come definire il data type msoFileDialogFilePicker correttamente? Oppure sai dove poter acquisire le object library e le type library aggiornate con quel tipo di funzione? Grazie per l'attenzione e buona giornata. :)

[@emanuelelana6834]

controlla su strumenti-riferimenti e, se manca, aggiungi un riferimento a Microsoft Office nn.0 Object Library, dove nn sta per la versione che hai installato.

[@lucaairaghi4396]

Buongiorno, ma come si gestiscono eventuali errori si selezione delle immagini? Grazie

[@emanuelelana6834]

che cosa intendi con "errori di selezione delle immagini"?

[@lucaairaghi4396]

@@emanuelelana6834 buon pomeriggio, si esattamente, ho creato 3 cartelle per mettere le immagini relative a 3 categorie, ma vorrei evitare di mettere l'immagine di una categoria in quella sbagliata.

[@emanuelelana6834]

forse allora se il nome della categoria è uguale a quello della cartella, puoi controllare se il percorso dove si mette l'immagine contenga la categoria in questione. ma non so come hai strutturato il tutto... la funzione Instr restituisce la posizione di una stringa in un'altra. se è trovata il valore è > 0 , se non è trovata è 0.

[@lucaairaghi4396]

@@emanuelelana6834 Buongiorno, grazie per la risposta, ho creato un db dove devo inserire 3 immagini che sono relative a 3 voci che sono: Dimensioni, curve e collegamenti (sono dati di un ventilatore). Ora seguendo le indicazioni del suo video ho creato il codice per l'inserimento delle immagini, ma succede che una volta aperta la finestra di selezione e faccio annulla va in errore, se seleziono un percorso diverso da quello indicato nel codice giustamente mi da errore, vorrei che questi errori vengano gestiti da un Msgbox di errore in runtime. Per ora ho risolto andando a verificare che il nome del file caricato inizi con la categoria, se questa è corretta prosegue mentre se non coincide mi da errore con un MsgBox. Ha una soluzione migliore? Grazie anticipatamente.

[@emanuelelana6834]

allora per il problema che si verifica se annulli, probabilmente puoi testare (minuto 5:36) se me.txtImmagine contiene qualcosa. se è vuoto, l'utente ha annullato.

[@laramartinelli9917]

Ciao, posso farti una domanda su una cosa che non mi è molto chiara? La chiave primaria in un'entità è un attributo o un valore?

[@emanuelelana6834]

ciao Lara, direi che sia un attributo (o un set di attributi), se ti trovi all'interno del modello ER. Se ti sposti sul modello fisico, puoi anche definirla un valore, perché alla fine in una tabella è un vero e proprio dato.

[@laramartinelli9917]

@@emanuelelana6834 Grazie per la risposta

[@marioluigicapra6001]

Bravo

[@emanuelelana6834]

grazie Mario!

[@robertmcgregor795]

Grazie Emanuele come sempre spiegazione chiara e dettagliata. Ho un problema su questo progetto poichè con cmd Sfoglia arrivo alla directory delle immagine(JPG) ma sembra essere vuota; che cosa manca ?

[@emanuelelana6834]

ciao Robert, graze del feedback. sei sicuro di aver scritto msoFileDialogFilePicker? non è che hai messo msoFileDialogFolderPicker? [e quindi selezioni la cartella, ecco perché sembra vuota]

[@KASPAROV2001]

copiata pari pari la tua stringa del minuto 4:30 del video ma ogni volta ho l'errore "Errore di compliazione: Tipo definito dall'utente non definito". E mi apre la finestra di Visual Basic con evidenziato in giallo il rigo Private Sub cmdSfoglia_Click() purtroppo non mastico VIsual Basico.. quindi mi sono arenato qui :(

[@emanuelelana6834]

+Angelo Lubrano ciao Angelo, mi sembra strano... puoi andare sul menu Debug e cliccare sulla prima voce Compila Progetto... (o come si chiama). e vedere dove si interrompe quando l'esecuzione del codice si ferma fin dall'inizio significa che c'è un errore di compilazione, in effetti. potrebbe essere dove hai dichiarato le variabile con Dim. se vuoi fare un doppio check con il codice che hai scritto, sul mio blog www.alfainfo.it trovi il video commentato con tutto il codice da copiare

[@Angelo1969s]

+Emanuele Lana su ferma proprio sulla prima riga del codice. Preciso che sto usando Access2016 su Windows10 che gira su Parallel Desktop su iMac. Lo so .. Non dirmi nulla, ma di solito sviluppo su Filemaker14 PA e ora ho un progetto specifico che devo fare necessariamente con Access per esigenze specifiche del committente 😱

[@emanuelelana6834]

+ANGELO LUBRANO non posso riprodurre il tuo ambiente di sviluppo. ti conviene inviare il db a qualcuno che conosci che abbia access2016 e fargli testare il codice che hai scritto, cosi' capisci se il problema è legato a imac, oppure al fatto che lo hai scritto male.

[@aniellogiordano695]

perchè mi dà errore quando definisco il file dialog ? "Errore di compilazione .Tipo definito dall'utente non definito" . proprio non so spiegarmelo.

[@emanuelelana6834]

prova a dichiararlo senza specificare il tipo, ossia: Dim fs

[@aniellogiordano695]

@@emanuelelana6834 grazie sempre gentilissimo

[@elisabetta4478]

Grazie mille per questa lezione molto sintetica. Esiste anche una lezione su "querry" e "report" , sempre associato a questo file mdb, insomma, un file multifunzionale?

[@emanuelelana6834]

ciao Elizabetha, prego. allora, su query e report le lezioni potrebbero essere molte. hai qualche richiesta particolare?

[@max-sn2pq]

Buongiorno Lana, innanzitutto complimenti per questo servizio. Avrei bisogno di un suggerimento: sto costruendo un piccolo software di manutenzione in access che prevede la compilazione di una maschera di registrazione intervento dove ho la necessità di inserire un eventuale allegato, che sia una foto o qualsiasi altro documento. Suggerimenti? Grazie anticipatamente

[@emanuelelana6834]

ciao Massimo, lieto di aiutare. dunque, direi che l'approccio che hai visto nel video è quello che suggerisco. sicuramente non userei mai campi tipo "allegato" (anche perché non sono supportati in altri ambienti, quindi sarebbe difficile migrare i dati eventualmente in futuro). se gli allegati sono più di uno, dovresti memorizzare in un'altra tabella (in relazione molti rispetto alla tabella manutenzioni) l'IDManutenzione e il nome del file (o il percorso). infine, nella maschera manutenzioni crei una casella di riepilogo in cui visualizzi gli eventuali allegati associati a quella manutenzione. quando l'utente ci fa clic sopra, apri il file allegato. ok? ciao Emanuele

[@riccardocosta9552]

Buongiorno Dott. Lana anche questo tutorial è interessante. Però a me non funziona. Non mi apre la finestra di dialogo nella quale ci sono le foto, ma mi apre la finestra di default e quando la chiudo mi dà errore di run-time Chiamata o argomento non validi. ho fatto le prove con la finestra immediata della funzione e del percorso path e ho le stesse sue risposte. Non capisco perchè. Inoltre per la verità a me interesserebbe memorizzare del file PDF anzichè le foto file che contengono informazioni dei nominativi. Può aiutarmi?

[@emanuelelana6834]

ciao Riccardo, grazie per il feedback positivo. non saprei dire da dove provenga l'errore senza vedere il codice che hai usato. riguardo al PDF, cosa intendi con memorizzare? vorresti memorizzare dentro il database il file PDF? se è questo, personalmente non te lo consiglio, perché la dimensione del database esploderebbe velocemente. immagina di memorizzare 50 file pdf da 5 mega ciascuno. la dimensione del db crescerebbe assai. se invece si tratta di creare il link al file pdf, il procedimento è lo stesso del video, semplicemente poi non imposti il Path del controllo immagine, ma potresti aprire il file quando l'utente clicca sopra al link.

[@riccardocosta9552]

Salve Dott. Lana. Non riesco a capire, io per non sbagliare ho riscritto il codice esattamente come nel tutorial. Di più provo nella finestra immediata il current e risponde esattamente, però quando clicco su cmdsfoglia mi apre la finestra di dialogo dei documenti cioè la finestra di default del database se la chiudo mi viene la finestra di errore ( run-time '5': chiamata di routine o argomento non validi). Ho fatto tutte le prove che nel tutorial lei fa con la finestra immediata e sono esatte. Comunque la riga di codice sul quale mi chiama l'errore è questa: Me.txtpercorsoImmagine = CurrentProject.Path & "\img\" & fncNomeFile(fd.SelectedItems(1)). Sono curioso di capire il perchè di questo per adesso dopo casomai le parlerò della mia idea di avere il PDF invece della foto. L'ho fatta lunga, grazie.

[@emanuelelana6834]

hai creato esattamente tutto? anche le cartelle su disco come le mie? hai la cartella img?

[@sabrinaeinaudi7394]

Ciao Emanuele, ancora una volta un tuo tutorial mi è stato utilissimo nella realizzazione di un progetto; ho seguito alla lettera le tue parole e sono riuscita a creare una sorta di catalogo prodotti inserendo la relativa foto. Ora però ho questo problema: come si può fare per poter stampare anche la foto nel Report? Grazie mille.

[@emanuelelana6834]

ciao Sabrina, complimenti! con un buon (?) maestro andrai lontano ;-) per stampare la foto sul report devi aggiungere sul report lo stesso controllo che hai usato nella maschera per visualizzare l'immagine. poi devi anche aggiungere una casella di testo per il percorso immagine (che naturalmente puoi nascondere). e infine è fondamentale sull'evento "su formattazione" del corpo, in cui devi scrivere: Me.imgFoto.Picture = CurrentProject.Path & "\img\" & Me.txtPercorsoImmagine supponendo che tu abbia usato gli stessi nomi per il controllo immagine e per la casella di testo che contiene il percorso. in sostanza devi solo aggiungere l'evento che carichi l'immagine nel momento in cui stampi (quando si formatta il corpo, appunto). tieni conto che se hai degli articoli nel tuo catalogo senza immagine, il codice andrebbe penso in errore. dovresti aggiungere qualcosa tipo: If Len( Me.txtPercorsoImmagine & "")> 0 then Me.imgFoto.Picture = CurrentProject.Path & "\img\" & Me.txtPercorsoImmagine End If

[@sabrinaeinaudi7394]

E anche questo funziona! Grazie.

[@rdilecce801]

Buondì. Perchè a me non funziona? :( Io vorrei tipo una lista dove c'è il nome del prodotto e la relativa foto associata. In precedenza, nella maschera avevamo creato il modulo che, tramite il CLIC andava ad aprire la cartella immagini. Come hai detto tu Emanuele, -report LISTA -io ho creato direttamente nel report il controllo dell'immagine chiamato "IMMAGINE" -ho creato la casella di testo chiamata "PATH" -sono andato su CORPO - FORMATTAZIONE e ci ho scritto: "Me.immagine = CurrentProject.Path & Me.path" (perchè le mie immagini non sono tutte in IMG ma hanno le loro sottocartelle ES: C:\GEST\IMG\DIV1) Domandona: Ma la casella PATH da dove prende l'origine del dato? Suppongo che da qualche parte bisogna scrivere che il PATH deve riprendere il nome del txtpercorsoimmagine. Ma dove? Su Corrente o su Caricamento? Grazie per l'eventuale aiuto

[@emanuelelana6834]

non direi che serva un evento per quello. devi creare un controllo sul report (che poi nascondi) che avrà come origine dati il campo path.

[@rdilecce801]

ok, funziona. Ultima cosa: quando visualizzo il report, lo vedo completamente bianco ma se faccio ANTEPRIMA DI STAMPA, vedo tutte le caselle e le immagini JPG a 256 colori, mi sapresti dive cosa sbaglio? Grazie

[@mariosantini5675]

Ciao Emanuele, sono arrivato qui: Private Sub cmdSfoglia_Click() Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.Show Me.nomefile = fd.SelectedItems(1) e correttamente nel campo di testo "nomefile" viene memorizzato il percorso del file PDF. Ora vorrei visualizzare il PDF creando un evento su click del campo di testo "nomefile" come posso fare ? Grazie ancora Mario

[@mariosantini5675]

Ho risolto così Private Sub nomefile_DblClick(Cancel As Integer) Dim valore As String valore = nomefile.Value Me.Application.FollowHyperlink Address:=valore, NewWindow:=True End Sub

[@lucaairaghi4396]

Buongiorno, una domanda non legata al video, ma volevo sapere: da un campo numerico (da 1 a 4) posso assegnare ad un altro campo testo un valore scritto? Per esempio se il vale è 2 scrivi "Pippo" ecc, ho gia scritto il codice ma non riesco a quale voce "Eventi" associarlo. La maschera è impostata su "Maschere continue". La ringrazio in anticipo per il supporto.

[@emanuelelana6834]

se il valore numerico viene inserito in una casella di testo, può usare l'evento dopo aggiornamento. in realtà... perché inserirlo? basterebbe forse aggiungere una tabella con due colonne, una con il codice, una con la descrizione e poi si crea una query che unisce questa tabella all'altra collegando i campi con il numero. quello che vuole ottenere mi sembra essere la tipica decodifica che si ottiene con tabelle di lookup. o sbaglio?

[@lucaairaghi4396]

@@emanuelelana6834 buongiorno, algli effetti pratici non devo inserire nulla nella colonna numerica, in quanto arriva da una query, devo solo caricare il dato e passarlo ad una colonna di testo andando a scrivere un testo sulla base del valore numerico. Es. se leggo 2 vado a scrivere "Attuale".

[@emanuelelana6834]

appunto. comunque, può farlo con dei semplici test (se non sono molti i valori da decodificare): if txt = 1 then txt_a = "torino" elseif txt = 2 then txt_a = "milano" end if

[@lucaairaghi4396]

@@emanuelelana6834 Ok questo lo avevo identificato ma in che evento inserirlo, dopo aggiornamento? mi sembra di averlo provato ma senza esito, riproverò.

[@lucaairaghi4396]

@@emanuelelana6834 Buongiorno, ho fatto il test con esito negativo, infatti ora che ci penso siccome vorrei che il campo testo venga riempito durante il caricamento della maschera credo chi sto lavorando sulla parte sbagliata, ma dovrei lavorare sul caricamento della maschera. Ovvero quando apro la maschera automaticamente per ogni riga mi legga il valore numerico e converta in testo nella casella affianco. Questo per ogni riga.

[@poohlover56]

Buongiorno Emanuele, avrei bisogno ancora del suo aiuto. Ho applicato i suoi suggerimenti ad un database che ho diviso: il back-end con le tabelle sul server ed il front-end con le maschere ecc. nella cartella Videocorso e tutto funziona perfettamente. Se però sposto il front-end sul desktop quando apro la maschera che contiene le immagini mi da Errore di run-time 2220 impossibile aprire il file c: ecc. Come posso fare per ovviare al problema? Grazie!

[@emanuelelana6834]

il problema dovrebbe essere che prende il path dell'applicazione che è sul front end (...Path) e poi concatena la cartella img e poi cerca l'immagine. ovviamente il front end ha un path differente dal back-end. forse potrebbe bastare modificare dove si parla di ..Path e sostituire il percorso del backend con qualcosa tipo \ omeserver\cartellacondivisa\ e quindi spostare anche l'immagini sul server

[@vikydogphotovideo3370]

Emanuele ciao, complimenti in primis per i tuoi video. Ho seguito alla lettera quanto tu hai fatto, ma nel momento in cui mi si apre "sfoglia" la cartella delle immagini non trova nulla (ci sono diversi file in formato jpg ma nulla non li vede (ho provato anche a modificarli e risalvarli). Hai idea del perché' di questo strano comportamento? Grazie

[@emanuelelana6834]

ciao Viky, grazie del feedback. che versione utilizzi di Access? dovresti forse farmi vedere il codice che hai usato, magari ti è sfuggito un errore?

[@riccardocosta9552]

Salve Dott. Lana, grazie per il suggerimento. Adesso il file "Gestione Operai" funziona però rimane il fatto che alla prima apertura del file la finestra di dialogo che mi apre è sempre quella di default. Io poi vado nella cartella "Img" e finchè il file rimane aperto la finestra di dialogo che mi apre è "Img" se chiudo il file e lo riapro mi apre sempre la finestra di default. Non capisco se il percorso si può inserire nelle opzioni di file corrente. Comunque un grosso passo avanti è stato fato. Funziona, grazie.

[@emanuelelana6834]

bene. prova ad aggiungere fd.InitialFileName="c:\prova\" sostituendo a c:\prova\ la cartella che vuoi sia aperta come default

[@riccardocosta9552]

Buongiorno Dott. Lana. 1) Con la proprietà "InitialFilename" il programma funziona. Ho rilevato anche un "bag", se così si può dire: dopo l'apertura della finestra di dialogo il programma vuole che sia selezionato un file, se invece si decide di chiudere la finestra di dialogo senza aver inserito un file il programma dà errore. Come si potrebbe eventualmente gestire questo errore? 2) Come le avevo detto qualche giorno fà questo tutorial mi ha suggerito l'uso anche per archiviare un percorso di file PDF. Che sarebbero delle schede dati degli operi alleggerendo cosi il programma. Ho cominciato a costruirlo uguale al tutorial e fino all'assegnazione del percorso del file PDF va bene, però un va bene l'uso della proprietà "Picture". Come si potrebbe far aprire il file PDF con un click sul controllo "txtPercosoFilePFD " o con un click su un pulsante di comando?.

[@emanuelelana6834]

hai ragione. nei commenti in passato un utente ha proposto una soluzione per evitare quel bug. prova a cercarla

[@riccardocosta9552]

Salve Dott. Lana l'ho trovata e funziona. Finalmente adesso si può dire che è ben fatto, mi piace. Ma non mi ha detto niente sul punto due.

[@emanuelelana6834]

si può aprire con un comando che ho spiegato a qualcun altro (forse in un altro posto) usando il comando shell. provi un po' a cercarlo...

[@grazianoaraldi-osteopata5254]

Ciao, e se ci fosse la necessità di cancellare una volta inserita (magari per errore) l'immagine del campo...Grazie

[@emanuelelana6834]

ciao, mah. non so potresti semplicemente cancellare il valore che corrisponde al percorso, così in pratica non esiste nulla nel campo... aggiungi un pulsante che in pratica fa: txtPercorsoImmagine ="" così quando salvi il record, si svuota il campo.

[@grazianoaraldi-osteopata5254]

Perfetto. Grazie mille. Non capendo nulla sono riuscito a fare un gestionale in access

[@emanuelelana6834]

se l'hai fatto grazie a miei video... complimenti!

[@RobertOne64]

E' da parecchio tempo che anch'io stavo cercando come allegare file al mio db casalingo di gestione familiare, ho fatto parecchie ricerche e mai trovato nulla, soprattutto spiegato in modo chiaro come la esponi. Generalmente i miei allegati saranno file pdf, credo comunque che non ci siano problemi se allegherò all'occorrenza dei file jpg o doc. Chapeau!

[@emanuelelana6834]

ciao Roberto, lieto di averti aiutato e grazie per il feedback. il percorso del file pdf non puoi usarlo naturalmente come proprietà Picture dell'immagine, ma potrai comunque usarlo per aprire il file.

[@RobertOne64]

Ciao Emanuele, ti ringrazio per la gentile risposta. Sto "lavorando" col tuo video e sono riuscito quasi completamente. L'unica cosa che non riesco ad accomodare non avendo foto come allegati ma file pdf, jpg etc. etc. è la ricostruzione del path in base a dove si trova il database e riportare come allegato il solo nome del file seguite dall'estensione tralasciando l'allocazione (C:\ o D:\ etc. etc.) Tu hai spostato CurrentProject.Path & "\Allegati\" & sulla riga inerente alle immagini (Me.imgFoto.Picture etc. etc.) io non avendo immagini non so come andare a parare... Mi puoi dare una dritta per favore?

[@emanuelelana6834]

se la necessità è recuperare il nome del file da un path completo puoi usare questo: Mid("c:\prova\file.jpg",InstrRev("c:\prova\file.jpg","\")+1)

[@RobertOne64]

Grazie Emanuele molto gentile. Abbi pazienza ma non comprendo come e dove dovrei inserire il comando che mi consigli. Attualmente ho impostato: Private Sub cmdSfoglia_Click() Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.Show ' Memorizza il nome del file nella casella percorso allegati Me.txtAllTo = CurrentProject.Path & "\Allegati\" & fncNomeFile(fd.SelectedItems(1)) Diciamo che non sempre mi apre la cartella allegati, il path è il seguente E:\GENERAL BACKUP\GESTIONE FAMIGLIA, in gestione famiglia oltre al database c'è la cartella Allegati. E soprattutto non ottengo il solo nome del file come allegato per esempio Scontrino1.pdf ma tutto il path completo. La necessità è quella di vedere solo Scontrino1.pdf e non E:\GENERAL BACKUP\GESTIONE FAMIGLIA\Allegati\Scontrino1.pdf . End Sub

[@emanuelelana6834]

forse allora basta così, se ho capito bene l'esigenza: Me.txtAllTo = fncNomeFile(fd.SelectedItems(1))

[@riccardocosta9552]

Salve Dott. Lana. Io provo a insistere per vedere se riesco a capire perché non mi funziona lei quando si si stufa me lo dica pure senza problemi. Creo la cartella "CartellaStudio" sul desktop e dentro ci metto la cartella "img" delle foto e sempre nella cartella creo il file database "AnagraficaOperai". In "AnaagraficaOperai" creo una tabella "tblOperai" con i campi: txtIDOperaio, txtNomeOperaio; txtPercorsoImmagine. aggiungo un controllo immagine "imgFoto" (noto però che nel tutorial alla creazione del controllo apre la finestra di dialogo già alla cartella "img, invece a me apre la finestra Raccolta>Documenti cioè quella di default) e un commando "cmbSfoglia..." Passo a scrivere il codice nell'evento click di cmbSfoglia: - Dim fd as FileDialog (rilevo che nel menù a tendina che si apre non c'è FileDialog come nel tutorial) comunque lo scrivo; - Set fd = Application.FileDialog(msoFileDialogFolderPicker) (anche qui quando selezione mso... si apre una finestra che dice che non esiste se voglio aggiungererla di co di si e la inserisce. A questo punto noto che anche nella riga Dim as nel menù a tendina adesso compare " FileDialog). - fd.Show - Me.txtpercorsoImmagine = fd.selectedItems(1). Salvo e clicco sul pulsante Sfoglia e mi apre la finestra di dialogo raccolta>Documenti. se annullo la finestra mi appare un messaggio di errore "chiamata di routine o argomento non validi". nella scheramta di debug la riga "me.txtPercorsoImmagine....." evidenziata e andando co il mouse sopra dice me.txtPercorsoImmagine = Nullo. Lei riesce a farsi un idea del perchè? potrebbe essere che nel mio access non è caricata qualche libreria?

[@emanuelelana6834]

prova ad aggiungere in Strumenti-Riferimenti il riferimento a Microsoft Office xx.0 Object Library

[@maurizioregis3346]

Buongiorno. E complimenti per i suoi tutorial. Ho seguito alla lettera il suo video e tutto funziona perfettamente. Ma come potrei fare per poter inserire o precaricare una immagine di default con magari scritto "Nessuna immagine" nel campo in cui non verrà caricata alcuna immagine? Come posso modificare il codice? Grazie

[@emanuelelana6834]

grazie Maurizio. forse si potrebbe semplicemente visualizzare una etichetta contenente il messaggio : nessuna immagine e gestirlo sull'evento Corrente. se non c'è l'immagine, si visualizza l'etichetta, altrimenti la si nasconde.

[@maurizioregis3346]

@@emanuelelana6834 ok.. io però pecco in scrittura codice vba.. come potrei fare?!

[@sabrinaeinaudi7394]

Ciao Emanuele, proseguendo con il mio database, alla maschera principale (Maschera A, "Scheda prodotto") contenente l'immagine inserita seguendo questa procedura, ho aggiunto una seconda maschera (Maschera B, che aggiunge dettagli ad alcuni articoli presenti in A e si apre- cliccando su un pulsante- filtrando i record, ovvero si apre proprio in corrispondenza del record di A, ad esempio su A inserisco dati relativi al prodotto 10 e clicando sul pulsante si apre B in corrispondenza del prodotto 10, per aggiungere altri dettagli). Ho inserito anche in B un'immagine seguendo lo stesso procedimento, ma ho notato che l'immagine una volta caricata, poi non viene memorizzata in B, quindi se la riapro dopo averla chiusa l'immagine non c'è più. Può dipendere dal fatto che B si apre dopo un filtro? in tal caso per mantenere l'immagine anche in B devo modificare il codice? Grazie. Ciao

[@emanuelelana6834]

ciao Sabrina, dunque... ma capisco bene che sia A sia B sono basate sulla stessa tabella? solo che in A ci sono alcuni campi e in B altri campi ma della stessa tabella? se stai facendo così, ti suggerirei di usare un controllo Tab (mi pare in italiano si chiami Scheda), che ti aiuta a raggruppare le informazioni (pensa alla maschera Strumenti Opzioni nelle precedenti versioni di Word o Excel o Access, con tutte le varie linguette). per il problema specifico immagino tu abbia comunque il codice anche su apertura della maschera B che imposta l'origine del controllo immagine, vero? se puoi risolvere usando il controllo Scheda, sarebbe tutto più semplice (forse.. :-))

[@sabrinaeinaudi7394]

No, le due maschere sono basate su due tabelle diverse (per non appensatire troppo la prima), ma con un campo (IDProdotto) in comune, che mi permette di collegarle. In entrambe le maschere ho applicato la tua procedura, cambiando solo i nomi delle due caselle di testo txtPercorsoImmagine e del pulsante Sfolgia. Grazie

[@emanuelelana6834]

mmm devo dire che non mi vengono particolari idee. ti direi di controllare bene il codice che utilizzi. prova a usare solo la maschera B da sola e vedi se si salva. se non si salva, il problema non è legato alla coesistenza delle due maschere.

[@sabrinaeinaudi7394]

Ahi che scivoloni prendo ogni tanto :), anzichè creare il campo PercorsoImmagine nella tabella su cui poggia la maschera B, avevo creato, nella maschera, una casella di testo, rinominata sì ma non associata a nessun campo della tabella! Ora funziona tutto, anche con la maschere collegate e filtrate. Come sempre, grazie!

[@emanuelelana6834]

ah, ecco. immaginavo qualcosa di simile. molto brava a trovare l'errore. alla fine il tuo database sarà un ottimo strumento di lavoro :-)

[@sabrinaeinaudi7394]

Ciao Emanuele, ho ripreso questo tuo video che mi era stato di grande aiuto tempo fa, perchè vorrei sapere se è possibile applicare la stessa tecnica per gli allegati pdf (oltre che per le immagini), sempre per il motivo di non appesantire tanto il db. Si può? Grazie. Ciao

[@emanuelelana6834]

ciao Sabrina. certo. anzi, la logica è proprio quella: memorizzare sempre solo il percorso in cui si trovano i file (come hai capito, sono nemico del nuovo campo con tipo di dati Allegati...). se la struttura dei dati non è complessa, suggerirei di memorizzare il nome del file e poi avere da qualche parte memorizzato il percorso (senza il nome), così se domani cambi l'hard disk o sposti il database dal disco locale a quello di rete, o lo metti online sul server dove hai il sito, basta cambiare il percorso e tutto continua a funzionare. da qualche parte può significare in una tabella, tipo : tblSetup che avrà due campi : caratteristica, valore. poi crei un record in cui in caratteristica memorizzi: "percorso allegati", in valore metti il percorso: "c:\allegati" e poi nell'evento su clic concateni il percorso (lo puoi ritrovare con una DLookup(""valore";"tblSetup";"caratteristica=""percorso allegati""") al nome del file che hai davvero memorizzato in tabella. dai, non è complicato :-)

[@sabrinaeinaudi7394]

Aiuto! Dunque, ho creato la tabella come hai detto tu, poi nella maschera ho inserito un casella di testo non associata, qui nell'evento su clic ho scritto: =DLookUp(""Valore";"tbSetup";"Caratteristica=""percorso allegati""") ma mi viene Errore di sintassi. Dove sbaglio? Se ho capito giusto, cliccando su questo campo si apre la cartella in cui ci sono i pdf (che ho chiamato Allegati e messo in C) ed io scelgo quello corrispondente. Giusto? Grazie

[@emanuelelana6834]

dunque direi che ci sono due doppie virgolette prima di Valore. devono essere singole =DLookUp("Valore"; ecc. in questo modo questa casella visualizza il percorso in cui hai salvato gli allegati. per scegliere quello che vuoi, dipende da come memorizzi il nome dell'allegato... dovresti aprire una finestra di selezione file tipo questa. non è semplicissimo, ma puoi provarci :-) per es. inizia a guardare qui: msdn.microsoft.com/en-us/library/office/aa219843(v=office.11).aspx

[@jenniferv.8462]

Ciao.il video è fantastico. Ma come posso creare una maschera iniziale con dei pulsanti per accedere alla scheda dati di un operaio o per inserirne uno nuovo? Tipo "ricerca operaio" e "aggiungi nuovo operaio"

[@emanuelelana6834]

ciao Jennifer, lieto di averti aiutata :-) diciamo che per fare quello che vuoi ci sono un sacco di metodi. per aprire la scheda di un certo operaio, se sai quale sia l'ID dell'operaio, potresti usare un codice così: DoCmd.OpenForm "nomemascheraoperaio",,, "IDOperaio=" & cboIDOperaio dove cboIDOperaio è una casella combinata con due colonne, la prima IDOperaio, la seconda con Cognome e Nome operaio e poi nascondi la prima colonna impostando a 0 la larghezza. Selezioni dall'elenco l'operaio e poi premi il pulsante su cui hai inserito come evento Su clic l'istruzione di prima. in pratica quell'istruzione apre la maschera e la filtra automaticamente in base al criterio che hai impostato: "IDOperaio=" & cboIDOperaio [attenta alle virgole! sono 3] Per aprire la maschera in inserimento potresti fare così: DoCmd.OpenForm "nomemascheraoperaio",,,,acFormAdd Spero le mie istruzioni non siano troppo stringate :-) ciao Emanuele

[@DavideMa86]

Ciao, il campo percorso immagine posso impostarlo come Collegamento ipertestuale e non come testo?

[@emanuelelana6834]

suggerirei di lasciarlo testo e creare un evento su clic della casella di testo (o etichetta che lo contenga) e gestire da lì il link ipertestuale

[@DavideMa86]

Emanuele Lana come posso fare ciò che mi hai proposto? Grazie

[@emanuelelana6834]

ti propongo ciò che è stato suggerito qui: www.mrexcel.com/forum/excel-questions/349874-open-pdf-file-excel-vba.html al codice suggerito aggiungo le mie istruzioni in VBA Inserisci un modulo (Inserisci-Modulo) poi incolla questo: Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _ ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long sotto incolla questo codice Sub EVN(FileName As String) ShellExecute 0, "Open", FileName, "", "", vbNormalNoFocus End Sub poi crea un pulsante sulla tua maschera. al clic del pulsante (o di quello che vuoi) scrivi: EVN txtNomeControllo (che contiene il percorso completo all'immagine) es, EVN txtImmagine nota che dovresti controllare che il file esista prima di aprirlo. puoi farlo usando la funzione Dir

[@DavideMa86]

Emanuele Lana grazie, quando ho un po' di tempo provo subito. Grazie ancora

[@emanuelelana6834]

prego! ciao

[@maxs84]

Ho risolto l'errore che appariva cliccando su annulla! Sull'evento click del comando "sfoglia" bisogna aggiungere un controllo: Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) If fd.Show = True Then Me.Foto = fncNomeFile(fd.SelectedItems(1)) Me.imgFoto.Picture = CurrentProject.Path & "\FotoDocenti\" & Me.Foto Else MsgBox "Non hai selezionato nessuna immagine." End If

[@emanuelelana6834]

+Massimiliano Savalli bravo!

[@maxs84]

+Emanuele Lana Graziee ^_^

[@sebastianopcarciotto]

CIAO Emanuele c'è l'hai un file pronto per fare un archivio con foto della Scuola di danza dove io sono un socio responsabile del tesseramento? Grazie! per la tua disponibilità...

[@emanuelelana6834]

ciao Sebastiano, purtroppo non ce l'ho... ma se segui il video, hai indicazioni utili per riuscire

[@buccellato66]

Non mi vede le immagini,solo le cartelle

[@emanuelelana6834]

sono nel formato indicato nel video?

[@marcellocastorino4961]

Ciao, volevo farti i miei complimenti. Hai davvero un'ottima capacità comunicativa e apprezzo molto il tuo lavoro. Provando a replicare questo Db con il mio access 2013 non riesco ad andare avanti, in quanto cliccando su sfoglia non visualizzo i file jpeg che ho inserito seguendo il tuo identico percorso. Devo cambiare la natura del campo PercorsoImmagine sulla tabella o può esserci altro? Ho ricontrollato i codici vba e sono come i tuoi. Grazie mille. Marcello.

[@emanuelelana6834]

+Marcello Castorino Grazie! la formazione è sempre stata una mia passione. riguardo al tuo problema,ho riaperto il db adesso con access 2013 .tieni conto che nell'esempio del mio video -per semplicità- occorre che i file si trovino nel percorso corretto, ossia una sottocartella di nome img collocata nella cartella che contiene il tuo database. all'interno di img devono esserci le immagini da aprire. ossia: il mio esempio NON copia le immagini da, che so, la chiavetta e le salva in img. non fa questo. infatti l'ultima riga di codice, dove carichi l'immagini nel controllo Immagine, il percorso specificato è fisso: ' visualizzo l'immagine Me.imgFoto.Picture = CurrentProject.Path & "\img\" & Me.txtPercorsoImmagine ok?

[@marcellocastorino4961]

+Emanuele Lana. grazie della pronta risposta. Ho fatto tutto quello che mi hai indicato di fare. Il problema è il seguente: il comando sfoglia funziona ma vede solamente cartelle ma niente di ciò che vi è all'interno ad es. immagini o file di qualunque estensione...

[@marcellocastorino4961]

+Emanuele Lana. OK risolto. Facevo un errore nella stringa: Set fd = Application.FileDialog(msoFileDialogFilePicker) in cui per errore trascrivevo "folder"!!! come di seguito: Set fd = Application.FileDialog(msoFileDialogFolderPicker). Grazie in ogni caso, non vedo l'ora di rimettermi al lavoro!!! Ancora complimenti.

[@emanuelelana6834]

+Marcello Castorino ottimo! leggendo il penultimo messaggio ho immaginato che l'errore fosse lì'. buon lavoro. Emanuele

[@mariosantini5675]

rieccomi .... Private Sub cmdSfoglia_Click() Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.Show Me.nomefile = fd.SelectedItems(1) a questo punto seleziono nel mio caso un PDF .. ma se all'apertura della finestra di windows esplora file annullo ho un errore di run-time 5 .. puoi dirmi come gestirlo ? Grazie

[@emanuelelana6834]

testerei con una If se fd.SelectedItems(1) è "" o nullo e nel caso non cerco di aprirlo

[@sergiofac5792]

Emanuele buongiorno, premetto che sono un neofita e mi accingo or ora ad access ho seguito con interesse i suoi video tutorial molto molto ben fatti ed ho messo in pratica il suo lavoro su un database di fotografie di funghi. come lei dice non tratta gli errori ma quando vado ha selezionare le fotografie e se faccio annulla mi genera un errore come posso risolvere per tornare alla maschera? un grazie anticipato Sergio

[@emanuelelana6834]

se ricordo bene. in uno dei commenti uno degli utenti ha proposto una soluzione che risolve problema... prova a guardare!

[@sergiofac5792]

Emanuele Grazie, anch'io avevo visto i commenti ma dopo arti inviato la richiesta. Ho risolto così " IF fd.show = False Then Exit Sub end if ", e funziona. un grazie ancora e auguro buone feste a te ed a tutto il blog

[@emanuelelana6834]

ottimo! grazie Sergio. auguri a anche a te

[@libertafinanziaria6234]

ciao ho provato ad usare la funzione FileDialog sul pulsante sfoglia ma quando clicco sul pulsante si apre si la finestra di ricerca ma nella cartella dove ho i jpg non mi fa vedere niente nessun file devo attivare qualcosa in windows o in access grazie mille

[@emanuelelana6834]

non direi che tu debba attivare nulla. ovviamente sei sicuro di vedere esattamente quella cartelle e che i file siano jpg? prova a digitare nella finestra che si apre *.* e poi premi invio. vedi se così visualizzi i file

[@tonykalaitzakis496]

Ciao Emanuele, a me non funziona il commando ''Application.FileDialog(msoFileDialogFilePicker)''.. mi dice ''complile error, expected: list separator or ) '' Mi puoi dare una mano?

[@emanuelelana6834]

ciao, dovrei vedere il codice altrimenti non so dirti...

[@tonykalaitzakis496]

L' ho fatto.. Funziona.. Comunque grazie :)

[@emanuelelana6834]

bravo!

[@renatotedesco1754]

Sei bravissimo, complimenti. Premesso che sto alle prime armi, con il comando che suggerisci nel video, mia apre la finestra di dialogo però vuota........ La cartella contiene foto jpg. Spero in una tua risposta. Grazie.

[@emanuelelana6834]

ciao Renato, grazie per il feedback. sei sicuro di aver scelto msoFileDialogFilePicker e non per sbaglio msoFileDialogFolderPicker? che ti fa scegliere un folder e quindi non vedresti nessun file come capita a te?

[@renatotedesco1754]

@@emanuelelana6834 Buonasera Emanuele, ti ringrazio per la tempestività, cmq ho risolto con l'opzione "FileDialog(msoFileDialogOpen)". Ti rinnovo i complimenti. Ti seguirò volentieri perchè sei molto chiaro e veloce. Ciao.

[@poohlover56]

Complimenti per la chiarezza e per aver messo a disposizione le sue competenze. Grazie! Ho creato il Database seguendo il video e funziona benissimo, l'unico problema è che dopo aver chiuso e riaperto il DBase il comando Sfoglia mi apre la cartella Documenti. Io poi seleziono la cartella img e tutto va bene fino a quando chiudo e riapro di nuovo. Grazie!

[@emanuelelana6834]

grazie per il feedback. apre documenti perché è la cartella predefinita in ambiente Office. comunque è sufficiente aggiungere questa istruzione: fd.InitialFileName = "c:\" al posto di c:\ inserisca il percorso che vuole avere

[@poohlover56]

@@emanuelelana6834 Le chiedo un po di pazienza visto che sono alle prime armi con la programmazione... non ho capito dove devo inserire l'istruzione fd Initial... Il percorso è: una cartella sul desktop che si chiama Videocorso e contiene il DBase e la cartella img. Grazie e buona serata.

[@emanuelelana6834]

l'istruzione va inserita subito prima di fd.Show su una riga a sé: fd.InitialFileName = "c:\" fd.Show

[@poohlover56]

@@emanuelelana6834 Grazie mille!! Adesso funziona perfettamente... Gentilissimo!!

[@Ivanostefanelli.]

Tramite un pulsante a fianco dell'immagine principale, vorrei poter aprire una cartella col percorso dove sono contenute le immagini che appartengono a quel record. Per esempio, al dipendente Gerardo ho associato un'immagine che visualizzo sulla maschera, poi tramite il pulsante apro la cartella dove ho inserito 10 immagini riferite a Gerardo, che posso visualizzare tramite ad es. il visualizzatore di windows... Si può fare?

[@emanuelelana6834]

a questo punto direi che convenga memorizzare il percorso specifico delle immagini, invece che memorizzare un'immagine e poi cercare il percorso ce la contiene per vedere le altre. è possibile tramite pulsante aprire una finestra di esplora risorse su uno specifico path. una volta che hai la finestra con le immagini le apri con il visualizzatore che preferisci

[@Ivanostefanelli.]

Il path quindi, lo inserisco io a mano? Ho capito bene? O devo studiare un modo come ottenerlo tramite la maschera?

[@emanuelelana6834]

direi che lo inserisci a mano, oppure usando una finestra di dialogo che consente di selezionare un percorso (vedi per es. msdn.microsoft.com/en-us/library/vs/alm/aa219843(v=office.11).aspx) . e poi una volta memorizzato in un campo, lo richiami via codice aprendo una finestra di explorer tramite una shell (vedi stackoverflow.com/questions/11205719/how-to-open-a-folder-in-windows-explorer-from-vba)

[@antonioparisi5784]

Salve, complimenti per la guida davvero chiara e funzionale. Ho un piccolo problema: ho inserito 3 campi immagine e 3 campi percorso immagine con relative istruzioni ma se dal record 1 passo al record 2 il sistema funziona perfettamente, viceversa tornando al record 1 mi visualizza l'ultima immagine che ho precedentemente caricato nel record 1 indipendentemente se si tratta della numero 1, 2 o 3. Ugualmente per il record 2 ecc ecc Dove sta l'inghippo? Sottolineo che sono davvero a digiuno di Access, quindi spero di essermi spiegato. Io suppongo nel comando (fd.SelectedItems(1)) Grazie

[@emanuelelana6834]

ciao Antonio, direi che dipenda da ciò che hai scritto nell'evento su Corrente. se hai 3 immagini visibili sulla maschera, devi impostarle tutte e tre. se ne hai una sola, devi decidere tu quale visualizzare...

[@antonioparisi5784]

Faccio copia e incolla: Private Sub Form_Current() Me.imgFoto.Picture = "" If Me.txtPercorsoImmagine "" Then Me.imgFoto.Picture = CurrentProject.Path & "\fotomodificatestock\" & Me.txtPercorsoImmagine End If Me.imgFoto2.Picture = "" If Me.txtPercorsoImmagine2 "" Then Me.imgFoto2.Picture = CurrentProject.Path & "\fotomodificatestock\" & Me.txtPercorsoImmagine2 End If Me.imgFoto3.Picture = "" If Me.txtPercorsoImmagine3 "" Then Me.imgFoto3.Picture = CurrentProject.Path & "\fotomodificatestock\" & Me.txtPercorsoImmagine3 End If End Sub

[@emanuelelana6834]

così a occhio direi che dovrebbe funzionare, no?

[@lastplayer9598]

i suggerimenti quando scrivi io non ce l'ho hai messo una virgola prima di scrivere voglio memorizzare etcc?

[@emanuelelana6834]

i commenti hanno l'apostrofo a inizio riga

[@maurizioregis3346]

Buongiorno e complimenti! Il suo codice qui descritto nel video sembra funzionare nel Il mio db sembra. L’unico problema è che quando chiudo e poi riavvio il mio db, il percorso rimane memorizzato ma l’immagine non viene più visualizzata. Mi dà infatti errore d rum time 2220 e impossibile aprire il file x.jpg.. mi può aiutare??

[@emanuelelana6834]

grazie per il feedback! penso che dovrei vedere il codice per aiutarti...

[@maurizioregis3346]

Ho risolto. Grazie mille comunque dell’attenzione. Adattando il mio codice al suo era presente un carattere speciale che non mi faceva girare il tt! Grazie

[@emanuelelana6834]

ottimo!

[@mimmogentile6223]

ciao ottimo canale grazie a voi riuscite a far lavorare anche i meno esperti come me volevo chiedervi una cosa aggiungendo un pulsante in una maschera si può dare un collegamento ad un'altro foglio che non sia acces ma excell grazie

[@emanuelelana6834]

prego! un po' di condivisione di competenze va sempre bene. dunque, direi di sì. nel senso che da Access si può aprire senza problemi un file Excel. dovresti dirmi più nel dettaglio cosa vuoi fare e magari ne nasce anche un video :-)

[@mimmogentile6223]

ciao si certo ho costruito un database con alcune scritte lincabili ad esempio turno,servizio,cartella documenti che funzionano anche la mail funziona bene ma se si possono inserire dei pulsanti al posto della sola scritta con collegamento ipertestuale la cosa diventa più carina il linc turno mi apre un file excell che ci sono tutte le ore sia di entrata che di uscita spero di essermi spiegato bene grazie in anticipo

[@emanuelelana6834]

forse la cosa più semplice è creare una etichetta, poi la metti in rilievo, ci scrivi dentro quello che vuoi, le dai un colore di sfondo e poi sull'evento Su clic (che esiste anche per l'etichetta) inserisci il codice che ti apre la maschera, o apre excel, insomma quello che ti serve.

[@robertmcgregor795]

Emanuele grazie per la tua celerissima risposta; hai centrato il problema da bravo neofica affidandomi alla compilazione guidata ho fatto la scelta errata. Grazie ancora.

[@emanuelelana6834]

ottimo!

[@tujunga56]

Grazie per i tutorial ma uyilizzando Access 2013 mi da "errore di compilazione / impossibile trovare il progetto o la libreria" è possibile che si debba usare un'altro comando ? o una libreria aggiuntiva.

[@emanuelelana6834]

+Gianni Berna dovresti darmi qualche altra informazione. il messaggio quando compare? prova a vedere nella finestra visual basic Strumenti - Riferimenti e guarda se per uno di essi (tra i primi) compare MANCA

[@maxs84]

Ciao Emanuela... intanto grazie 1000, questa guida (come le altre) è utilissima e fatta molto bene. Mi piaci perchè sai essere chiaro ma sintetico! Io a questa tua soluzione, ho anche aggiunto un pulsante "svuota" che in caso l'utente ne abbia bisogno elimina la foto caricata. Purtroppo devo segnalarti un bug; ovvero, se si preme il pulsante "sfoglia" ma poi non si seleziona nessuna foto, ma semplicemente "annulla" dalla finistra di dialogo di explorer, la routine vba va in errore: "errore runtime 5. Chiamata di routine o argomenti non validi" Da ignorante, credo, ci voglia un controllo sul percorso del file (una id?) che in caso la stringa contenente appunto il percorso del file sia nulla, eviti l'errore. Grazie.

[@lorenzo.oo__]

si chiama Emanuele non Emanuela

[@andreagatti1168]

complimenti. volevo chiederti cosa ne pensi di filemaker rispetto ad access .

[@emanuelelana6834]

grazie per il feedback. purtroppo non ho mai utilizzato FileMaker, quindi non so esprimere un'opinione in proposito

[@Daniele1410]

Sono riuscito a risolvere il problema. L'ho semplicemente scritto come ultimo codice nel modulo. Grazie

[@emanuelelana6834]

Le tue immagini sono JPG? se usi questo formato e metti un file nella cartella, la vedi?

[@Daniele1410]

@@emanuelelana6834 Ciao, complimentissimi per i tuoi tutorial. Ho messo l'immagine con estensione JPG ma nulla, non si vede. La mia cartella dipende da una Query, non so se fa differenza. Ho comunque fatto un nuovo database seguendo passo passo le tue direttive; Maschera dipendente da tabella con Nome, Cognome e percorso immagine, stesso risultato, immagini invisibili.

[@emanuelelana6834]

grazie Daniele! sei sicuro che il completamento automatico del codice non ti abbia fatto scrivere ...FolderPicker invece di ...FilePicker ?

[@Daniele1410]

@@emanuelelana6834 controllato. E' tutto corretto. Quando metto il riquadro per l'immagine mi apre la cartella e le immagini si vedono. Compilato tutto il codice non si vedono più. La mia maschera ha già una Routine evento con dei codici. Quando clicco su "Corrente" si apre in questo punto: Private Sub Form_Current() IDArticolo = Me.ID.Value Call somma_articolo(IDArticolo) If Form_articoli.ScortaMinima = 0 And Form_articoli.Testo18 = 0 Then Exit Sub End If If Form_articoli.ScortaMinima >= Form_articoli.Testo18 Then Form_articoli.Testo35 = "Scorte in esaurimento" Exit Sub End If Form_articoli.Testo35 = "" End Sub Ora, onestamente, non so dove scrivere il tuo codice o se devo creare un nuovo modulo.

[@angelocamaioni1679]

Mi associo ai tanti che si congratulano con Te, e copio spudoratamente le Tue realizzazioni, e poi arrivano sempre i problemi che non riesco a risolvere. Nel caso specifico ho realizzato il codice in una maschera singola ed è tutto perfetto, me se trasferisco il tutto in una maschera continua non c'è più l'associazione tra immagine e record, viene visualizzata sempre l'immagine del record selezionato anche negli altri record. Spero di essere stato chiaro. Grazie

[@emanuelelana6834]

ciao Angelo, direi che sia chiaro, e in effetti la soluzione da me proposta prevede l'uso di maschere singole. diciamo che è un po' la logica che uso sempre: consentire la ricerca e poi individuati i record, cliccando sul singolo record vedi la scheda completa. l'idea di scorrere tutti i record è forse comodo per l'utente ma mi permetterei di non suggerirlo, perché se i dati fossero in rete, un approccio di questo tipo potrebbe risultare pesante in termine di uso della rete. inoltre non ti permetterebbe di tenere sotto controllo ciò che fa l'utente sulla maschera. se la maschera è singola, diventa più facile... ciao! Emanuele

[@angelocamaioni1679]

Grazie per il suggerimento e per la scortesia nell'aver risposto.

[@emanuelelana6834]

OK. spero intendessi "cortesia" ;-)

[@angelocamaioni1679]

Assolutamente, cortesia, ho risposto dal cellulare e ho sbagliato.Perdonami, non mi permetterei mai, e ne approfitto per augurati buone feste.

[@emanuelelana6834]

sì, certo, dicevo un po' per scherzo, sei stato davvero gentilissimo! buone feste anche a te

[@lastplayer9598]

l'ho fatto uguale a te evidentemente e spesso accade nei tutorial che date alcune cose per scontate, mi da sempre lo stesso errore "errore di compilazione tipo definito dall'utente non definito", NON FUNZIONA!!!

[@emanuelelana6834]

forse non hai fatto tutto quello che ho fatto io oppure hai un sistema differente dal mio. mi spiace

[@tommasocrafa7718]

Ho rivisto più volte il filmato, quasi da impararlo a memoria, ho eseguito tutta la creazione del db passo passo, ma sempre mi ritrovo con il seguente errore di "Run-time 5": chiamata di routine o argomento non valido. Nell'istruzione cmdSfoglia con click mi segnala il seguente errore: Private Sub cmdSfoglia_Click()Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.Show'voglio memorizzare il nome del file nella casella percorso immagineMe.txtPercorsoImmagine = fncNomeFile(fd.SelectedItems(1))'visualizzo l'immagine Me.imgFoto.Picture = CurrentProject.Path & "\img\" & Me.txtPercorsoImmagineEnd Sub. Per essere più preciso l'errore segnalato è questo: Me.txtPercorsoImmagine = fncNomeFile(fd.SelectedItems(1)) Quando si presenta l'errore: se clicco sul tasto sfoglia per scegliere l'immagine ma poi ci ripenso e torno indietro con annulla ecco che mi da l'errore di run-time 5. Può dirmi dove sbaglio??? grazie x la disponibilità

[@emanuelelana6834]

+Tommaso Crafa immagino che se scegli un'immagine, tu non abbia alcun problema. il tuo "errore" dipende semplicemente dal fatto non è gestito il caso in cui l'utente decida di annullare e non scelga alcuna immagine. puoi provare con questo codice su cmdSfoglia_Click: ' voglio memorizzare il nome del file nella casella percorso immagine If fd.SelectedItems.Count > 0 Then Me.txtPercorsoImmagine = fncNomeFile(fd.SelectedItems(1)) ' visualizzo l'immagine Me.imgFoto.Picture = CurrentProject.Path & "\img\" & Me.txtPercorsoImmagine End If penso che cosi' possa andare

[@tommasocrafa7718]

+Emanuele Lana... Ok risolto... Adesso posso continuare con i successivi video... grazie x la disponibilità

[@emanuelelana6834]

+Tommaso Crafa bene!

[@domenicorenna8508]

ciao io continuo ad avere l'errore di run time 5 ... ho copiato e incollato il tuo codice per il pulsante sfoglia ... ma nada

[@emanuelelana6834]

ciao, se leggi il commento di Massimiliano Savalli, ti dovrebbe fornire la soluzione

[@robertopasino662]

Ciao Emanuele, quando vedo i tuoi video penso che Access sia semplicissimo ma poi mi scontro con la nuda realtà e .... mi trovo in difficoltà davanti a cose che immagino per te semplici ma per me diventano insormontabili .... In sintesi ho 2 necessità da apportare al mio database che non riesco a fare: 1. INSERIRE NELLA MASCHERA UN MAGAZZINO DI DOCUMENTI PDF 2. VEDERE SOLO LA MASCHERA DELLE PERSONE ATTIVE 1. Io mi sono creato un database che gestisce un portafoglio Clienti dove trasferisco dei dati che mi servono poi per fare re call. spesso questi dati li trasferisco da un foglio che utilizzo quando interrogo i Clienti ed essendo io cinesteta (memorizzo molto le immagini) mi sarebbe piaciuto avere un archivio per quella tal persona dove posso scansionare il file in PDF e guardarmelo tutte le volte che mi serve. In pratica basterebbe un link che mi apra il file. 2. attualmente ho circa 200 schede di Clienti ma molti sono diventati inattivi, non vorrei cancellarli ma semplicemente archiviarli rendendo visibili solo gli attivi. Unica cosa che sono riuscito a fare è una "flag" per indicare "attivi o inattivi" ma potrai convenire con me che è una vera rottura di scatoli girare tutte le schede per trovare quella attiva e poi fare re call. Forse potrei ovviare con un tasto sulla maschera del menù iniziale ? Grazie per l'attenzione e buona giornata

[@emanuelelana6834]

ciao Roberto, per il punto 2 direi che potresti creare una query che filtra in base al flag attivo. e poi la maschera usa questa query come origine record. che ne dici?riguardo al punto 1, se i nomi dei pdf sono "ben fatti" cioè hanno qualcosa che li rende identificabili per il tal soggetto potresti semplicemente creare un pulsante che apre il pdf il cui nome di file dovrebbe essere ricostruibile dal nome cognome del soggetto.tipo mario rossi, nome file mario_rossi.pdf (ammesso che tu non abbia omonimi ovviamente, ma questo è un altro discorso)per eseguire il codice vedi qui: access.mvps.org/access/api/api0018.htmun po' elaborato ma funziona molto bene

[@robertopasino662]

Emanuele Lana grazie Emanuele domani non riesco ma venerdì ci provo sicuro. Grazie mille

[@lastplayer9598]

non funziona nulla fatto alla lettera niente, non va..

[@DanieleCordelli]

Scusami se ti chiedo un'altra informazione. Il tuo tutorial è perfetto e ho applicato i tuoi consigli per visualizzare e inserire l'immagine in un database per catalogare i cd musicali. il codice che ho inserito: Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.Show [PercorsoImmagini] = fncNomeFile(fd.SelectedItems(1)) Me.imgfoto.Picture = CurrentProject.Path & "\Immagini\" & [PercorsoImmagini] Tutto è perfetto ma come posso non fare comparire la fastidiosa finestra grigia che appare in caso che seleziono ANNULLA e cioè non inserisco una immagine? Praticamente non riesco ad uscire in caso di errore. Ho provato con: IF fd.show = False Then Exit Sub, e funziona ma me lo chiede due volte di seguito. Abbi pazienza. Mi chiamano "Perfettino" Grazie Ciao

[@emanuelelana6834]

+Daniele Cordelli prima di percorsoimmagini=... devi mettere una If che controlla: If Len(fd.SelectedItems(1))=0 Then Exit Sub End If credo che dovrebbe bastare cosi'

[@DanieleCordelli]

Purtroppo appare sempre la finestra, grazie comunque per l'immediata risposta e della tua disponibilità. Ciao

[@maxs84]

+Daniele Cordelli ho risolto... guarda il mio ultimo commento ;)

[@lastplayer9598]

non mi funziona

[@Daniele1410]

Facendo riferimaneto alla comparsa dell'immagine sull'articolo successivo e avendo già un modulo "Private Sub form_Current()" dove è scritto: --------------------------------------------------- Private Sub form_Current() IDArticolo = Me.ID.Value Call somma_articolo(IDArticolo) If Form_articoli.ScortaMinima = 0 And Form_articoli.Testo18 = 0 Then Exit Sub End If If Form_articoli.ScortaMinima >= Form_articoli.Testo18 Then Form_articoli.Testo35 = "Scorte in esaurimento" Exit Sub End If Form_articoli.Testo35 = "" End Sub ---------------------------------------------------- il comando (La mia cartella si chiama "Immagini") Me.imgFoto.Picture = "" if Me.txtPercorsoImimmagine = "" Then Me.imgFoto.Picture = CurrentProject.Path & "\Immagini\" & Me.txtPercorsoimmagine End If dove lo devo posizionare. Non riesco a farlo funzionare.

[@emanuelelana6834]

direi che tu possa inserirlo dopo la prima linea di codice che hai nell'evento Current

[@Daniele1410]

@@emanuelelana6834 Grazie. Ti farò sapere e complimenti per i tuoi tutorial

[@emanuelelana6834]

ok, grazie per il feedback!