[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2005/01/24(Mon) 09:37
投稿者名:こう
URL :
タイトル:
dir()関数について
お世話になります。
dir()関数でフォルダ指定で存在の有無を検索しています。

Dim MyFile As String
Dim strPath as String

   strPath = "c:\a\aa.ini"

   MyFile = dir(StrPath, vbDirectory)

で存在チェックしています。
で strPath のパスには、"aa.ini"ファイルが存在しています。
引数にディレクトリの有無を指定しているのに
MyFile には、"aa.ini"が帰って来ます。
strPath のパスには、"aa.ini"のフォルダは存在しません。
存在しないので、MyFile には、""(文字列0)で帰って来ると思うのですが・・
どなたかご存知の方ご教授下さい。
宜しくお願い致します。m(_  _)m

投稿時間:2005/01/24(Mon) 10:57
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: dir()関数について
Dir 関数をヘルプで見れば解ると思うのですが、定数 vbDirectory 16 で
vbNormal 0 になっています。
dir(StrPath, vbDirectory) は dir(StrPath, vbNormal Or vbDirectory) を
指定した事と同じで StrPath にファイル名を指定しているので aa.ini が
帰ってきます。
ヘルプのDir 関数の使用例をご覧下さい。

ファイル操作関係は、FileSystemObject オブジェクトを使った方が便利です。

投稿時間:2005/01/24(Mon) 11:20
投稿者名:こう
URL :
タイトル:
Re^2: dir()関数について
ご回答有難う御座いました。m(_  _)m

GetAttr()関数で解決致しました。
有難う御座いました。

又何かありましたら、宜しくお願い致します。