Bonjour à tous

Dans mon formulaire j’insère une image via un bouton dans une picturebox, jusque la tout fonctionne. Après avoir enregistré les modifs, quand je ré-ouvre le formulaire mon image n'apparait pas.

Voici mon code

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
 
Private Sub BpAjouterIMG_Click(sender As Object, e As EventArgs) Handles BpAjouterIMG.Click
        'Bouton ajouter image
        'Verifie si le champs MARQUE est remplit
        If Requis() = True Then
            Return
        End If
 
        '********************
        Dim NomFichier As String
        Dim CheminFichier As String
        Dim path As String = My.Settings.DBpath & "\Image\" & TboxMARQUE.Text & "\" 'Crée le repertoire avant le champ Marque
        Dim OpenFileDialogImage As OpenFileDialog = New OpenFileDialog
 
        If OpenFileDialogImage.ShowDialog = Windows.Forms.DialogResult.OK Then
            ImageProduit.ImageLocation = OpenFileDialogImage.FileName
 
            NomFichier = OpenFileDialogImage.SafeFileName
            TboxImage.Text = NomFichier 'safefilename uniquement le nom - filename le chemin complet
            CheminFichier = OpenFileDialogImage.FileName 'Recupere le chemin du fichier
 
        End If
 
 
        If Directory.Exists(path) Then 'vérifie l’existence du répertoire
            'Si le répertoire existe il ne fait rien
        Else 'Si le répertoire n'existe pas, il le créer
            My.Computer.FileSystem.CreateDirectory(path) 'création du répertoire
 
 
        End If
        '''Copie le fichier vers DBpath avec le nom du fichier ''NomFichier''
 
        My.Computer.FileSystem.CopyFile(CheminFichier, path & NomFichier, Microsoft.VisualBasic.FileIO.UIOption.AllDialogs, Microsoft.VisualBasic.FileIO.UICancelOption.DoNothing)
 
 
    End Sub
Si quelqu'un aurait une piste pour moi

Merci d'avance

Bonne journée à tous