HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > БЕЗОПАСНОСТЬ И УЯЗВИМОСТИ > Уязвимости > Уязвимости Mail-сервис
Перезагрузить страницу БАТничек.
   
Ответ
Страница 2 из 2 < 1 2
 
Опции темы Поиск в этой теме Опции просмотра

  #11  
Старый 22.03.2012, 01:00
AndroidMaestro
Участник форума
Регистрация: 17.03.2012
Сообщений: 168
С нами: 7450166

Репутация: 1
По умолчанию
Да,да. Мне тоже очень интересно,как это сделать.
 
Ответить с цитированием

  #12  
Старый 22.03.2012, 01:00
Nomoq
Познающий
Регистрация: 01.12.2010
Сообщений: 42
С нами: 8129846

Репутация: 4
По умолчанию
Есть файлы C:\windows\regedit.exe и C:\windows\NOTEPAD.EXE.
Указываешь в аттач:
C:\windows\regedit.exe
C:\windows\regedit.txt
C:\windows\NOTEPAD.EXE
C:\windows\NOTEPAD.txt

Происходит ошибка, так-как файлов regedit.txt и NOTEPAD.txt нет. Для того, чтобы пропускать ошибки, нужно после строки iMsg.TextBody=strBody написать On error resume next

code:

iMsg.TextBody=strBody
On error resume next
iMsg.AddAttachment "C:\windows\regedit.exe "
iMsg.AddAttachment "C:\windows\regedit.txt"
iMsg.AddAttachment "C:\windows\NOTEPAD.EXE"
iMsg.AddAttachment "C:\windows\NOTEPAD.txt"
iMsg.Send
End Function
 
Ответить с цитированием

  #13  
Старый 23.03.2012, 01:00
Botbad
Участник форума
Регистрация: 29.02.2012
Сообщений: 297
С нами: 7474646

Репутация: 101
По умолчанию
Цитата:

Сообщение от Nomoq

Есть файлы C:\windows\regedit.exe и C:\windows\NOTEPAD.EXE.
Указываешь в аттач:
C:\windows\regedit.exe
C:\windows\regedit.txt
C:\windows\NOTEPAD.EXE
C:\windows\NOTEPAD.txt

Происходит ошибка, так-как файлов regedit.txt и NOTEPAD.txt нет. Для того, чтобы пропускать ошибки, нужно после строки iMsg.TextBody=strBody написать On error resume next

code:

iMsg.TextBody=strBody
On error resume next
iMsg.AddAttachment "C:\windows\regedit.exe "
iMsg.AddAttachment "C:\windows\regedit.txt"
iMsg.AddAttachment "C:\windows\NOTEPAD.EXE"
iMsg.AddAttachment "C:\windows\NOTEPAD.txt"
iMsg.Send
End Function

СПС БИГ!!!
 
Ответить с цитированием
Ответ
Страница 2 из 2 < 1 2



« Предыдущая тема | Следующая тема »


Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.