(defun C:mypu ()
(vl-Load-Com)
(vl-Catch-All-Apply
‘(lambda ()
(vla-Remove
   (vla-GetExtensionDictionary
   (vla-Get-Layers
   (vla-Get-ActiveDocument
   (vlax-Get-Acad-Object)
   )
   )
   )
   “ACAD_LAYERFILTERS”
)
)
)
(command “_.PURGE” “a” “*” “N”)
(princ “\n所有图层过滤器已经被删除。”)(princ)
)

将上面代码复制到文本文件中区，另存为li.lsp，进入cad用lispload或者直接加载

加载完毕后使用 mypu命令即可使用，mapgis转成的dwg文件一般都比较大，你不妨试试！