多个图形外部参照绑定lis
谁能帮帮我！我正在寻找一种可以打开、绑定外部参照、清除、审核、保存和关闭图形的lisp。
也许我很懒，但我需要对一个100多岁的人这样做。
当做
菲尔 菲尔，
我有一个vba，它将图形的所有外部参照绑定到与当前图形相同的目录中。这不涉及清理、审计等。虽然我应该能够根据需要对此进行修改，但可能无法立即执行，可能是明天或周末。
或者，我有一个脚本，您可以使用一个批处理文件来运行，该批处理文件将完成您要求的所有操作，同样，仅用于该目录中的图形，并且只执行qsave而不是saveas。
让我知道哪一个最好。
干杯 将下面的代码保存到名为IssueRoutine的文件中。球棒
更改C:\Program Files\AutoCAD Architecture 2008\acad。exe到acad exe的路径。
然后放置IssueRoutine。bat进入与图纸相同的目录。要运行例程，请双击IssueRoutine。球棒
在运行例程之前，请确保关闭所有CAD实例。
FOR %%V IN (*.DWG) DO START /W "c" "C:\Program Files\AutoCAD Architecture 2008\acad.exe" %%V /nologo /b "C:\IssueRoutine.scr"
FOR %%V IN (*.BAK) DO DEL %%V
将附加的脚本文件保存到C：\
下面是脚本文件的内容。
-purge
all
*
n
audit
y
-xref
b
*
-purge
all
*
n
audit
y
-layer
lock
*
zoom
Extents
tilemode
0
mview
l
on
all
pspace
zoom
extents
qsave
quit
如果您需要任何帮助或解释，请询问。
请注意，当脚本运行时，您的机器将无法使用，尽管处理100个图形可能需要一段时间，但它比手动处理要快得多，也不那么乏味。
干杯 整洁的常规，我绝对可以使用。我想知道qsave是否可以被saveas替换到另一个选择的目录中，但后来意识到，我还可以将所有图纸文件复制到另一个目录中，并运行此例程。
谢谢LElkins。
吉特
编辑：刚刚测试过，很有魅力。嗯，层被锁定了，我在脚本中检查了回来。 我不太懂吉特。这意味着可以吗？
如果你按照我贴出的指示去做，应该可以。如果有人有任何问题，请告诉我。
可以使用Lisp或VBA实现这一点，但通过使用脚本文件，这意味着您也可以将其与AutoCAD LT一起使用，而不仅仅是完整版本。
干杯
我不介意你分享VBA代码，我更像是一个VBA的Lisp的家伙；-）
TIA。
这应该是一个很好的开始，使VBA；
将文件复制到其他目录，将外部参照绑定到原始文件，缩放和清除原始文件，更改复制的文件中的某些属性等。（我在一家保存图纸的公司工作，所以这是我的日常工作）
没关系。我在五张纸的文件上运行了脚本。当我打开一个示例文件时，我发现所有层都被锁定，有点惊讶。然后我再次查看脚本，发现它是编码的。手动操作时，我从未考虑过锁定层。我现在看到了它的好处。
吉特
埃里克，
我现在只是更新vba代码，试图稍微整理一下，确保它相对健壮。我已经添加了将文件保存到指定目录以及缩放、清除、审核和锁定层的功能。还有一些调整要做，但我会尽快发布。
现在，我建议你使用我上面发布的脚本和bat。
干杯
听起来不错。我不需要直接使用脚本，目前项目规模不大，无法手工完成。我可以等你发布VBA代码。
层锁定确实是个好主意，我以前从未想过。（在我读到这篇文章之前）
再次TIA。 好啊附着的vba dvb执行您在发布图形时可能希望执行的任务。目前，这设置为仅适用于活动图形，尽管少量工作将允许多个文件。
使用该界面，用户可以选择要执行的例程。您可以：-
全部清除
审计
范围缩放
另存为或覆盖原始
绑定外部参照
锁定图层
锁定视口
目前这并不是特别可靠，我还没有在每个场景下对其进行测试。如果您遇到任何问题，请告诉我。
从zip中提取dvb文件。
如果有更多用户需要，请将dvb放置在服务器上您想要的任何位置。然后创建一个自定义按钮并添加宏
^C^C-vbarun；“dvb位置/准备。dvb！开始”；
其中，dvb位置是指向dvb文件的路径。确保在文件路径中使用/而不是\。
如果你有任何问题，请告诉我。
干杯
页:
[1]
2