圧縮中にエラーダイアログが出ないようにしたい

質問

以下がどうしても出来ません・・・

[処理内容]
複数CSVファイルを出力して、
その複数CSVを一つのzipファイルにして終了。

やりたいけど、出来ないこと・・・↓
・圧縮中にエラーメッセージのダイアログが上がる場合があって、
　その「OK」ボタンを押さないと次へ進まない。
　⇒エラーメッセージでないようにしたい。
・圧縮処理が全て完了してからアプリを終了させたい。

どなたかご親切な方、ご教授願います・・・！

回答No.4

K-Sogacchi

ANo.3です。
すみません、既にエラーメッセージの件は書かれてましたね（汗）
失礼しました。
でもあれじゃ、確かに何が起こっているのかサッパリですね…

回答No.3

K-Sogacchi

ちょっと調べてみましたが、
Set ??? = CreateObject("Shell.Application")
でシェルの（？）機能を使用してZip圧縮を実現されているようですね。
XP以降ならZipを扱う機能があるようですし。

…と なると、エラーを出しているのは あくまでシェルなので、
書庫オブジェクト（恐らくNameSpaceで定義しているオブジェクト）に
エラーメッセージを出さないようにする機能が無いのであれば、
基本的には出さないようにするのは厳しいかと思います。
Windowsメッセージをフックする等して（？）強制的に外部から介入できれば
何とかなるかもしれませんが…その辺は私も詳しくないですし、ちょっと危険な薫りがします（苦笑）。
あと、「根本的にZip圧縮が出来ない」本当のエラーとなる状態の時には
下手な事はやるべきではない気も しますので、そういう意味でも
エラーメッセージを出さなくするのは危険な気がします。
書庫オブジェクトにエラーメッセージを出さなくする機能があるかどうかは…
私がちょっと調べた程度では分かりませんでした。
フリーで配布されている圧縮DLL系でエラーを出さなくする機能が実装されているのであれば、
そちらを使用した方が早いかもしれません。
（そちらについては全く調べていません。ご容赦を）

あと、エラーメッセージって、どんなのが出るんでしょう？
ちょっと気になります。
（エラーと言うより警告？）

お礼

色々とご丁寧にご回答ありがとうございます。
感謝！です。

やはり、エラーを無視してゴリ押しするのは
危険な香りがしますよねえ・・・。

別の手段で対応してみることにします！
ありがとうございました！

回答No.2

imogasi

>Shell.Applicationを使用しています。
これはプログラムを動かす方式だと思う。
答えとしては、ソフト名を聞いているのに、これでは肩透かし。
エラーメッセージも
＞タイトル　：圧縮（zip形式）フォルダエラー
メッセージ：出力ファイルを作成できません。
しか出てなければ、質問者のレベルではわかりっこないと思う。
その圧縮ソフトを特別に勉強し（しかし勉強する情報はそう無いだろう。そのソフトのreadmetextでも読んで見るしかない。）
CSVファイルのデータ状況からエラー原因を割り出すぐらいの力が無いと本件解決は難しいでしょう。別の圧縮ソフトでエラーが丁寧に出るものを探すとか。

補足

ご回答ありがとうございます。

こちらの表現が悪かったのですが、
ソフトを使わなくとも、Shell.Application で圧縮処理は可能ですので、
そのように書かせていただきました。

また、ダイアログについても、本当にそれしか表示されないものですから。。

気を悪くされたなら申し訳ないです。

回答No.1

OKapple

エラーメッセージが出るということは、無視できない問題があることをアプリが報告してくれているということです。
その問題の原因を取り除かないと、エラーメッセージが出ないようには出来ません。

まず、お使いになっている圧縮ソフトの名前（出来ればバージョンも）と、エラーメッセージのダイアログの内容を教えてください。

補足

ご回答ありがとうございます。
圧縮は、Shell.Applicationを使用しています。

ダイアログメッセージは以下です。

タイトル　：圧縮（zip形式）フォルダエラー
メッセージ：出力ファイルを作成できません。

ちなみに、エラーダイアログを押下すると処理はそのまま進み、
ファイルの吐き出しがされます。