[Mikhail.Pavliy]

Помогите удалить этот вирус. При открытии черчежей автоматически создаётся файл acaddoc.lsp. После того как он попадает на машину AutoCad перестаёт работать корректно, все черчежи открвыаются только с нажатием ESC и каждый раз в новом AutoCad. Пробовал удалять вручную, чистил антивирусом AVP 8, Symantec 10, CureIt они его удаляют. Но при открытии черчежей создаётся заново. Также читал на форумах что надо почистить его внутри изменить некоторые переменные, тоже не помогает. Помогите пожалуйста.

[Mikhail.Pavliy]

Всё начинает работать когда удаляешь acad.mnl и acad*.lsp. Спасибо всем большое за помощь.

[Profan]

Для AutoCAD 2006 файл acad.mnl очень нужен.

[Кулик Алексей aka kpblc]

Уточнение: штатный acad.mnl

[VVA]

Mikhail.Pavliy, acad.mnl нужен для всех Автокадов. Напиши версии, выложу чистые acad.mnl.
PS acad.mnl, другие mnl и lsp файлы можно прочинить. Ищи в редакторе строку (setq flagx t) и удаляй все с нее до конца

[Mikhail.Pavliy]

AutoCad 2006 - 2007 усли не затруднит вышли.

[Profan]

VVA, начиная с версии 2007 содержимое acad.mnl странное (после общих фраз):

Код:

[Выделить все]

 
;; Silent load.
(princ)

Нужен ли такой файл - блин его знает.

[ShaggyDoc]

Сообщение от Profan VVA, начиная с версии 2007 содержимое acad.mnl странное (после общих фраз): Код: [Выделить все] ;; Silent load. (princ) Нужен ли такой файл - блин его знает.

Как раз и нужен для того, чтобы всякие бродяги могли туда дописывать. Что и делает этот "вирус". А общие фразы - чтобы блондинки побоялись дописанное удалять.

[Profan]

Ага, это мне понятно.
Однако, интересно - в UserDataCache файл acad.mnl тоже модифицируется?

[Bekbolatov]

Желательно потом, после удаления *.mnl и *.lsp, и после переустановки ACADа, восстановленным (чистым) файлам *.mnl и *.lsp присвоить параметр "только для чтения". Этим вы обезопасите себя от повторного инфицирования

[VVA]

Вариант Антивируса отсюда
Сохранить в файле AntiVirus.vbs и выполнить

Код:

[Выделить все]

strComputer = "."
BuferFile = "c:\bufer.txt"
Count = 0
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colFiles = objWMIService. _
    ExecQuery("Select * from CIM_DataFile where (Extension = 'lsp') or (Extension = 'mnl')")
For Each objFile in colFiles
 Set oFSO = CreateObject("Scripting.FileSystemObject")
 Set oLogFile= oFSO.OpenTextFile(objFile.Name)
 Set BufFile= oFSO.CreateTextFile(BuferFile,true)
 sLogLine=""
 While (Not (oLogFile.AtEndOfStream))and(sLogLine<>"(setq flagx t)")
     sLogLine = oLogFile.ReadLine
     if sLogLine<>"(setq flagx t)" Then
       BufFile.WriteLine sLogLine
     end if
 Wend
 oLogFile.Close
 BufFile.Close
 If sLogLine="(setq flagx t)" Then
  oFSO.DeleteFile(objFile.Name)
  oFSO.CopyFile BuferFile,objFile.Name,True
  Count=Count+1
 End if
 oFSO.DeleteFile(BuferFile)
Next

Set colFiles = objWMIService. _
    ExecQuery("Select * from CIM_DataFile where (Extension = 'mnr') or (Extension = 'mnc') or (Extension = 'mns')")
For Each objFile in colFiles
 Set oFSO = CreateObject("Scripting.FileSystemObject")
  oFSO.DeleteFile(objFile.Name)
 Next

Set colFiles = objWMIService. _
    ExecQuery("Select * from CIM_DataFile where (Extension = 'lsp') or (Extension = 'mnl')")
For Each objFile in colFiles
 Set oFSO = CreateObject("Scripting.FileSystemObject")
 Set oLogFile= oFSO.OpenTextFile(objFile.Name)
 Set BufFile= oFSO.CreateTextFile(BuferFile,true)
 sLogLine=""
 While (Not (oLogFile.AtEndOfStream))and(sLogLine<>"(setq flagx t)")
     sLogLine = oLogFile.ReadLine
     if sLogLine<>"(setq flagx t)" Then
       BufFile.WriteLine sLogLine
     end if
 Wend
 oLogFile.Close
 BufFile.Close
 If sLogLine="(setq flagx t)" Then
  oFSO.DeleteFile(objFile.Name)
  oFSO.CopyFile BuferFile,objFile.Name,True
  Count=Count+1
 End if
 oFSO.DeleteFile(BuferFile)
Next


'If Count>0 Then
 WScript.Echo "Вылечено " & Count & " файлов"
'End If

[ShaggyDoc]

Вариант Антивируса

Лечение зубной боли с помощью гильотины.

[dextron3]

Солидвокер выручай не могу убить этот вирус в ноутбуке постоянно поялвяется,

места удаления
автокад/суппорт
Документ энд сетинг/ усер/автодеск/ суппорт

Поялвяется и появляется автокад вообще тормозит и не работает каспер видит только тогда когда лечишь направленно, нод вообщзе не увидел...

[Кулик Алексей aka kpblc]

http://forum.dwg.ru/showpost.php?p=265468&postcount=12 ?

[dextron3]

Кулик Алексей aka kpblc, откуда mnl удалить? я понял может внем загвоздка?

[Кулик Алексей aka kpblc]

Рядом с mnu/cui/mns должен лежать. Ищите

[Profan]

Сообщение от dextron3 ... откуда mnl удалить? я понял может внем загвоздка?

Из AutoCAD 2006 и более древних версий нельзя удалять acad.mnl, там определено много функций. Начиная с версии 2007 этот файл фактически пустой, удалить можно, IMHO, но я бы не стал удалять, лучше бы вычистил.

[VVA]

dextron3, В файлах mnl, lsp есть строчки с содержанием (setq flagx t)?
Если да, то запусти скрипт из #30

[dextron3]

VVA, скрипт запускать из автокада, так у меня автокад не загружается до конца виснет, что делать?

[VVA]

Из Автокада не нужно, хотя можно. Сохрани код в файле , например AntiVirus.vbs и запусти на ваполнение, дважды щелкнув по нему мышкой.
PS Добавил в описание #30

[dextron3]

VVA, СПАСИБО!
18 штук вылечил, минут 15 пришлось подождать, уж надежду потерял, вроде бы ничего не происходило, поясните обычным языком что эта штуковина делает то?
по мимо mnl, acad.lsp лечит? acaddoc.lsp лечит?