[Sleipnir]SQliteOptimize Action

SQLiteOptimize.js

(function(){
	var VACUUM = true;

	var fso = new ActiveXObject("Scripting.FileSystemObject");
	var dbPath = sleipnir.UserFolder + 'database\\';

	var files = fso.GetFolder(dbPath).Files;
	for (var items = new Enumerator(files); !items.atEnd(); items.moveNext()) {
		var item = items.item();
		if (item.Name.match(/\.db$/)) {
			Optimize(item.Name);
		}
	}

	function Optimize(name) {
		name = name.replace(/\.db$/i, '');
		sleipnir.Status = 'Optimize ' + name + ' ...';
		var db = sleipnir.Database.Open(name);
		var q = 'REINDEX;';
		if (VACUUM) q += 'VACUUM;';
		db.Query(q);
		db = null;
		sleipnir.Status = 'Optimize ' + name + ' ... done.';
	}
})();