Advertisement
Guest User

Untitled

a guest
Jun 19th, 2014
22
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. [Reflection.Assembly]::LoadWithPartialName("PresentationCore") | Out-Null
  2.  
  3. $path = "C:\"
  4.  
  5. $date = Get-Date "1/1/2014 9:00 AM"
  6. $fps = 30
  7.  
  8. foreach ($path in (Get-ChildItem $path -Filter "*.jpg").FullName)
  9. {
  10.     $stream = [System.IO.File]::Open($path, "Open")
  11.  
  12.     $bitmapDecoder = [System.Windows.Media.Imaging.BitmapDecoder]::Create($stream, "None", "Default")
  13.  
  14.     $metadataWriter = $bitmapDecoder.Frames[0].CreateInPlaceBitmapMetadataWriter()
  15.  
  16.     $metadataWriter.DateTaken = $date
  17.  
  18.     Write-Host "Writing ${path}: $date"
  19.  
  20.     if (-not $metadataWriter.TrySave())
  21.     {
  22.         Write-Error "Error writing metadata to $path."
  23.     }
  24.  
  25.     $date = $date.AddSeconds(1 / $fps)
  26.  
  27.     $stream.Close()
  28. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement