domenica 22 dicembre 2019

FT: Buon Natale e felice anno nuovo per un 2020 di grandi successi



Torna il Fuori Tema più atteso e piacevole dell'anno, anche se ad oggi ancora non sento l'atmosfera  Natalizia dovuta alle numerose attività sociali e lavorative che sto portando avanti ora mai da mesi.
Un anno che si chiude molto bene, anche se devo ammettere c'è stato un periodo difficile, un periodo in cui ho scoperto come questo paese, così tanto bello e con tante potenzialità, offre un marciume nel sistema, che lo rende uno tra i paesi più corrotti del mondo, ma soprattutto in cima alle classifiche per il malcostume.
Una guerra quella che ho intrapreso a viso scoperto, senza nascondermi in quella malattia dell'Italia che da secoli c'è, chiamata Mafia Politica, che ritengo il peggior male.
Non mi spaventano le minacce, ed anche le ritorsioni di questi giorni, ma come questo paese non ha futuro, se non si fa un vero spin off.
Ma non voglio scrivere di questa piccola parte dell'anno o ciò che ho scoperto, che spero nel 2020 di estirpare, ma di tante cose belle che sono successe.
Sotto l'aspetto lavorativo molto bene, con un fine anno davvero gratificante, anche se avrei avuto avviare una mia azienda, ma tanti gli aspetti positivi nel lavoro, soprattutto dopo l'estate, gratifiche che mi fanno piacere.
Sul piano affettivo e umano, tanti ringraziamenti e soprattutto persone che mi vogliono bene, credo che questo sia il regalo più bello che posso ricevere. Non sono uno che guarda il regalino ricevuto, l'oggetto, anzi forse quest'anno molto probabilmente non riceverò nulla, in fondo quando mi chiedono cosa vorrei, la risposta mia è sempre quella, niente, ho tutto.
Un altro aspetto positivo sono stati i successi con l'associazione di volontariato che porto avanti, anche quest'anno tante persone abbiamo reso felici e numerose attività gratuite, attività che a Roma e nel Lazio nessuno è riuscito a fare così tanto, e bene, anche se devo ammettere ho ricevuto attacchi personali, soprattutto da chi è invidioso e non riesce a fare come noi volontari.
Mi ha fatto molto piacere quest'anno, vedere che molti amici, amici con la A maiuscola, mi sono stati vicino, sia nelle vittorie e sia nello sconfitte.
La delusione, forse così si può dire, arriva da quelle persone, per di più del quartiere con il quale stiamo cercando di migliorare, che si sono rilevate false ed opportuniste, persone che credevi amiche ed invece poi ti voltano le spalle.
Ma tante belle cose sono successe, tante, potrei davvero dire che il 2019 si chiude bene.
Il dispiace, e che ancora non ho visto la programmazione per IOT, anche se mi sono vista meglio quello della firma digitale e normativa nazionale, la mancanza di scoprire la programmazione per Xbox anch'essa di mio interesse.
Vediamo se nel 2020 riesco a togliermi qualche soddisfazione.
Un giorno di lavoro, e poi anche per me vacanza, una vacanza questa volta speciale ma soprattutto di riprendermi tutte le energie che mi servono.
Quest'anno una supera vacanza, che durerà fino alla befana.
Auguro a tutte le persone, di trascorrere un bellissimo Natale, e di ricevere il regalo più bello, quello dell'affetto dei propri cari, ed un 2020 pieno di soddisfazioni.
Auguri a tutti i miei lettori.


domenica 15 dicembre 2019

Download gratuito gioco the Escapists




Fino al 19 dicembre 2019 la possibilità di scaricare il gioco The Escapists gratuitamente e senza limitazioni.
Il gioco in lingua italiana e per sistemi Windows, scaricabile dal seguente sito https://www.epicgames.com/store/it/product/the-escapists/home

sabato 14 dicembre 2019

Download gratuito The Wolf Among Us




