Discussion :

[Jean_guy]

Bonjour,

Voilà j'ai décidé de developper une appli me permettant de gérer mes jeux vidéos. ça c'est pour la petite histoire.
Sinon j'ai un petit problème, comment enregistrer et visualiser des images via une picturebox dans une base de donnée ms sql(type image).

L'enregistrement à l'air de se faire correctement via un dataset.
Mais je n'arrive pas à visualiser l'image en question.

J'utilise différentes classes: une d'acces au données, une d'ajout et une autre de sélection. Mais la j'avoue que je n'y arrive pas.

Je ne veux absoluement pas enregistrer le chemin de l'image mais bien celle ci directement dans la bdd comme via un blob en php.

Encore merci j'attend vos réponses et votre aide avec impatience.
Cordialement Jean_guy

[SaumonAgile]

Tu stockes les images dans un champ de quel type ?
Quand j'ai des données binaires à enregistrer, j'utilise un varbinary.

Ensuite pour afficher ton image, tu charges le byte[] contenant les données de l'image dans un Bitmap et tu affectes ce Bitmap au picturebox. Je n'ai pas testé mais ça devrait être quelquechose proche de ça.

[Jean_guy]

Merci Saumon Agile.

Voilà pour infos j'ai essayé un petit truc.
J'ai mis mes champs images en varbinary(MAX).

J'ai deux fonctions me permettant d'encoder mes images en tableau de bite et une autre permettant l'inverse.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
 Public Function ByteArray2Image(ByVal BArray As Byte()) As Image
        Try
            Dim mstImage As System.IO.MemoryStream = New System.IO.MemoryStream(BArray)
            Dim img As Image = Image.FromStream(mstImage)
            Return img
        Catch ex As Exception
            Return Nothing
        End Try
    End Function
 
 Function Image2ByteArray(ByVal img As Image) As Byte()
        Try
            Dim mstImage As System.IO.MemoryStream = New System.IO.MemoryStream
            img.Save(mstImage, System.Drawing.Imaging.ImageFormat.Jpeg)
            Dim bytImage As Byte() = mstImage.GetBuffer
            Return bytImage
        Catch ex As Exception
            Return Nothing
        End Try
    End Function

Ces fonctions viennent de la FAQ. Merci c'est

Sinon voilà je n'arrive pas à mettre ce tableau dans ma requete sql d'insertion et l'envoyer avec ma petite classe de connection.

Je vous remercie pour votre aide.

[SaumonAgile]

Montre moi ta requête d'insertion. Je parie que tu n'utilises pas de paramètres SQL.

[Jean_guy]

Voili, voilou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Public Sub ajout_jeuvideo(ByVal image_jeu_video As PictureBox)
        Dim image As New Connection
        Dim imageinbyte = Image2ByteArray(image_jeu_video.Image)
        Dim new_image As Integer = image.ExecuteRequete("INSERT INTO jeu_video (titre_jeu_video,jaquette_jeu_video) VALUES('Bleach','" + imageinbyte + "')")
    End Sub

je dois retirer les + mais quand je le fait ya une erreur et le bleach on s'en fou c'était juste pour tester, vu que la table contient beaucoup plus d'informations.

Merci SaumonAgile et désolé pour tes frères qui sont morts pour Noël et Nouvel an. Sinon Bonne Année au fait.

[SaumonAgile]

Utilises des paramètres SQL pour insérer les valeurs.

http://webman.developpez.com/article...ameter/csharp/