« ZIPファイルの中身を一覧するバッチファイル | トップページ | タスクスケジューラやショートカットから非表示で起動されるバッチファイル »

2007年4月13日 (金)

空のZIPファイルを新規作成するバッチファイル

NewZIP.CMD [ZIPファイル名]

@if(0)==(0) ECHO OFF
CScript.exe //NoLogo //E:JScript "%~f0" %*
GOTO :EOF
@end
var Usage="Usage: NewZIP.CMD [ZIPfile]";
if(WScript.Arguments.Count()>1){
  WScript.Echo(Usage);
  WScript.Quit();
}
var fso=new ActiveXObject("Scripting.FileSystemObject");
if(WScript.Arguments.Count()==1){
  var ZIPfile=WScript.Arguments.Item(0);
}else{
  var ZIPfile="新規圧縮 (zip 形式) フォルダ.zip";
}
if(fso.GetExtensionName(ZIPfile).toUpperCase()!="ZIP"){
  WScript.Echo("Invalid Extension Name -",ZIPfile);
  WScript.Quit();
}
if(fso.FileExists(ZIPfile)){
  WScript.Echo("Already exsists. -",ZIPfile);
}else{
  var File=fso.CreateTextFile(ZIPfile,false);
  File.Write("PK" + String.fromCharCode(5,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0));
  File.Close();
}
WScript.Quit();

« ZIPファイルの中身を一覧するバッチファイル | トップページ | タスクスケジューラやショートカットから非表示で起動されるバッチファイル »