Fino al 19 dicembre 2019, si può scaricare il gioco The Wolf Among US, in lingua inglese e per sistemi operativi Windows.
Il gioco è adatto ad un pubblico adulto (maggiorenne).
Per il download e maggiori informazioni visitate il seguente sito https://www.epicgames.com/store/it/product/the-wolf-among-us/home

martedì 10 dicembre 2019

Ebook gratuito sull'albero NEEM

Copertina ebook germogli

Dal seguente sito https://verdelitetm.com/richiesta-ebook-neem potete scaricare gratuitamente un file pdf di circa 140 pagine in italiano sull'albero Neem.

lunedì 9 dicembre 2019

Sql Server Esportare i dati tramite script

Qui di seguito si riporta la procedura per esportare i dati tramite "Script" sql del database Sql Server.
Dopo aver aperto il Management Studio e selezionato il database di proprio interesse, fate click con il tasto destro, nel menu che viene aperto, fate click sulla voce "Genera Script" figura 1.


Figura 1.

Nella finestra che viene aperta (figura 2) viene avviato il "Wizard".
Figura 2

Selezioniamo le tabelle di nostro interesse (figura 3).

Figura 3
Facciamo click sul pulsante "Avanti"  e nella finestra che viene aperta (figura 4) mettiamo in un unico script.

Figura 4
A questo punto facciamo click sul pulsante "Avanzate"  nella finestra che viene aperta (figura 5)  selezioniamo la voce "Tipi di dati per cui generare lo script" impostando il valore a "solo dati".

Figura 5.

A questo punto confermiamo con ok e poi con il tasto Avanti. Verrà riportato un riepilogo e poi la creazione dello script con i dati.





domenica 8 dicembre 2019

Download gratuito gioco Jotun




Altro nuovo gioco gratuito fino al 12 dicembre 2019 dal sito Epic Game che è possibile scaricare e divertirsi su piattaforma Windows e Mac.
Il gioco Jotun, scaricabile dal seguente sito https://www.epicgames.com/store/it/product/jotun/home in lingua italiana è un gioco adatto a tutti, ed è possibile scaricarlo gratuitamente in questi giorni.
Per maggiori informazioni e download visitate il sito indicato.

martedì 3 dicembre 2019

Linq select 2d array

Il frammento di codice qui di seguito illustra una tecnica di come creare un array a due dimensioni.


string[][] MioArray = (from Dati in contesto.Tabella where Dati .Campo== "testo"  orderby Dati.CampoB select new string[] {Dati.CampoB, Dati.CampoC }  ).ToArray();

lunedì 2 dicembre 2019

Download gratuito RAYMAN LEGENDS



Dal seguente sito https://www.epicgames.com/store/it/product/rayman-legends/home è possibile scaricare il gioco Rayman Legends per sistemi Windows ed in lingua italiana.
E' possibile scaricarlo fino al 5 dicembre 2019, dopo tale data sarà a pagamento.

domenica 1 dicembre 2019

Condividere le immagini sul web

Se avete la necessità di condividere immagini o utilizzarle in siti, può tornare utile un servizio gratuito che non richiede ne registrazione e ne email, con il quale caricare le immagini sul web e condividerle.
Dal seguente sito https://funkyimg.com/ potete utilizzare un servizio gratuito ed in inglese per la condivisione delle immagini.

sabato 30 novembre 2019

Motore di ricerca per trovare la fonte delle immagini

Se state cercando un motore di ricerca per immagini che vi riporta i siti in cui si trova l'immagine che state cercando oppure dove è stata pubblicata per prima, il sito https://tineye.com/ offre questa possibilità di trovare tutti i siti che riguardano l'immagine che state cercando.

venerdì 29 novembre 2019

Editor gratuito per immagini online



Canva Photo Editor  visibile qui https://www.canva.com/photo-editor/  è un sito che offre la possibilità di modificare le proprie immagini o applicare degli effetti grafici.
Il servizio online è gratuito e non richiede ne registrazione e ne email.

giovedì 28 novembre 2019

Linq to array two dimensions 2D

