投稿者 アリー  (社会人) 投稿日時 2009/9/25 19:04:44
お世話になります。
開発環境はOS:Win2000、VB6.0です。

ファイルシステムオブジェクトを使用してファイルのコピーをしているのですが、
「ファイルが見つかりません」のエラーが出ます。(Err.Number=53)

ファイル名が長いのが原因だと思われるのですが、255文字にも達していないので
なぜこのようなエラーになるのかが分かりません。

以下、具体的に。
Private fso As New Scripting.FileSystemObject
If fso.FileExists("\\99.9.9.999\kyoyu\AKI テス\テス部でのコピー機(コピー用紙)の主に、受付事務の請求業務時、報告書のFAX時、テスト業務での対診表、手術例切り出し図の印刷など") = False Then
  MsgBox "何で?"
End If

ちなみにfso.FileExists(○○)の○○ファイルは確実に存在します。
普通にこのファイルをコピペ(右クリックコピー→貼り付け)しようとしてもコピーエラーになります。
ファイル名の変更をしようとしてもエラーになります。

詳しい原因と対処方法が分かりましたら
ご教授お願いいたします。

以上