ファイルの存在を確認する 


ファイルがあるかないか確認するときに便利です。
         
Dim FileName As String
Dim fs

Set fs = CreateObject("Scripting.FileSystemObject")

If fs.FileExists(FileName) = True Then
  'ファイルが存在する
 Else
  '存在しない
End If
Infomation Title :ファイルの存在を確認する 2000 10/31
作成者 : Manabu
環境 : VisualBasic 6.0 , InternetExplorer5.0 , Windows98

1999-2000 Copyright(C) Manabu
1999-00 Manabuの部屋 http://www.manabu.uni.cc/
この文章の無断転際を禁じます

Gポイントポイ活 Amazon Yahoo 楽天

無料ホームページ 楽天モバイル[UNLIMITが今なら1円] 海外格安航空券 海外旅行保険が無料!