每张图一个文件，但要求能够批量处理的程序
我院的文件大部分为A3，并且图框样式一致，见附件，根据每个项目的不同，要求一次能够换一个目录下所有图形的图框，用mjtd里的autom8能够处理。很好用。现有以下问题需要解决：
1、每图的图名不变，但图号要随项目变化，能否编一辅助命令使该文件夹下每张图按一定规律生成图号；如生成TH-01,TH-02,TH-03……
2、将一文件夹下所有*.dwg文件图名图号抓出生成txt文件，自动生成目录
用dir来处理你第二个问题! 用dir仅能将文件名生成*.txt文件，且无图号。
但文件名同图名并不一样，且目录中图名与图号要一致。 我也遇到过类似的问题，每次需要处理好几百张图纸，填写图号并生成Excel格式的目录，是用VBA做的，思路是这样的:
引用Excel.Application(当然你想写成文本文件就可以省掉这一步了）
先用CommonDialog选择需要处理的dwg，然后进行遍历，
把需要处理的工作单独写一个函数,每次都调用一下，需要填写的内容就可以做为参数传过去，
当时也是刚开始学，对图纸处理部分用的是SendCommand方法将需要填写的内容逐一发送过去，实际上只要知道相关的AutoCAD命令如何用就可以了，程序加在一起大概一百行都不到吧。
求人不如求已，我一直是这么想的。兄弟，如果你在用2000以上的版本的话，随便找本讲AutoCAD VBA的书看一个礼拜怎么也就编出来的了，而且完成第一个程序以后，你就会对整个AutoCAD有着更进一步的认识，加油！ chdxllll发表于2003-8-8 20:55:00static/image/common/back.gif每张图一个文件，但要求能够批量处理的程序
我院的文件大部分为A3，并且图框样式一致，见附件，根据每个项目的不同，要求一次能够换一个目录下所有图形的图框，用mjtd里的autom8能够处理。很好
一点建议:
图框用属性块.至于是什么样的属性块,自己按需要定制.
用一个小小的lsp来读这些属性值.就可以实现你说的要求. 我还不会vba,555
页:
[1]