sauvegarde images dans une DB SQL

Version imprimable

Bonjour

Je ai un petit souci: je souhaite sauver une image dans la DB SQL, mais j'ai un message d'erreur assez générique. Quelqu'un aurait-il une idée sur la question

le message d'erreur :

Citation:

Une erreur générique s'est produite dans GDI+.

voici le code de la sauvegarde

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            Dim ms As MemoryStream
 
            ms = New MemoryStream
            PbDocument.Image.Save(ms, PbDocument.Image.RawFormat)
 
            Dim arrImage() As Byte = ms.GetBuffer
 
            ' Close the stream object to release the resource.
            ms.Close()
 
            Dim strSQL As String = _
                              "INSERT INTO Picture (Filename, Picture)" & _
                              "VALUES ('" & "test" & "'," & arrImage(0) & ")"
 
 
 
      End Sub

17/03/2012, 12h12
Sankasssss

Bonjour,

d'après cette discussion ca viendrait du fait que tu essayes de sauvegarder sur une image qui existe déjà et qui est verrouillée (ouverte)...
17/03/2012, 13h09
thierry007

En fait j'ai chargé une image dans le PbDocument( picturBox): cette image même que je souhaite sauvegarder dans la DB.

ou alors

Quelle serait alors la syntaxe pour enregistrer un fichier image dans la Db

exemple le fichier "c:\monimage.jpg"
17/03/2012, 14h28
Sankasssss

Il faudrait savoir où ça plante exactement...

J'ai l'impression que ce qui pose problème, c'est principalement cette ligne :

Code:

PbDocument.Image.Save(ms, PbDocument.Image.RawFormat)

essaye une fois avec, pour une image JPEG :

Code:

PbDocument.Image.Save(ms, System.Drawing.Imaging.ImageFormat.Jpeg)
17/03/2012, 15h18
thierry007

Hai

Le problème est le même

Je pense que pour avoir plus facile, peut être enregistrer l'image dans la db directement a partir d'un fichier, sans l'ouvrir dans le Pb avent de vouloir le sauver...

mais alors quel en est la syntaxe :?
17/03/2012, 15h50
Sankasssss

Non, vous vous y prenez de la bonne manière, il faut juste comprendre pourquoi ca ne fonctionne pas...
Essayer de mettre un bloc try / catch avec un ex.toString pour voir s'il n'y a pas plus de détail sur l'exception.
17/03/2012, 16h07
thierry007

Oui, je comprend ( savoir le pourquoi )

Mais je me posais juste la question

Est-il interessant de charger l'image dans le pbox et puis de l'enregistrer dans la DB, au lieu d'enregistrer directement le fichier ( image ) dans la db avec un filedlg a ce moment

Genre:

Code:

Dim image As Byte() = System.IO.File.ReadAllBytes("c:\image.jpg")
17/03/2012, 16h11
Sankasssss

Si vous ne la visualisez pas, il vaux mieux ne pas passer par un picturebox en effet... (désolé je n'avais pas compris)
17/03/2012, 16h47
thierry007

Bien disons que si j'utilise une fileDlg elle peut être affichées dans l'explorer de windows....

poins de vue !!

mais alors je coince sur la syntage de la commande INSERT de l'image

Code:

Dim image As Byte() = System.IO.File.ReadAllBytes("c:\image.jpg")
17/03/2012, 23h28
Pol63

il faut utiliser un dbparameter, on ne peut pas (enfin si on peut mais il faut vraiment éviter) mettre l'image dans la concaténation de la requête
il vaut alors mieux mettre une variable dans la requete et passer un paramètre typé (tableau d'octet ou image selon la colonne de ta db) qui contient la valeur
18/03/2012, 11h47
thierry007

BOnjour pol63

tu parles de cette façon de faire j'imagine?

Citation:

Dim strSQL As String = _
"INSERT INTO Picture (Filename, Picture)" & _
"VALUES ('" & "test" & "'," & arrImage(0) & ")"

Code:

1
2
3
4
5
 
string qry = "insert into Picture (Filename, Picture) values(@Filename, @Picture)";
SqlCommand SqlCom = new SqlCommand(qry, connection);
SqlCom.Parameters.Add(new SqlParameter("@Filename", "test"));
SqlCom.Parameters.Add(new SqlParameter("@Picture", (object)imageData));

Ceci semble t'il correcte alors.

Ceci-dit il reste la relecture et affichage dans le pb box a faire, heu...

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 If OpenFile.ShowDialog = System.Windows.Forms.DialogResult.OK Then
 
                  Try
 
                        Dim image As Byte() = System.IO.File.ReadAllBytes(OpenFile.FileName)
 
                        SqlConn.Open()
 
                        StrSql = "UPDATE Documents SET ImageName=@Filename, ImageDocument=@Picture WHERE IdDocument=" & CInt(DgDocuments.CurrentRow.Cells("IdDocument").Value)
 
                        SqlComm = New SqlCommand(StrSql, SqlConn)
 
                        SqlComm.Parameters.Add(New SqlParameter("@Filename", DgDocuments.CurrentRow.Cells("NumeroCOB").Value.ToString & DgDocuments.CurrentRow.Cells("NumeroExtensionCOB").Value.ToString))
                        SqlComm.Parameters.Add(New SqlParameter("@Picture", image))
                        SqlComm.ExecuteNonQuery()
 
                        SqlConn.Close()
                        MsgBox("Image enregistrée")
 
                  Catch ex As Exception
 
                        MsgBox("Un problème est survenu lors du traitement. - " & ex.Message, MsgBoxStyle.Critical)
 
                  End Try
 
            End If

J'ai posté un peut vite : voici

Code:

1
2
3
4
5
 LblNomFichierImage.Text = DgDocuments.CurrentRow.Cells("ImageName").Value.ToString
 
                  Dim Picturebyte() As Byte = DgDocuments.CurrentRow.Cells("ImageDocument").Value
                  Dim StreamPicture As New MemoryStream(Picturebyte)
                  PbDocument.Image = Image.FromStream(streamPicture)

Commentaire ou idée toujours les biens venus