返回列表 发帖
本帖最后由 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);COPY
1

评分人数

TOP

返回列表