Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> VBS-скрипт не выполняет своих функций, Как проверить - почему ? 
:(
    Опции темы
XPurple
Дата 7.3.2007, 12:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 140
Регистрация: 4.5.2006
Где: Челябинск

Репутация: 1
Всего: 1
Написал маленький vbs-скрипт для удаления резидентных вирусов с диска.
На моей машине работает, удаленно - не удаляет.
Оба компьютера под управлением win98.
Как бы проверить, из-за чего такое происходит ?
Код

Dim VirusFile(3)
On error resume next
set fso=CreateObject("Scripting.FileSystemObject")

'Файлы, которые содержат вирусы
VirusFile(0) = "c:\windows\system\winshost.exe"
VirusFile(1) = "c:\windows\system\wiwshost.exe"
VirusFile(2) = "c:\windows\system\gkqcoom.dll"

'Удаляем их в цикле
For N = 0 To 2
fso.DeleteFile(VirusFile(N))
Next


Скрипт грузится при загрузке Windows (находится в секции Run).
--------------------
Кто никогда ни о чем не спрашивает: тот либо знает все, либо не знает ничего.  Не помню, кто сказал, может быть, я   (с) 
PM MAIL   Вверх
mihanik
Дата 7.3.2007, 12:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 11
Всего: 109
Цитата(XPurple @  7.3.2007,  12:23 Найти цитируемый пост)
удаленно - не удаляет.


Как это?
Немного непонятно...

После каждой строки нужно анализировать значение Err.Number
Если не 0, то ошибка произошла.


--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
XPurple
Дата 7.3.2007, 13:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 140
Регистрация: 4.5.2006
Где: Челябинск

Репутация: 1
Всего: 1
Цитата
На моей машине работает, удаленно - не удаляет.

Ступил.
Локально ,конечно же.
На другом компьютере под управлением win98

Самое смешное, что vbs-скрипт и резидентная программа-вирус прописываются в одной и той же секции
реестра ...\Run.
Может быть причина в том, что раньше скрипта стартует программа вирус и не дает себя удалять ?

Это сообщение отредактировал(а) XPurple - 7.3.2007, 13:11
--------------------
Кто никогда ни о чем не спрашивает: тот либо знает все, либо не знает ничего.  Не помню, кто сказал, может быть, я   (с) 
PM MAIL   Вверх
mihanik
Дата 7.3.2007, 13:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 11
Всего: 109
Цитата(XPurple @  7.3.2007,  13:06 Найти цитируемый пост)
Может быть причина в том, что раньше скрипта стартует программа вирус и не дает себя удалять ?


Вероятно...
А может и сама система не даёт удалять, т.к. считает файл занятым другим приложением...



--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
Akina
Дата 7.3.2007, 13:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454
На компе в 98 такие вещи запихивают в autoexec.bat


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
JusTalionis
Дата 9.3.2007, 13:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 576
Регистрация: 11.7.2006

Репутация: 6
Всего: 17
а в ручную возможно удалить тот файл?
PM MAIL   Вверх
Тутанхамец
Дата 9.3.2007, 18:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 612
Регистрация: 10.10.2005
Где: в пирамидЕ!

Репутация: 4
Всего: 6
Цитата

а в ручную возможно удалить тот файл? 


Цитата

А может и сама система не даёт удалять, т.к. считает файл занятым другим приложением...


Сначала убить вирусный процесс, потом удалить файл. И еще из ...\Run его удалить. Имхо так. 

Akina, а что при запуске обрабатывается первым: autoexec.bat или автозапуск в реестре?

Это сообщение отредактировал(а) Тутанхамец - 9.3.2007, 18:47


--------------------
Мой блог / Мои фотки / Моё Skolkobudet.ru
PM MAIL   Вверх
Akina
Дата 9.3.2007, 19:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454
Цитата(Тутанхамец @  9.3.2007,  19:42 Найти цитируемый пост)
что при запуске обрабатывается первым: autoexec.bat или автозапуск в реестре?

конечно автобат


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
XPurple
Дата 12.3.2007, 07:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 140
Регистрация: 4.5.2006
Где: Челябинск

Репутация: 1
Всего: 1
Akina, 
про autoexec.bat не подумал.
Спасибо за идею.

Тутанхамец, 
Цитата
И еще из ...\Run его удалить. Имхо так. 

Это само-собой.


Это сообщение отредактировал(а) XPurple - 12.3.2007, 07:31
--------------------
Кто никогда ни о чем не спрашивает: тот либо знает все, либо не знает ничего.  Не помню, кто сказал, может быть, я   (с) 
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0645 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.