画像最適化スクリプト

2020-06-14

Windows PC スクリプト

var WsArg = WScript.Arguments;
if ( WsArg.Count() == 0 ) WScript.Quit();
var fs = new ActiveXObject( "Scripting.FileSystemObject" );
var ws = new ActiveXObject("WScript.Shell");

var infiles = "";
for (i = 0; i < WsArg.Count(); i++) {
    var infile = WsArg(i);
    var ext = fs.GetExtensionName(infile);
    var infile2 = infile.replace(ext, "jpg");
    if (ext.match(/(jpg)/i)) {
        infiles = infiles + " \"" + infile + "\"";
    } else if (ext.match(/(jpeg)/i)) {
        fs.MoveFile(infile, infile2);
        infiles = infiles + " \"" + infile2 + "\"";
    } else if (ext.match(/(png)|(bmp)/i)) {
        var op = "\"" + infile + "\" /convert=\"" + infile2 + "\"";
        var app  = 【i_view64.exeのパス】;
        ws.run(app + " " + op, 0, true);
        infiles = infiles + " \"" + infile2 + "\"";
    }
}

var app1  = 【jpegoptim.exeのパス】;
var op1 = infiles + " -q --strip-all --max=85 --all-progressive";
ws.run(app1 + " " + op1, 0, true);

ws = null;
fs = null;