DIR関数で絶対パスを取得するには

PoH  2004-09-28 09:23:07  No: 85782  IP: [192.*.*.*]

VB6.0のSP5を使っています。

strDir = Dir("C:\WORK\TEST*.txt", vbNormal)

DIR関数に"C:\WORK\TEST*.txt"を渡して
"TEST*.text"と一致する
複数のファイルを取得しているのですが
ファイル名のみを現在は取得しています。

これをファイルの絶対パスで取得したいのですが
そのような方法、
または絶対パスを取得するDir関数の引数
といったものはあるのでしょうか？

ご存知でしたらご教授ください

編集 削除
いちゆ  2004-09-28 09:49:51  No: 85783  IP: [192.*.*.*]

まー、簡単に解決するなら。

sDIR="C:\WORK\"
strDir=Dir(sDIR+"TEST*.txt",vbNormal)

として、ディレクトリ情報は自分で管理するのが一番かと。

編集 削除
PoH  2004-09-28 10:02:59  No: 85784  IP: [192.*.*.*]

いちゆさんありがとうございます。

ディレクトリが変動する為
後ろから見て最初に見つかる¥までの文字数とって
後ろ削ったディレクトリを変数で管理して
と、スマートではない関数が出来上がってますが
今はそのようにやっています。

やはりDIR関数にそのようなものは無いのでしょうかねぇ

他に方法をご存知でしたら
どなたか御教えいただけますでしょうか。

よろしくお願いいたします

編集 削除
nanashi  2004-09-28 10:38:37  No: 85785  IP: [192.*.*.*]

FileSystemObjectを使えば出来るんじゃないかなァ（未確認）。

編集 削除
issan  2004-09-29 09:49:08  No: 85786  IP: [192.*.*.*]

ＡＰＩ関数でよければ・・・。

『GprcGetFileDirectory』という関数を使用すると絶対パスの取得は可能です。
使用方法は、関数名でGoogle等で調べるとたくさん出てきますよ！

編集 削除
あん  2004-09-29 11:55:34  No: 85787  IP: [192.*.*.*]

ＬＩＳＴＢＯＸを使うとか

編集 削除
あん  2004-09-29 11:56:26  No: 85788  IP: [192.*.*.*]

ＤＩＲＬＩＳＴＢＯＸを使うとか

編集 削除