VBでftpの送信プログラムを作っているのですが・・・

今、エラーの処理をしているのですが、拡張子が「ok」のものを探すため、.Execute "DIR *.ok"を宣言しました。

ファイルがあるときはもちろん正常に動くのですが、万が一ファイルがない場合に宣言を走らせてしまったときの
エラーの対処を考えています。
ファイルがない場合は何かエラーがでるのでしょうか？
私が調べるかぎりではわかりません・・・。
実行時エラーは避けたいとでわかるかた、よろしくお願いします。

No.3 ベストアンサー 回答者： tsukasa-12r 回答日時： 2004/03/10 10:51

＞Inetコントロールのメソッドです。

あぁ、なるほど。理解できました。
"*.ok" が存在しなくても、.Execute 実行時に実行時エラーは発生しないようですね。
VB のヘルプによると、DIR コマンドに関して、
＞この一覧データを取得するには、GetChunk メソッドを使用します。
と書かれているので、GetChunk を使用すれば、"*.ok" が存在するかしないかわかると思います。

この回答へのお礼

ありがとうございます！
やはりエラーは出ないんですね・・・。
ただ、エラーがでなくても返答にすごく時間がかかるので、実際プログラムが動いているかどうか
不安になると思うんです。
Inetコントロールに「RequestTimeout」というのがありました。
これで、タイムアウトの時間を設定して早く返答が帰ってくるようにしようと思っています。

お礼日時：2004/03/16 15:27

No.2 回答者： tsukasa-12r 回答日時： 2004/03/09 21:40

＞.Execute "DIR *.ok"

.Execute って何のオブジェクトのメソッドでしすか？
何にしろ、.Execute は "DIR *.ok" が実行できたかどうかは返すかもしれませんが、"DIR .ok" の結果までは返さないように思います。
VB に DIR 関数があるので、
If Dir("*.ok") <> "" Then
'ファイルが存在する場合
...
Else
'ファイルが存在しない場合
...
End If
のようにされるといいんじゃないでしょうか。

この回答への補足

>.Execute って何のオブジェクトのメソッドでしすか？
Inetコントロールのメソッドです。
FTPでファイルを送信するので、Inetを使用しています。

補足日時：2004/03/10 00:15

No.1 回答者： Traja 回答日時： 2004/03/09 20:51

>拡張子が「ok」のものを探すため、.Execute "DIR *.ok"を宣言しました

これが妥当かどうかは、別として。

>ファイルがない場合は何かエラーがでるのでしょうか？
実行してみれば、どのようなエラーが発生するか確認出来ませんか？(調べて分からなければ)

>実行時エラーは避けたいとでわかるかた？
実行時エラーを避ける。
On Error　文はご存じですか？

そう言う意味ではないのかな？

この回答への補足

お返事ありがとうございます。
実行してみたのですが、エラーがでないのです。
実行している時間はすごくかかるのですが、知らない間に終了しているという感じです。

>実行時エラーは避けたいとでわかるかた？
すみません・・・
実行時エラーは避けたいのでわかるかた　　　でした・・・。
On　Errorはしているのですが、どうもエラーが返ってきません・・・。

補足日時：2004/03/09 20:55