2017年11月
      1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30    
無料ブログはココログ

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