splitpath

Does anyone know of the existance of a command to split the path of a
path+filename.

I have for example;

"H:\\HE\\0000\\0001\\VO\\BK\\0001_VO-BK-002.dwg"

And want;

"H:\\HE\\0000\\0001\\VO\\BK\\"

and

"0001_VO-BK-002.dwg"

ofcourse strlen varies!

MJ

 

To get just the path:
(GETVAR "DWGPREFIX")

To get just the filename:
(GETVAR "DWGNAME")



Dave

 

That I know.

But i'ts not what i mean. I obtained the path a different way.

I explicitly need to split the path in the textstring.

M

 

Hi Marcel,

You might try DOSLib's dos_splitpath function.
www.mcneel.com/doslib

 

Oh. Well in that case, do a VL-STRING-SEARCH for the \\ until you can't find any more and then grab the rest of the string from that point with a SUBSTR.


Dave

 

I knew there was something like this. Just wasn't looking at the right
place.
Thanx!

 

Like this:

(defun path-split (path)
(setq temp_path path
final_pos 1
)
(while (setq pos (vl-string-search "\\" temp_path))
(setq temp_path (substr temp_path (+ pos 2)))
(setq final_pos (+ final_pos (+ pos 1)))
)
(setq the_name (substr path final_pos))
(setq the_path (substr path 1 (- (strlen path)(strlen the_name))))
)



Dave

 

(defun splitpath (filespec)
(setq
filepath (strcat (vl-filename-directory filespec) "\\")
filename (strcat (vl-filename-base filespec) (vl-filename-extension
filespec))
)
(princ (strcat "\nFile Path = " filepath "\nFilename = " filename))
(princ)
)

 

why not use the built in function FNSPLITL ~ (fnsplitl (getvar "dwgname")) ~ why make things complicated ?




www.resourcecad.com

 

I agree!
This one is just as usefull, only doesn't split the drivemapping.
Dos_splitpath does.