remove blanks

Hello,

I'm sure someone must have a little routine for removing blanks from the
drawing name.

I have some software that uses the drawing name in a DOS Batch file

Which chokes if there is blanks

Its been a while since i did any lisping

here is my attempt

(defun dn ()
(setq dn (getvar "dwgname") dnl (strlen dn) x dnl )
(while (> 0 x)

(if (= (substr dn x) " ")
(progn
(setq a (substr dn 1 (- x 1)))
(setq b (substr dn (+1 x) (strlen dnl)))
(setq dn (strcat a "_" b))
)
)
(setq x (- x 1))
)
(princ dn)
)

any suggestions appreciated. obviously the above doesnt work

thanks in advance

jm

 

You should have no problems if you place double
quotes around filenames in the batch file.



AutoCAD based Security Planning Solutions:
http://www.caddzone.com/securityplanning

 

I suggest you get a utility to 'rename' the .dwg's.
Check out: www.renamewiz.com
I use it and it's great.

Bob

 

John

try this one. I didnt test it but i hope its not to fare away.
Another posipility is not to remove the blanks but to enclose the whole dwgname with parantheses. This works normally in DOS batches.

bob.at

(defun rem_blank ( / dn x dnl dn_new)
(setq dn (getvar "dwgname") dnl (strlen dn) x 0)
(setq dn_new nil)
(while (< x dnl)
(if (= (substr dn x 1) " ")
(setq dn_new (strcat dn_new "_"))
(setq dn_new (strcat dn_new (substr dn x 1)))
)
(setq x (1+ x))
)
dn_new
)

 

Pardon me for asking, but what's the point - trying to use Lisp to 'modify' the drawing name ? You cannot use the resultant as a 'new' drawing name - to open ? Therefore, the only thing it would be useful for is to open the drawing, make up a 'new' name, and follow up with a saveas ?
Unless I am missing something..

Bob

 

Command: (setq no_spaces "take these spaces away")
"take these spaces away"

Command: (while (vl-string-search " " no_spaces) (setq no_spaces
(vl-string-subst "_" " " no_spaces)))
"take_these_spaces_away"

 

that is awesome
thanks everyone
bob the batch program copies plot files to a particular plot cue and needs
to either rename the plot files or put quotes, etc
all good suggestions i should have thought of

been a long time since i did much with bat files either

thanks again