投稿日 | : 2006/03/06(Mon) 10:25 |
投稿者 | : Blue |
Eメール | : |
URL | : |
タイトル | : Re: 解決 |
ちなみに存在するファイルパスであれば、Dir関数で取れます。
Filename = Dir(FilePath)
> FileSystemObjectオブジェクトのGetFileNameメソッドを使うと簡単に取得できます。
Filename = CreateObject("Scripting.FileSystemObject").GetFileName(FilePath)
> 文字列操作でもやろうと思えばできますけど。
Filename = Mid(FilePath, InStrRev(FilePath, "\") + 1)
> 一番簡単だ
の基準がわからない。文字列操作(InStrRev+Mid)がいちばん簡明だと思うんだけど。
(Splitは一見簡単そうに見えるけど、無駄なところが多い。)