Il frammento di codice qui di seguito illustra una tecnica di come rilevare il valore di un array due dimensioni, prendendo il valore di una solo colonna.

string[] risultatoArray =
    (from i in Enumerable.Range(0, MioArray.GetLength(0))
     where MioArray[i][0] == "2"
     select MioArray[i][1]).ToArray();

martedì 26 novembre 2019

Ebook gratuito su Excel

The Ultimate Excel Resource Guide


Dal seguente sito https://sf.tradepub.com/free/w_myex01/ è possibile scaricare gratuitamente un ebook in formato pdf ed in lingua inglese con il quale si trovano una serie di siti su Excel.

lunedì 25 novembre 2019

ebook gratuito MSIX

MSIX Succinctly


Un piccolo manualetto in lingua inglese e formato pdf che illustra come creare pacchetti d'installazione di tipo Msix.
Per il download e maggiori informazioni, visitate il seguente sito https://www.syncfusion.com/ebooks/msix-succinctly

domenica 24 novembre 2019

Download gratuito gioco Bad North



Continuano le belle offerte di Epicgame, con il quale scaricare giochi gratuiti.
Fino al 29 novembre 2019, la possibilità di scaricare gratuitamente il gioco Bad North qui https://www.epicgames.com/store/it/product/bad-north/home il sito.

martedì 19 novembre 2019

Motore di ricerca per proteggere la privacy




Se state cercando un motore di ricerca con ottime funzionalità, in lingua italiana e soprattutto a favore della privacy, dal seguente sito  https://duckduckgo.com/?t=h_ potete utilizzare un motore di ricerca che tutela il vostro diritto di privacy.
Per maggiori informazioni ed altro visitate il sito indicato.

domenica 17 novembre 2019

Download gioco gratuito The Messenger




Fino al 21 novembre 2019, è possibile scaricare il gioco The Messenger, per sistema operativo Windows dal seguente sito https://www.epicgames.com/store/it/product/the-messenger/home

venerdì 15 novembre 2019

Programma gratuito modellazione 3D



Se state cercando un programma gratuito con ottime funzionalità per la modellazione 3D, dal seguente sito http://amabilis.com/ potete scaricare un valido programma.
Il software è in due versioni, gratuito, con particolari funzionalità ed a pagamento, con funzionalità avanzate.
Programma e sito in lingua inglese.

giovedì 14 novembre 2019

Download gioco gratuito BATTLE BREAKERS




Dal seguente sito https://www.epicgames.com/store/it/product/battle-breakers/home potete scaricare in lingua italiana e per sistemi operativi Windows il gioco BATTLE BREAKERS il tutto gratuitamente.
Al momento è disponibile gratuitamente e senza limitazioni.

mercoledì 13 novembre 2019

Switch enum string value

Il frammento di codice qui di seguito illustra una tecnica di come utilizzare l'enum di tipo string in un switch


switch (EntityContenxt.Tabella.NomeCampo.ToLower())
            {
                case  nameof(MioEnum.variabile):
                    {
                        //Codice
                        break;
                    }
                case nameof(MioEnum.variabile2):
                     
                        //Codice
                        break;
       
                default:
                    break;
            }


Come si vede, tramite la parola chiave NameOf, riusciamo a confrontare due valori stringa.

martedì 12 novembre 2019

Asp.net mvc entity framework core navigation null

Quando si programma in .Net Core, può capitare che utilizzando Entity Framwerork su Sql Server, una entità con relazione non valorizza le tabelle in relazione.
Tra le tante soluzione, può tornare utile utilizzare il metodo "Include" indicando il campo chiave della tabella in relazione.
Qui di seguito un frammento di codice.

 MioDBContext contesto = new MioDBContext ();
          
            
             var risultato = contesto.TabellaEntita.Include("IdCampioChiaveConTabellaA").Include("IdCampioChiaveConTabellaB").Where(p => p.Campo == 1).ToList()

Come si vede nel frammento di codice precedente, tramite Include, abbiamo valorizzato le due tabelle con cui si sta in relazione.

