[文件操作] [已解决]如何删除JPG文件--属性--详细信息，里面的指定信息，不要全部删除

thp2008

如何删除JPG 文件指定的属性信息！
鼠标操作的方法
选中JPG文件--属性--详细信息，删除属性和个人信息，选中要删除的项，确定。
比如，我要删除“程序名称”，这一项，用批处理，应该如何做？谢谢！

thp2008

回复 7# WHY


    非常感谢您的帮助！

WHY

获取某张图片文件可用的 PropertyItem.Id 及对应的 PropertyItem.Value

[void][Reflection.Assembly]::LoadWithPartialName('System.Drawing');
$img = [Drawing.Image]::FromFile('E:\IMG\a.jpg');
$p = $img.PropertyItems;
for($i=0; $i -lt $p.Count; $i++){
    '0x{0:X4}' -f $p[$i].Id;
    [Text.Encoding]::UTF8.GetString($p[$i].Value);
    #[Text.Encoding]::UNICODE.GetString($p[$i].Value);
}

echo 'Done';
[Console]::ReadKey();
复制代码

WHY

[void][Reflection.Assembly]::LoadWithPartialName('System.Drawing');
$srcDir = 'E:\IMG';        #原始照片的存放目录
$dstDir = 'E:\change';     #修改属性后照片的存放目录
If( ![IO.Directory]::Exists($dstDir) ){ $null = md $dstDir; }

dir $srcDir -Filter *.jpg | ?{$_ -is [IO.FileInfo]} | forEach{
    $img = [Drawing.Image]::FromFile($_.FullName);
    $p = $img.PropertyItems[0];
    $p.Id = 0x0131;        #属性-详细信息-程序名称
    $p.Type = 2;
    $p.Value = @(0x00);    #赋值为NULL
    $p.Len = $p.Value.Count;
    $img.SetPropertyItem($p);
    $img.Save($dstDir + '\' + $_.Name, [Drawing.Imaging.ImageFormat]::JPEG);
    $img.Dispose();
}

echo 'Done';
[Console]::ReadKey();
复制代码

thp2008

回复 5# WHY

感谢您的帮助，我测试了，可行。

如果我想对某个文件夹进行操作呢，可否帮我改一下，非常感谢！

WHY

假设需要删除属性“程序名称”的图片在 E:\IMG\a.jpg
删除“程序名称”后另存为 E:\IMG\b.jpg

[void][Reflection.Assembly]::LoadWithPartialName('System.Drawing');
$img = [Drawing.Image]::FromFile('E:\IMG\a.jpg');
$p = $img.PropertyItems[0];
$p.Id = 0x0131;    #0x0131=属性程序名称
$p.Type = 2;
$p.Value = @(0x00);   #赋值为 NULL
$p.Len = $p.Value.Count;
$img.SetPropertyItem($p);
$img.Save('E:\IMG\b.jpg', [Drawing.Imaging.ImageFormat]::JPEG);
echo 'Done';
[Console]::ReadKey();
复制代码

请参考：https://docs.microsoft.com/en-us ... ew=netframework-3.0

1152

回复 3# thp2008


    这个是需要权限的

thp2008

那VBS或者Powellshell之类，可不可以做到呢，或者第三方工具。

1152

这个批处理是做不到的。