[LSP] 캐드바이러스(acad.lsp, acaddoc.lsp...) 삭제구문

캐드버젼를 2008일 경우는 acad2008doc.lsp 리습 안에 넣어 두시면 됩니다.

다른버전은 해당되는 리습파일을 열어서 넣어두시면 됩니다.

 

컴퓨터 파일중에 acaddoc.lsp 파일이 있어도 acad2008doc.lsp 리습이 먼저 실행이 되기 때문에

캐드바이러스가 실행되기 전에 지우는 구문입니다.

필요하신 분만 사용을 하세요

(defun c:V3_AutoCAD (/ VList VFile) 
  (vl-load-com) 
  (setq VList (list "acad.lsp" "acad.vlx" "acad.fas" "acaddoc.lsp")) ;;파일명 추가
  (foreach item VList 
    (while (setq VFile (findfile item)) 
      (vl-file-delete VFile) 
      (princ (strcat "\n " VFile "[삭제]")) 
    ) ;while
  ) 
  (princ) 
) 
(c:V3_AutoCAD)

위에 등록한 바이러스파일외 추가 더 발견이 되면 VList 항목에 추가를 계속 시키면서 사용하시면 됩니다.

 

참고로 아키오피스등 사용하는 프로그램에서 VList 항목과 동일한 파일명을 사용하는 경우는 수정을 하셔야 합니다.

 

위 리습을 실행 후에도 리습을 로드 할수 없다는 메세지가 커멘드창에 출력이 될경우는

acad.mnl을 메모장등으로 파일을 오픈하여서

(load "acadapp")

위와 비슷한 구문을 제거하고 저장하여 주시면 됩니다.