domenica 10 novembre 2019

download gratuito gioco RUINER




Dal seguente sito https://www.epicgames.com/store/it/product/ruiner/home fino al 14 novembre 2019 potete scaricare il gioco Ruiner gratuitamente per piattaforma Windows ed in lingua italiana.

sabato 9 novembre 2019

download gioco Nuclear Throne



Altro bel gioco disponibile gratuitamente fino al 14 novembre 2019, dal sito https://www.epicgames.com/store/it/product/nuclear-throne/home è possibile scaricare il gioco Nuclear Throne per sistemi Windows e Mac, in lingua inglese.

.Net - scansione dei documenti tramite Scanner VB.Net e C# - seconda parte

Si riporta l'articolo scritto per il sito https://www.iprogrammatori.it/articoli/microsoft-net-framework/art_net-scansione-dei-documenti-tramite-scanner-seconda-parte_1644.aspx

Riprendiamo l’articolo riguardante la scansione dei documenti tramite la tecnologia .Net con i linguaggi di programmazione VB.Net e C# qui https://www.iprogrammatori.it/articoli/microsoft-net-framework/art_net-effettuare-la-scansione-dei-documenti-tramite-scanner-prima-parte_1643.aspx la prima parte.
In questa seconda ed ultima parte, vedremo come effettuare la scansione, salvare il file e visualizzare il risultato nella form e precisamente nel controllo picturebox.
Si apre il progetto creato in precedenza, e dobbiamo scrivere le funzione per impostare il tipo di scansione e soprattutto il settaggio delle dimensione della nostra immagine.

Stesura del codice

Passiamo in visualizzazione codice, e nella classe della form, scriviamo la funzione con il quale andremo ad impostare alcuni parametri con tanto di valore per la gestione della scansione.
Le proprietà permetteranno all’oggetto per la scansione di effettuare la scansione in base alle informazioni che gli forniamo, come la grandezza, il formato, ed altro ancora per l’area in cui dovrà rilevare il foglio messo sopra allo scanner.
Questa funzione avrà il compito di impostare un valore a determinate proprietà e sarà richiamata da un’altra funzione.
Qui di seguito la dichiarazione per entrambi i linguaggi.


VB.Net

Private Shared Sub SetWIAProperty(ByVal properties As IProperties, ByVal propName As Object, ByVal propValue As Object)

        Dim prop As [Property] = properties.Item(propName)

        prop.let_Value(propValue)

    End Sub

 

C#

private static void SetWIAProperty(IProperties properties, object propName, object propValue)

        {

            Property prop = properties.get_Item(ref propName);

            prop.set_Value(ref propValue);

        }


Ora dovremmo creare la funzione, che richiama quella precedente per impostare i vari parametri di scansione.
La funzione che andremo a scrivere permetterà di impostare la risoluzione, la larghezza ed altre utili informazioni per gestire al meglio lo scanner.
La funzione avrà dei parametri, tra questi l’oggetto di tipo “IItem” che è l’interfaccia per gestire lo scanner con il quale effettueremo la scansione.
Qui di seguito si riporta la creazione della funzione, con il quale andremo ad impostare i vari parametri.
La dichiarazione delle suddette operazioni per entrambi i linguaggi di programmazione.



VB.Net

