本帖最后由 pcl_test 于 2016-12-25 14:54 编辑
直接保存为bat,跟exiv2放在一起运行即可
exiv2下载http://www.bathome.net/s/tool/index.html?key=exiv2- 1>1/* :
- @echo off& setlocal enabledelayedexpansion
- ::设置标记
- set "tab=花花"
- echo;%tab%|cscript -nologo -e:jscript "%~0"
- ::/s处理当前目录及其子目录的图片,去掉则只处理当前目录的图片
- for /f "delims=" %%a in ('dir /a-d /s /b *.jpg') do exiv2 -m $tab.txt "%%a"
- del $tab.txt
- echo;标记完成&ping -n 2 0 >nul&exit/b
- */
-
- //测试了下,exiv2 脚本文件需是无BOM的UTF-8编码
- var tab = WScript.StdIn.ReadLine();
- var strCharset = "utf-8";
- var stm1 = new ActiveXObject('ADODB.Stream');
- stm1.Mode = 3;
- stm1.Type = 2;
- stm1.Charset = strCharset;
- stm1.Open();
- stm1.WriteText("set Xmp.dc.subject "+tab);
- stm1.Position = 3;
- var stm2 = new ActiveXObject('ADODB.Stream');
- stm2.Mode = 3;
- stm2.Type = 1;
- stm2.Open();
- stm1.CopyTo(stm2);
- stm2.SaveToFile("$tab.txt",2);
复制代码
|