ヘッダーイメージ 本文へジャンプ
日記

2013年01月07日 21時47分
VBS で ZIP圧縮してみる
Windows の バッチでZIP圧縮をする必要が出たので、ちょっと調べてみました

GUIでZIP圧縮できるので、バッチでもできるだろうと思っていたのですが
残念ながら、標準のコマンドにはZIP圧縮はできないようです

できれば圧縮用のソフトは入れたくなかったので、VBスクリプトでやってみようと思います

http://www.csml.org/download/model/modelzipper/zip/ZIP.TXT こんなのを見つけました

一つ上のディレクトリーにVBスクリプトがあるようです

試したのは MakeExZIP.VBS ですがどうも Windows7 ではうまく動きません
ie の起動とかしてますが、そこらへんでエラーになります
また、圧縮ファイルの中のデータを置き換えるとき、ダイアログが出るので、カット&ペーストで外に出すようなコーディングになっていますがどうも CUT が期待通りに動かないみたいです

もともとコメントになっている、MoveHere の方にするとちゃんと動きました・・・

日付が2008年なんで XP とかだと元のままで動くのでしょうか?

Windows7 上で動くように修正したものを置いておきます

ただし、置き換えはZIPファイルの中のデータを一旦削除してから、新しいファイルを圧縮するのでフォルダーを圧縮したときの挙動はGUIで行う場合の動きと違いますのでご注意ください

ファイル操作のプロパティーやメソッドはここのサイトがサンプル等も豊富でわかりやすかったです



・VB の DataGridView
・VBScript の CreateObject
・VBS で ZIP圧縮してみる
・VISTAのタスクが動かない
・Windows2008 のタスクが動かない
・.NET の WebClient の接続が遅い


カテゴリー:日記
目次へ戻る


フッターイメージ