另存为新名称
提前感谢我是这个论坛的新手我需要用相同的名称保存一个文件,但在名称的开头添加类似Plot_的内容,该名称也保存在旧版本中
问题:要查看在Civil3d 2010中创建的AutoCad 2010中的某些元素,我必须将文件保存在旧版本的AutoCad中。我将其保存为AutoCad 2000,它似乎可以工作。
因此,如果设计工程师可以保存他们的图纸,同时也可以保存一份同名的副本,但在DWGNAME前面有绘图
下面的操作有效,但保存的文件是硬编码的。
(vl load COM)
(vla SaveAs(vla get ActiveDocument(vlax get acad object))“test1.dwg”ac2000\u dwg)
如果我错了,请纠正我。不要笑(大声说:)
我要去拿DWGNAME
也许通过getvar
(setq名称(getvar“DWGNAME”))
(setq plot“plot_”)
把这些放在一起怎么样
并放入此代码中
(vl load COM)
(vla SaveAs(vla get ActiveDocument(vlax get acad object))“test1.dwg”ac2000\u dwg)
有人有完整的答案吗?
再次感谢
Lisp程序的新手 你几乎做到了,很好的一个:
(vl-load-COM)
(vla-SaveAs (vla-get-ActiveDocument
(vlax-get-acad-object))
(strcat (getvar "DWGPREFIX") "plot_" (getvar "DWGNAME"))
ac2000_dwg)
这太完美了。 非常感谢你
不用担心,大部分都是你做的
页:
[1]