Private Shared Sub AdjustScannerSettings(ByVal scannnerItem As IItem, ByVal scanResolutionDPI As Integer, ByVal scanStartLeftPixel As Integer, ByVal scanStartTopPixel As Integer, ByVal scanWidthPixels As Integer, ByVal scanHeightPixels As Integer, ByVal brightnessPercents As Integer, ByVal contrastPercents As Integer, ByVal colorMode As Integer)

        Const WIA_SCAN_COLOR_MODE As String = "6146"

        Const WIA_HORIZONTAL_SCAN_RESOLUTION_DPI As String = "6147"

        Const WIA_VERTICAL_SCAN_RESOLUTION_DPI As String = "6148"

        Const WIA_HORIZONTAL_SCAN_START_PIXEL As String = "6149"

        Const WIA_VERTICAL_SCAN_START_PIXEL As String = "6150"

        Const WIA_HORIZONTAL_SCAN_SIZE_PIXELS As String = "6151"

        Const WIA_VERTICAL_SCAN_SIZE_PIXELS As String = "6152"

        Const WIA_SCAN_BRIGHTNESS_PERCENTS As String = "6154"

        Const WIA_SCAN_CONTRAST_PERCENTS As String = "6155"

        SetWIAProperty(scannnerItem.Properties, WIA_HORIZONTAL_SCAN_RESOLUTION_DPI, scanResolutionDPI)

        SetWIAProperty(scannnerItem.Properties, WIA_VERTICAL_SCAN_RESOLUTION_DPI, scanResolutionDPI)

        SetWIAProperty(scannnerItem.Properties, WIA_HORIZONTAL_SCAN_START_PIXEL, scanStartLeftPixel)

        SetWIAProperty(scannnerItem.Properties, WIA_VERTICAL_SCAN_START_PIXEL, scanStartTopPixel)

        SetWIAProperty(scannnerItem.Properties, WIA_HORIZONTAL_SCAN_SIZE_PIXELS, scanWidthPixels)

        SetWIAProperty(scannnerItem.Properties, WIA_VERTICAL_SCAN_SIZE_PIXELS, scanHeightPixels)

        SetWIAProperty(scannnerItem.Properties, WIA_SCAN_BRIGHTNESS_PERCENTS, brightnessPercents)

        SetWIAProperty(scannnerItem.Properties, WIA_SCAN_CONTRAST_PERCENTS, contrastPercents)

        SetWIAProperty(scannnerItem.Properties, WIA_SCAN_COLOR_MODE, colorMode)

    End Sub

 

C#

 

  private static void AdjustScannerSettings(IItem scannnerItem, int scanResolutionDPI, int scanStartLeftPixel, int scanStartTopPixel, int scanWidthPixels, int scanHeightPixels, int brightnessPercents, int contrastPercents, int colorMode)

        {

            const string WIA_SCAN_COLOR_MODE = "6146";

            const string WIA_HORIZONTAL_SCAN_RESOLUTION_DPI = "6147";

            const string WIA_VERTICAL_SCAN_RESOLUTION_DPI = "6148";

            const string WIA_HORIZONTAL_SCAN_START_PIXEL = "6149";

            const string WIA_VERTICAL_SCAN_START_PIXEL = "6150";

            const string WIA_HORIZONTAL_SCAN_SIZE_PIXELS = "6151";

            const string WIA_VERTICAL_SCAN_SIZE_PIXELS = "6152";

            const string WIA_SCAN_BRIGHTNESS_PERCENTS = "6154";

            const string WIA_SCAN_CONTRAST_PERCENTS = "6155";

            SetWIAProperty(scannnerItem.Properties, WIA_HORIZONTAL_SCAN_RESOLUTION_DPI, scanResolutionDPI);

            SetWIAProperty(scannnerItem.Properties, WIA_VERTICAL_SCAN_RESOLUTION_DPI, scanResolutionDPI);

            SetWIAProperty(scannnerItem.Properties, WIA_HORIZONTAL_SCAN_START_PIXEL, scanStartLeftPixel);

            SetWIAProperty(scannnerItem.Properties, WIA_VERTICAL_SCAN_START_PIXEL, scanStartTopPixel);

            SetWIAProperty(scannnerItem.Properties, WIA_HORIZONTAL_SCAN_SIZE_PIXELS, scanWidthPixels);

            SetWIAProperty(scannnerItem.Properties, WIA_VERTICAL_SCAN_SIZE_PIXELS, scanHeightPixels);

            SetWIAProperty(scannnerItem.Properties, WIA_SCAN_BRIGHTNESS_PERCENTS, brightnessPercents);

            SetWIAProperty(scannnerItem.Properties, WIA_SCAN_CONTRAST_PERCENTS, contrastPercents);

            SetWIAProperty(scannnerItem.Properties, WIA_SCAN_COLOR_MODE, colorMode);

        }

