Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Ho provato vari metodi per caricare e salvare immagini in una database access...sono partito da questa teoria:
Se per aprire un file di testo in una textbox uso il commondialog in questo modo
----------Code---------
Dim strTesto as String
CommonDialog1.ShowOpen
Open CommoDialog1.FileName For Input As #1
strTesto = Input(LOF(1), 1)
Close 1
txtTesto.Text = strTesto
-----------Code---------
Utilizzando questo code apro file di testo e li visualizzo in una text box OK!
Se invece:
----------Code---------
Dim varImmagine as Image
CommonDialog1.ShowOpen
Open CommoDialog1.FileName For Input As #1
varImmagine = Input(LOF(1), 1)
Close 1
imgImmagine.Picture = LoadPicture(varImmagine)
-----------Code---------
Precisando che: INPUT(LOF(1),1) non va sicuramente bene per le immagini ma non so che utilizzare...
Questo code può essere utilizzato se opportunamente corretto?