VB6でZIPファイル解凍後に解凍したファイルを削除すには?

解決


のり  2014-04-07 23:50:51  No: 103475  IP: [192.*.*.*]

VB6でUnZip32.DLLを使い解凍してできたフォルダを、別フォルダへコピー後、解凍してできたフォルダを削除したいのですが、VB6がフォルダをつかんだ状態になり、VB6を終了させない限り削除できません。
何か良い方法はないでしょうか?

編集 削除
のり  2014-04-08 00:12:27  No: 103476  IP: [192.*.*.*]

質問者です。
実際には、C:\xxx_new\yyy.zipを解凍し、C:\abc_new\yyy\zzz.jarができ、
FileSystemObjectを使ってzzz.jarを別フォルダへコピーしたあと、
C:\xxx_newフォルダを削除(DeleteFolder("C:\xxx_new"))しようとしているのですが、
プログラム終了後、空のC:\xxx_newフォルダが残ってしまう状態です。

編集 削除
魔界の仮面弁士  2014-04-08 03:43:19  No: 103477  IP: [192.*.*.*]

作業ディレクトリが、カレントディレクトリになってしまっているためだと思います。
カレントディレクトリの変更のため、App.Path に向かって、
ChDrive と ChDir を実施してみては如何でしょうか。

編集 削除
のり  2014-04-12 20:44:21  No: 103478  IP: [192.*.*.*]

ご回答ありがとうございます。
プログラム内ではすべてC:\からのフルパスで処理しており、プログラム内でカレントパスの変更はしていません。
本日、実行したところ問題なく削除されるようになっていました。
原因は不明なままですが解決しました。お騒がせしてすみませんでした。

編集 削除