Terminata la creazione di queste due funzioni, che hanno l’obiettivo di impostare le informazioni per effettuare una corretta scansione del documento, non resta che creare una funzione, che sarà richiamato dal altra funzione che poi sarà quella del pulsante di scansione, per effettuare la vera scansione.
Questa funzione, avrà un oggetto di tipo “Wia.CommonDialog” con il quale andremo ad effettuare l’avvio della scansione.
Mentre l’oggetto di tipo “DeviceInfo” tramite il metodo “Connect” sarà quello di gestire il dispositivo hardware, infatti passando alle precedenti funzioni la proprietà “Item” si andrà ad impostare la modalità con il quale faremo la scansione.
Tramite il metodo “ShowTransfer” della classe Wia.CommonDialog” verrà avviata la scansione, passando come parametro, l’oggetto Item, il formato di scansione in base al valore selezionato nella casella combinata, ed il risultato della scansione sarà un oggetto di tipo “ImageFile”.
Con il quale salveremo i file sul nostro pc per poi farlo vedere nel controllo Picturebox.
Nella gestione delle eccezioni in base al codice di errore andremo a visualizzare un messaggio personalizzato.
Qui di seguito la dichiarazione delle suddette operazioni.




VB.Net

Public Function ScansionaFormato(ByVal device As DeviceInfo, ByVal formato As String) As ImageFile

        Dim deviceScanner = device.Connect()

        Dim dlg As WIA.CommonDialog = New WIA.CommonDialog()

        Dim item = deviceScanner.Items(1)

        Dim resolution As Integer = 100

        Dim width_pixel As Integer = 1250

        Dim height_pixel As Integer = 1700

        Dim color_mode As Integer = 0

 

 

        Try

            AdjustScannerSettings(item, resolution, 10, 10, 600, 600, 100, 100, color_mode)

            Dim scanRisultato As Object = Nothing

 

            If formato.ToLower() = "jpg" Then

                scanRisultato = dlg.ShowTransfer(item, WIA.FormatID.wiaFormatJPEG, True)

            ElseIf formato.ToLower() = "png" Then

                scanRisultato = dlg.ShowTransfer(item, WIA.FormatID.wiaFormatPNG, True)

            Else

                scanRisultato = dlg.ShowTransfer(item, WIA.FormatID.wiaFormatTIFF, True)

            End If

 

            If scanRisultato IsNot Nothing Then

                Dim imageFile = CType(scanRisultato, ImageFile)

                Return imageFile

            End If

 

        Catch ex As COMException

            Dim errorCode As UInteger = CUInt(ex.ErrorCode)

 

            If errorCode = &H80210006 Then

                MessageBox.Show("Scanner non pronto oppure impegnato")

            ElseIf errorCode = &H80210064 Then

                MessageBox.Show("Annullata la scansione")

            Else

                MessageBox.Show("Errore: " & ex.Message)

            End If

        End Try

 

        Return New ImageFile()

    End Function

 

 

 

C#

 

  public ImageFile ScansionaFormato(DeviceInfo device, string formato)

        {

            //Mi connetto al dispositivo

            var deviceScanner =  device.Connect();

               int resolution = 100;

          int width_pixel = 1250;

          int height_pixel = 1700;

          int color_mode = 0;

            //Visualizzo la dialogo

            WIA.CommonDialog dlg = new WIA.CommonDialog();

 

            var item = deviceScanner.Items[1];

 

            try

            {

                //Imposto le dimensioni di scansione

                AdjustScannerSettings(item, resolution, 10, 10, 600, 600,  100,100, color_mode);

 

 

                object scanRisultato = null;

                if (formato.ToLower() == "jpg")

                {

                    scanRisultato = dlg.ShowTransfer(item, WIA.FormatID.wiaFormatJPEG, true);

                }

                else if (formato.ToLower() == "png")

                {

                    scanRisultato = dlg.ShowTransfer(item, WIA.FormatID.wiaFormatPNG, true);

                }

                else

                {

                    scanRisultato = dlg.ShowTransfer(item, WIA.FormatID.wiaFormatTIFF, true);

                }

               

 

                if (scanRisultato != null)

                {

                    var imageFile = (ImageFile)scanRisultato;

 

                    //ritorno oggetto immagine

                    return imageFile;

                }

            }

            catch (COMException ex)

            {

 

              

                uint errorCode = (uint)ex.ErrorCode;

 

               

                if (errorCode == 0x80210006)

                {

                    MessageBox.Show("Scanner non pronto oppure impegnato");

                }

                else if (errorCode == 0x80210064)

                {

                    MessageBox.Show("Annullata la scansione");

                }

                else

                {

                    MessageBox.Show("Errore: " + ex.Message);

                }

            }

 

            return new ImageFile();

        }
