AutoCAD使用脚本获取文件名

使用Diesel

插入MTEXT，内容     %<\AcVar dwgname>%

对内容进行处理如     AAAAA-NNNNN-AA-ABNNN 文件名.dwg

取第二部分NNNNN     %<\AcDiesel $(substr,$(getvar,dwgname),7,5)>%

取文件名     %<\AcDiesel $(substr,$(getvar,dwgname),22,$(-,$(strlen,$(getvar,dwgname)),25))>%

取文件名前面的部分     %<\AcDiesel $(substr,$(getvar,dwgname),1,20)>%

Field是否自动更新需要设置FIELDEVAL

类型:	整数
保存位置:	图形
初始值:	31

系统将使用下列位码值之和将该设置存储为一个位码：

0