Bonjour chers amis développeurs, j'ai besoin de votre aide. en effet je développe une application de gestion qui store des données dans une Base de données mysql. j'ai enregistré des images dans celles-ci et je voudrais les afficher dans une une picturebox lors d'une requête.j'ai essayé ce code mais il ne passe
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
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
Dim conn As New MySqlConnection
Dim cmd As New MySqlCommand
Dim myData As MySqlDataReader
Dim SQL As String
Dim rawData() As Byte
Dim FileSize As UInt32  'taille de l'image
Dim fs As FileStream 'le fichier lui-meme
 
conn.ConnectionString = "server=127.0.0.1;" _   'exemple de connection
    & "uid=root;" _
    & "pwd=12345;" _
    & "database=test"
 
SQL = "SELECT file_name, file_size, file FROM file"
 
Try
    conn.Open()
 
    cmd.Connection = conn
    cmd.CommandText = SQL
 
    myData = cmd.ExecuteReader
 
    If Not myData.HasRows Then Throw New Exception("There are no BLOBs to save")
 
    myData.Read()
 
    FileSize = myData.GetUInt32(myData.GetOrdinal("file_size"))
    rawData = New Byte(FileSize) {}
 
    myData.GetBytes(myData.GetOrdinal("file"), 0, rawData, 0, FileSize)
 
    fs = New FileStream("C:\newfile.png", FileMode.OpenOrCreate, FileAccess.Write)   'sur le "C:\"  le compilateur dit qu'il n'y a pas d autorisation, mais sur autre 
    fs.Write(rawData, 0, FileSize)  
     picturebox1.load("C:\newfile.png" )                                                                            'disque il que le fichier est utilisé par un autre processus
    fs.Close()
 
    MessageBox.Show("File successfully written to disk!", "Success!", MessageBoxButtons.OK, MessageBoxIcon.Asterisk)
alors que quelqu’un ait la générosité de m'aider. Merci