Discussion :

[Claude_Azoulai]

Bonjour à tous

Je travaille sous VB.Net et je voudrais pouvoir modifier la date de prise de vue dans l'EXIF de photos.
J'ai trouvé un exemple (dans les conversations) qui permet de récupérer la date de prise de vue que j'ai réussi à faire fonctionner pour mon cas.
Mais je n'ai pas trouvé d'exemple pour la réinsérer

Voici le 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
 
    Public Sub Récupère()
        Dim DA As String
        Dim img As Image
        Dim prop As PropertyItem
        Dim sDate As String
        Dim dateTimeOriginal As Date
 
        Chemin = CurDir()
        Photo = Chemin & "\DSCF0077.JPG"
        img = Image.FromFile(Photo)
        prop = img.GetPropertyItem(&H9003)
        sDate = Encoding.ASCII.GetString(prop.Value, 0, prop.Len).TrimEnd(Chr(0))
        'Récupère la date de prise de vue au format Américain
        dateTimeOriginal = DateTime.ParseExact(sDate, "yyyy:MM:dd HH:mm:ss", Nothing)
        'Récupère la date de prise de vue au format Européen
        DA = dateTimeOriginal.ToString
    End Sub

Je voudrais, après avoir modifié la date, par exemple nDate, la réinsérer dans l'EXIF.
nDate doit-elle être au format Américain ?

Quelqu'un peut-il m'aider SVP ?

Merci de votre aide

[DotNetMatt]

Je ne connais pas les subtilites d'EXIF, mais apparement c'est faisable: How to edit EXIF data in .NET.