Ora non ci resta creare la funzione che sarà richiamato dal pulsante di scansione, questa funzione richiama la precedente funzione, passando come parametro, lo scanner selezionato, il formato del file immagine, ed altre informazioni utili, inoltre verrà salvata l’immagine e visualizzata in anteprima.
Qui di seguito la dichiarazione del codice.
 

VB.Net

Private Function Scansiona() As Boolean

        Dim risultatoScansione As Boolean = False

 

        Try

            Dim deviceManager = New DeviceManager()

            Dim device As DeviceInfo = Nothing

 

            If listScanner.SelectedIndex < 0 Then

                MessageBox.Show("Selezionare un dispositivo valido", "Esempio Scanner", MessageBoxButtons.OK, MessageBoxIcon.Warning)

                Return False

            End If

 

            For i As Integer = 1 To deviceManager.DeviceInfos.Count

 

                If deviceManager.DeviceInfos(i).Type <> WiaDeviceType.ScannerDeviceType Then

                    Continue For

                End If

 

                If deviceManager.DeviceInfos(i).Properties("Name").Value.ToString() = listScanner.SelectedItem.ToString() Then

                    device = deviceManager.DeviceInfos(i)

                    Exit For

                End If

            Next

 

            If device Is Nothing Then

                MessageBox.Show("Selezionare un dispositivo valido", "Esempio Scanner", MessageBoxButtons.OK, MessageBoxIcon.Warning)

                Return False

            End If

 

            Dim ImmagineScansionata As ImageFile = New ImageFile()

            Dim EstensioneImmagine As String = cmbFormato.SelectedItem.ToString()

            ImmagineScansionata = ScansionaFormato(device, EstensioneImmagine)

            risultatoScansione = True

            Dim Percorso = Path.Combine("D:\Test." & EstensioneImmagine)

 

            If File.Exists(Percorso) Then

                File.Delete(Percorso)

            End If

 

            ImmagineScansionata.SaveFile(Percorso)

            pictureBox1.Image = New System.Drawing.Bitmap(Percorso)

            Return risultatoScansione

        Catch ex As System.Exception

            MessageBox.Show(ex.Message)

            Return risultatoScansione

        End Try

    End Function

 

 

C#

 

private bool Scansiona()

        {

            bool risultatoScansione = false;

            try

            {

 

                var deviceManager = new DeviceManager();

                DeviceInfo device = null;

                if (listScanner.SelectedIndex < 0)

                {

                    MessageBox.Show("Selezionare un dispositivo valido", "Esempio Scanner", MessageBoxButtons.OK, MessageBoxIcon.Warning);

                    return false;

                }

 

                for (int i = 1; i <= deviceManager.DeviceInfos.Count; i++)

                {

 

                    if (deviceManager.DeviceInfos[i].Type != WiaDeviceType.ScannerDeviceType)

                    {

                        continue;

                    }

 

                    if (deviceManager.DeviceInfos[i].Properties["Name"].get_Value().ToString() == listScanner.SelectedItem.ToString())

                    {

                        device = deviceManager.DeviceInfos[i];

                        break;

                    }

 

                   

 

                }

                if (device == null)

                {

                    MessageBox.Show("Selezionare un dispositivo valido", "Esempio Scanner", MessageBoxButtons.OK, MessageBoxIcon.Warning);

                    return false;

                }

                ImageFile ImmagineScansionata = new ImageFile();

 

                string EstensioneImmagine = cmbFormato.SelectedItem.ToString();

             ImmagineScansionata =    ScansionaFormato(device, EstensioneImmagine);

                

 

                risultatoScansione = true;

                var Percorso = Path.Combine("D:\\Test." + EstensioneImmagine);

 

                if (File.Exists(Percorso))

                {

                    File.Delete(Percorso);

                }

 

                ImmagineScansionata.SaveFile(Percorso);

 

                pictureBox1.Image = new Bitmap(Percorso);

                return risultatoScansione;

            }

            catch (System.Exception ex)

            {

                MessageBox.Show(ex.Message);

                return risultatoScansione;

            }

       

       

       

        }

