こんにちわ。いつも、お世話になります。 下のコードを動かした場合に、 x = Getfileattr(UploadDirPath) でエラーがでます。 エラーの内容は、【F003 ファイルが見つかりません】です。 指定したUploadDirPath（\\notes01\somu\abc)にフォルダ はあります。 他のフォルダ（abc以外）を指定した場合には、値が取れます。 いったい何が、おかしいのか解りません。 どなたか、よろしくおねがいします。 -------------------------------------------------------- UploadDirPath = "\\notes01\somu\clip" SaveDirPath = "\\notes01\somu\clip.bk" 'フォルダがあるか確認 Dim x As Integer x = Getfileattr(UploadDirPath) --------------------------------------------------------