<?xml version="1.0" encoding="shift_jis" ?>
<job>
<script language="JScript">
<![CDATA[
/********************************************************
*
* WebClass 用 zip 生成プログラム
*
* Copyright (c) 2009 AOK. All Rights Reserved.
*
********************************************************/
var dir = ".\\html"; /* html 置き場 */
var tmp = ".\\temp"; /* 一時ディレクトリ */
var lnm = dir + "\\list.csv"; /* リストファイル名 */
var znm = "new.zip"; /* 生成ファイル名 */
/********************************************************
*
* 以下は触らないように!
*
********************************************************/
var bin = ".\\zip.vbs\\MakeExZIP.VBS";
var fso = new ActiveXObject("Scripting.FileSystemObject");
var shell = new ActiveXObject("WScript.Shell");
/********************************************************
*
* 個別 zip の作成
*
********************************************************/
fso.DeleteFile(tmp + '\\*.*');
var files = fso.GetFolder(dir).files;
var fc = new Enumerator(files);
for (; !fc.atEnd(); fc.moveNext()) {
var s = '' + fc.item();
if (s.match(/((\w+)\.(?:htm|html))$/)) {
var m1 = dir + '\\' + RegExp.$1;
var m2 = dir + '\\' + RegExp.$2 + '.files';
var zp = tmp + '\\' + RegExp.$2 + '.zip';
if (fso.FolderExists(m2))
shell.Run(bin + ' ' + zp + ' ' + m1 + ' ' + m2, 0, true);
else
shell.Run(bin + ' ' + zp + ' ' + m1, 0, true);
}
}
/********************************************************
*
* 最終 zip の作成
*
********************************************************/
if (fso.FileExists(znm)) fso.DeleteFile(znm);
var zips = fso.GetFolder(tmp).files;
var zc = new Enumerator(zips);
var list = new Array();
for (; !zc.atEnd(); zc.moveNext()) {
var s = '' + zc.item();
if (s.match(/(\w+\.zip)$/))
list.push(tmp + '\\' + RegExp.$1);
}
shell.Run(bin + ' ' + znm + ' ' + list.join(' ') + ' ' + lnm, 0, true);
/********************************************************
*
* 完了報告
*
********************************************************/
WScript.Echo('complete !');
]]>
</script>
</job> |