Crear Bot de Navegación Internet Explorer

En esta entrada les voy a enseñar a programar un bot en ".vbs" que se encargue de navegar a traves de una pagina web con Internet Explorer (otro no por que ie es el que admite este tipo de scripts por el echo de estar integrado a windows). Creamos un archivo de texto,dentro,armaremos el script: Set IE = CreateObject("InternetExplorer.Application" //Esta linea llama a Internet Explorer como aplicacion. set WshShell = WScript.CreateObject("WScript.Shell" //Esta linea crea la integración del script al navegador pagina = inputbox ("PAGINA PARA LOGEAR" //Esta linea crea la variable "pagina" igual al comando "inputbox" que se encargara de pedir la introduccion de una pagina web para definirla. IE.Navigate pagina //Esta linea llama a la variable pagina para ser navegada IE.Visible = True //Declara la visibilidad de IE Wscript.Sleep 6000 //Espera 6 segundos para que la pagina cargue y pueda interactuar IE.Document.All.Item("userName".Value = "admin" //Este comando inspecciona en el codigo fuente de la pagina y busca el elemento "UserName" e introduce el valor "ubnt" que seria el nombre de usuario (este elemento esta ligado a la casilla de introduccion de usuario) IE.Document.All.Item("password".Value = "123123" //Este comando inspecciona el codigo fuente de la pagina y busca el elemento "password" e introduce el valor "123123" que seria la contraseña. (este elemento esta ligado a la casilla de introduccion de usuario contraseña) WshShell.AppActivate "IE" //Activa la ventana de Internet Explorer y la trae al frente WshShell.SendKeys "{ENTER}" //Interactua con la ventana que activo y presiona la tecla "ENTER" para que haga login de user y password,pueden usar esto para que presione cualquier tecla. Codigo completo: Set IE = CreateObject("InternetExplorer.Application" set WshShell = WScript.CreateObject("WScript.Shell" pagina = inputbox ("PAGINA PARA LOGEAR" IE.Navigate pagina IE.Visible = True Wscript.Sleep 6000 IE.Document.All.Item("userName".Value = "admin" IE.Document.All.Item("password".Value = "123123" WshShell.AppActivate "IE" WshShell.SendKeys "{ENTER}" Luego usan la opcion "Guardar Como.." y guardan con un nombre seguido de ".vbs", ejemplo "minibot.vbs" y luego van a donde lo guardaron y lo ejecutan. El bot a ser ejecutado pregunta la pagina que deseas logear,una vez introducida,el bot ejecuta internet explorer y busca la pagina,espera 6 segundos para que se cargue (si no carga en menos de 6 segundos salta error y se cierra),si cargo va a introducir las variables en las casillas correspondientes y luego presionara ENTER (esto se tiene que hacer con la ventana abierta). Como veran no es tan complicado crearlo,pueden usarlos para varias cosas, un ejemplo de bot que haga login en facebook: Set IE = CreateObject("InternetExplorer.Application" set WshShell = WScript.CreateObject("WScript.Shell" IE.Navigate https://www.facebook.com/ IE.Visible = True Wscript.Sleep 6000 IE.Document.All.Item("email".Value = "email@hotmail.com" IE.Document.All.Item("pass".Value = "contraseña123" WshShell.AppActivate "IE" WshShell.SendKeys "{ENTER}" Para conseguir el nombre de un elemento hagan lo siguiente: 1)User chrome o firefox y abran la pagina (ejemplo facebook) 2)En el elemento que quieren usar (una casilla ejemplo) haganle click derecho y seleccion "Inspeccionar Elemento" 3)Fijensen que se abre una ventana alternativa que muestra la parte del codigo fuente donde se posiciona el fragmento del objeto como en la siguiente imagen: usen id o name.. Pueden Emplear los fragmentos y personalizarlos para hacer lo que quieran con IE Se que nadie usa ie pero esto es util xD , y las caritas son "; )" junto sin comillas...