cad病毒解決方案

cad病毒解決方案

　　在這個病毒四溢的年代，cad也出現了病毒，再被它們折磨到崩潰的時候(死機，存圖顯示輸入路徑，各種鍵盤失靈，詭異退出，黨不會虧待你等等爛七八糟的病毒)，下面小編寫下了這段代碼。希望給辛苦加班的cad同志們以幫助。減輕你們的痛苦(重裝，格機，丟圖)

　　功能：

　　1、打開文件時自動刪除文件夾下的所有病毒。

　　2、CAD啟動時命令行提示“錯誤: 參數類型錯誤: stringp nil"永遠消失。(只顯示加載項及是由哪個版本的cad，創建的有效的文件等等)

　　注意事項

　　經過一年多的實踐，我的機器已有效的控制了病毒的蔓延。在聯機的局域網內使用須將每臺機器都做處理，不然會有只讀文件影響刪除造成假死狀態，光盤如有毒請將DWG文件拷出再打開。適用版本cad2006~2011.7 感謝POWERMEDIA對我的技術支持。感謝所有在繪圖行業辛苦工作，戰斗的同志們。感謝論壇。

　　進入正題(建議：最好是在剛裝好cad保證正常運行時作如下操作。)

　　在您的產品安裝目錄中，找到Support 文件夾(例如，C:Program FilesAutoCAD 2010Support)。

　　在Support文件夾內，雙擊acad20xx.lsp文件(例如，acad2010.lsp文件)。 在文件中加入下面的代碼。 AutoCAD將發現并刪除所有病毒。

　　拷貝以下內容到此文件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選項設置結束后，將這兩個文件夾設為只讀，一勞永逸。(方法：在文件夾上單擊右鍵，屬性————常規————勾選只讀。)

　　X:Program FilesAutoCAD 2010Support

　　C:Documents and Settings(用戶名)Application DataAutodeskAutoCAD 20XX(此文件夾為隱藏文件夾。可將路徑修改好用戶名及版本，考貝到開始--運行，進行查找。)

【cad病毒解決方案】相關文章：

CAD應用常見問題解決方案05-29

怎么CAD-CAD的用法06-11

怎么在cad2015中調出CAD經典模式10-24

CAD習題及答案01-15

cad考證試題09-23

如何自學CAD08-22

cad繪圖技巧07-07

CAD的教學反思05-07

CAD制圖技巧07-21

cad成組教程05-20