*[PPx]スクリプトメモ UltraISO

・ISO<>ISZ相互変換

//!*script
// ISO<>ISZ相互変換ルーチン Ver 1.0
// 使用プログラム:"C:\Program Files (x86)\UltraISO\UltraISO.exe"
// ============================================================
//^変数宣言
var cPath	= '';	// カーソル位置ファイルパス
var cFile	= '';	// カーソル位置ファイル
var cExt	= '';	// カーソル位置ファイル拡張子
var command	= '';	// PPxコマンドワーク
var WSHObj	= '';	// シェルオブジェクト
var RetCD	= '';	// 戻り値

// 削除済みエントリは無条件抜け
if (PPx.EntryState == 1) {
	PPx.Quit();
}

// カーソル位置エントリ取得
cPath   = PPx.Extract('%FDN%\\');
cFile   = PPx.Extract('%R');
cExt	= PPx.Extract('%t');

// 拡張子判定
command	= '"C:\\Program Files (x86)\\UltraISO\\UltraISO.exe"';
switch (cExt.toLowerCase()) {
	case 'iso':
		command = command + ' -bin2isz "' + cPath + cFile + '" -compress 6';
		break;
	case 'isz':
		command = command + ' -bin2iso "' + cPath + cFile + '"';
		break;
	default:
		PPx.Quit(-1);
		break;
}

// UltraISO起動
//PPx.Echo(command);
WSHObj	= new ActiveXObject('WScript.Shell');
RetCD	= WSHObj.Run(command,0,true);

// 後処理
//PPx.Echo(RetCD);
WSHObj = '';
PPx.Quit();

・ISOファイルの一部更新

//!*script
// ISOファイル 置き換えルーチン Ver 1.2
// 使用プログラム:"C:\Program Files (x86)\UltraISO\UltraISO.exe"
// ============================================================
//^変数宣言
var cPath    = '';    // カーソル位置ファイルパス
var cFile    = '';    // カーソル位置ファイル
var cExt     = '';    // カーソル位置ファイル拡張子
var command  = '';    // PPxコマンドワーク
var FSOObj   = '';    // ファイルシステムオブジェクト
var WSHObj   = '';    // シェルオブジェクト
var RetCD    = '';    // 戻り値

// 削除済みエントリは無条件抜け
if (PPx.EntryState == 1) {
	PPx.Quit();
}

// カーソル位置エントリ取得
cPath   = PPx.Extract('%FDN%\\');
cFile   = PPx.Extract('%R');
cExt	= PPx.Extract('%t');

// 拡張子判定
switch (cExt.toLowerCase()) {
	case 'iso':
		break;
	default:
		PPx.Quit(-1);
		break;
}

// ファイルチェック
FSOObj	= new ActiveXObject('Scripting.FileSystemObject');
if (!FSOObj.FileExists(cPath + 'BACKUP.DAT')) {
	PPx.Quit(-1);
}
FSOObj	= '';


// UltraISO起動
command	= '"C:\\Program Files (x86)\\UltraISO\\UltraISO.exe"'
		+ ' -in "'+ cPath + cFile + '"'
		+ ' -chdir /BACKUP'
		+ ' -f "'+ cPath + 'BACKUP.DAT"';

//PPx.Echo(command);
WSHObj	= new ActiveXObject('WScript.Shell');
RetCD	= WSHObj.Run(command,0,true);

// 後処理
//PPx.Echo(RetCD);
WSHObj = '';
PPx.Quit();