2006
12.13

VBでファイルのフルパス名からファイル名とパスを分割する方法がやっとわかりました~

プログラム VB

疲れた脳みそには、だれかがWeb上に書き残してくれたプログラムのコードは非常にありがたく思えます。
ついついそのまま使ってしまって・・・
・・・ん? あれ?
書いてあるとおりに動かない・・・
まあよくある話です。
サンプルコードなんて所詮そんな物。
ちょっといじればなんとかなるだろうと思っていたのに、何ともならないこともあるんですね~
フルパス+ファイル名の文字列を、パスとファイル名に分割したかったんですけど、自分で考えたくなくて楽する方法をさがしてました。
何種類かのサンプルを試した結果、結局FileSystemObjectで・・・
Dim hFso As FileSystemObject
Dim sFileName As String ’パス
Dim sFilePath As String ’ファイル名
Set hFso = New FileSystemObject
sFilePath = hFso.GetParentFolderName(“分割したいファイルのフルパス文字列”)
sFileName = hFso.GetFileName(“分割したいファイルのフルパス文字列”)
とすれば、分割できました。
なんだ。
ただし、存在しているファイルに限られます。
これからこのファイルを作る・・・なんて時には役にたちません。
あらかじめ、FileExistsで存在確認しておきましょう。

コメントは利用できません