save my dwg to D:My Folder

[Michaels]

Hello,

How to save my dwg to the drive D and to specific folder . for example called My Folder.

(setq Fname (getstring T "\n new file name :"))
(setq x (strcat "D:\\My Folder\\" Fname ".dwg"))

Why the above file path is not working ?

Thanks

[Lee Mac]

Does 'My Folder' exist?

[JohnM]

please post the rest of the code so we can see what's going on

[Michaels]

Yes Lee the "My Folder" is already made or existed in drive D.

Mr Johnm. Here are the codes nothings more than that up to this moment .

(if (and (setq Fname (getstring T "\n new file name :"))
         (setq x (strcat "D:\\My Folder\\" Fname ".dwg"))
	 )
(command "_.save" x)
(princ)
  )

By Mr Lee 's question, Is it possible also to create a folder before save the dwg and include it within ?

many thanks for you all.

[Lee Mac]

Perhaps something like this...

(defun c:test ( / dir file )

  (setq dir "D:\\My Folder")

  (vl-mkdir dir)

  (if (and (vl-file-directory-p dir)
           (snvalid (setq file (getstring t "\nEnter Filename: ")))
      )
    (vla-saveas (vla-get-ActiveDocument (vlax-get-acad-object))
      (strcat dir "\\" file ".dwg")
    )
  )

  (princ)
)

[Michaels]

Perhaps something like this...

(defun c:test ( / dir file )
  (setq dir "D:\\My Folder")
  (vl-mkdir dir)
  (if (and (vl-file-directory-p dir)
           (snvalid (setq file (getstring t "\nEnter Filename: ")))
      )
    (vla-saveas (vla-get-ActiveDocument (vlax-get-acad-object))
      (strcat dir "\\" file)
    ))
  (princ))

What a great work Lee.

That's really amazing and wonderful.

one question please about (snvalid). I've read about it but I couldn't understand it well ?

Thank you so much.

Michaels

[Lee Mac]

Thanks Michaels

snvalid checks whether the string is valid for use as a symbol table name, hence it checks for characters such as /\?*" etc - the help files document it better.

(BTW, I updated the code above to include the .dwg extension)

[Michaels]

(BTW, I updated the code above to include the .dwg extension)

That's right. The first code that you posted before post 5 and re update it within the same reply , it did not work because it was (saveas) and I tried it with (save) command only and it was as great as the the last undated one.

Thank you so much Lee.

[Tiger]

Further on Lee's teaching career see This Thread.