Ora dobbiamo richiamare questa funzione dall’evento click del pulsante, passiamo in visualizzazione grafica del nostro progetto, e nella form, facciamo doppio click sul pulsante, in modo che passiamo in modalità codice dell’evento click.
Nell’evento click, verrà richiamata la funzione illustra in precedenza.


VB.Net

Private Sub BtnScansiona_Click(sender As Object, e As EventArgs) Handles BtnScansiona.Click

        If String.IsNullOrEmpty(txtPercorsoNomeFile.Text) Then

            MessageBox.Show("Inserire il percorso e nome file", "Scanner", MessageBoxButtons.OK, MessageBoxIcon.Warning)

            Return

        End If

 

        If Scansiona() = True Then

            MessageBox.Show("Scansione effettuata con successo.", "Scanner", MessageBoxButtons.OK, MessageBoxIcon.Information)

        End If

 

    End Sub

 

 

C#

private void BtnScansiona_Click(object sender, EventArgs e)

        {

            if (String.IsNullOrEmpty(txtPercorsoNomeFile.Text))

            {

                MessageBox.Show("Inserire il percorso e nome file", "Scanner", MessageBoxButtons.OK, MessageBoxIcon.Warning);

                return;

            }

            if (Scansiona() == true)

                MessageBox.Show("Scansione avvenuta con successo.", "Scanner", MessageBoxButtons.OK, MessageBoxIcon.Information);

          

        }

Manca solo un piccolo dettaglio, quello di abbinare al click del pulsante per il salvataggio del file, il percorso e nome del file.
Qui l’evento click del pulsante, per visualizzare la finestra di dialogo per selezionare la cartella e dare il nome del file immagine relativo alla scansione.


VB.Net

Private Sub btnSalva_Click(ByVal sender As Object, ByVal e As EventArgs)

        Dim DlgpercorsoNomeFile As SaveFileDialog = New SaveFileDialog()

 

        If DlgpercorsoNomeFile.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

            txtPercorsoNomeFile.Text = DlgpercorsoNomeFile.FileName

        End If

    End Sub

 

C#

  private void btnSalva_Click(object sender, EventArgs e)

        {

            SaveFileDialog DlgpercorsoNomeFile = new SaveFileDialog();

            if (DlgpercorsoNomeFile.ShowDialog() == System.Windows.Forms.DialogResult.OK)

            {

                txtPercorsoNomeFile.Text = DlgpercorsoNomeFile.FileName;

            }

        }




Conclusioni

Ora non ci resta che testare il nostro applicativo, collegando al nostro pc uno scanner, ed effettuare la scansione, noteremo come al termine verrà mostrato il file relativo alla scansione.
L’articolo ha voluto fornire al lettore, le conoscenze per dotare i propri applicazioni, Windows Application, più che altro, ma anche Web application, la gestione dello scanner.
Strumento che può tornare molto utile nei progetto nel quale si devono gestire documenti, e quindi applicazioni di gestione documentale. -
Naturalmente può essere anche un punto di partenza per creare programma dedicati alla scansione, quindi non nei propri progetti, ma un vero software.