- 相關(guān)推薦
cad病毒解決方案
在這個病毒四溢的年代，cad也出現(xiàn)了病毒，再被它們折磨到崩潰的時候(死機(jī)，存圖顯示輸入路徑，各種鍵盤失靈，詭異退出，黨不會虧待你等等爛七八糟的病毒)，下面小編寫下了這段代碼。希望給辛苦加班的cad同志們以幫助。減輕你們的痛苦(重裝，格機(jī)，丟圖)
功能：
1、打開文件時自動刪除文件夾下的所有病毒。
2、CAD啟動時命令行提示“錯誤: 參數(shù)類型錯誤: stringp nil"永遠(yuǎn)消失。(只顯示加載項及是由哪個版本的cad，創(chuàng)建的有效的文件等等)
注意事項
經(jīng)過一年多的實踐，我的機(jī)器已有效的控制了病毒的蔓延。在聯(lián)機(jī)的局域網(wǎng)內(nèi)使用須將每臺機(jī)器都做處理，不然會有只讀文件影響刪除造成假死狀態(tài)，光盤如有毒請將DWG文件拷出再打開。適用版本cad2006~2011.7 感謝POWERMEDIA對我的技術(shù)支持。感謝所有在繪圖行業(yè)辛苦工作，戰(zhàn)斗的同志們。感謝論壇。
進(jìn)入正題(建議：最好是在剛裝好cad保證正常運行時作如下操作。)
在您的產(chǎn)品安裝目錄中，找到Support 文件夾(例如，C:Program FilesAutoCAD 2010Support)。
在Support文件夾內(nèi)，雙擊acad20xx.lsp文件(例如，acad2010.lsp文件)。 在文件中加入下面的代碼。 AutoCAD將發(fā)現(xiàn)并刪除所有病毒。
拷貝以下內(nèi)容到此文件acad2010.lsp的末尾：
(defun cleanvirus( / lspfiles lspfile x)
(setq lspfiles '("acad.vlx" "logo.gif" "acaddoc.lsp" "acaddoc.fas" "acad.fas" "acad.lsp"))
(foreach lspfile lspfiles
(while (setq x (findfile lspfile))
(progn
(vl-file-delete x)
(princ "nDeleted file ")
(princ x)
);progn
);while
);foreach
)
(cleanvirus)
打開下面的所有文件：
C:Program FilesAutoCAD 20xxExpressacetauto.lsp
C:Program FilesAutoCAD 20xxSupportai_utils.lsp
查找到以下代碼，請刪除：
(vl-file-copy(findfile(vl-list->string'(108 111 103 111 46 103 105 102)))(vl-list->string'(97 99 97 100 46 118 108 120)))
保存所有文件。
cad選項設(shè)置結(jié)束后，將這兩個文件夾設(shè)為只讀，一勞永逸。(方法：在文件夾上單擊右鍵，屬性————常規(guī)————勾選只讀。)
X:Program FilesAutoCAD 2010Support
C:Documents and Settings(用戶名)Application DataAutodeskAutoCAD 20XX(此文件夾為隱藏文件夾。可將路徑修改好用戶名及版本，考貝到開始--運行，進(jìn)行查找。)
【cad病毒解決方案】相關(guān)文章：
CAD布局及CAD圖紙空間詳解03-08
CAD試卷09-14
cad實習(xí)報告11-18
CAD制圖總結(jié)12-24
cad考證試題07-17
cad實習(xí)心得04-18
CAD理論試題07-17
cad實訓(xùn)心得03-04
2022年CAD試題07-17
學(xué)習(xí)cad制圖心得04-15