CAD lisp怎嘛获取用户temp路径？

Question

想存临时文件，不知道怎嘛确定临时文件夹路径，下次命令就可以读取临时文件里面的数据作为默认值，就省些时间了

Answer 1

;;;获取AUTOCAD临时文件夹路径;
(defun Example_TempFilePath ()
(VL-LOAD-COM)
(setq AcadObject
(vlax-get-acad-object)
AcadDocument (vla-get-ActiveDocument
AcadObject)
mSpace (vla-get-ModelSpace
AcadDocument)
)
(setq preferenceSel (vla-get-Preferences
AcadObject))
(setq fileSel (vla-get-Files
preferenceSel))
(setq currTempFilePath
(vla-get-TempFilePath fileSel))
(princ "TempFilePath的当前值为:")
(princ currTempFilePath)
)

;;;采纳吧...................................

Answer 2

用getfiled 和 open 和 closed这三个函数

Answer 3

按alt不动 寻找子文件夹

追问

大哥谢了，我要的是怎么获取路径（setq tmp （%temp%））%temp%应该怎么获取？

Answer 4

(setq temp-folder (getenv "TEMP"))
(princ (strcat "系统临时文件夹路径：" temp-folder))