Dim Cursor1 as Cursor
Dim Buffer() As Byte
Buffer = Cursor1.GetBlob("image"):' nome del campo (LONGBLOB) del database
Dim InputStream1 As InputStream
InputStream1.InitializeFromBytesArray(Buffer, 0, Buffer.Length)
Dim Bitmap1 As Bitmap:' dichiaro una bitmap
Bitmap1.Initialize2(InputStream1)
InputStream1.Close
Activity.SetBackgroundImage(Bitmap1):' visulizzo immagine
non ho modo di verificare.... ma ad "occhio" dovrebbe funzionare
Dim Cursor1 as Cursor
Dim Buffer() As Byte
Buffer = Cursor1.GetBlob("image"):' nome del campo (LONGBLOB) del database
Dim InputStream1 As InputStream
InputStream1.InitializeFromBytesArray(Buffer, 0, Buffer.Length)
Dim Bitmap1 As Bitmap:' dichiaro una bitmap
Bitmap1.Initialize2(InputStream1)
InputStream1.Close
Activity.SetBackgroundImage(Bitmap1):' visulizzo immagine
non ho modo di verificare.... ma ad "occhio" dovrebbe funzionare
Però io ho già creato un sistema che interroga il database, esegue le query e tutto... Non vorrei cambiare tutto per un campo solo.
O altrimenti mi basterebbe capire come far ritornare un cursore
Oppure puoi semplificare il database.
Metti le immagini in una cartella sul tuo server web e nel database ci metti solo il nome del file.
Tecnicamente è meglio, anche perché in questo modo il DB rimane di dimensioni più contenute (molti provider forniscono DB con una limitazione in Megabytes...)
Oppure puoi semplificare il database.
Metti le immagini in una cartella sul tuo server web e nel database ci metti solo il nome del file.
Tecnicamente è meglio, anche perché in questo modo il DB rimane di dimensioni più contenute (molti provider forniscono DB con una limitazione in Megabytes...)