Conectar a Router (local) desde VB

Memphis · 14 Noviembre 2008, 15:45 PM

Conectar a Router (local) desde VB
--------------------------------------------------------------
Connotados, les cuento lo que quiero hacer.

quiero conectarme a mi router a traves de visual basic
usando el control WebBrowser ingresando en los textbox
el user y password
y luego hacer clic en el boton submit
todo esto de forma automatica..

es posible hacer eso ??
o existe alguna otra forma ?¿

‭‭‭‭jackl007 · 15 Noviembre 2008, 01:44 AM

Mira si tu tienes el archivo: logeo.html con este codigo, reemplazas cuenta@gmail.com por tu usuario de Gmail, y en "clavee", por tu clave de gmail...
y lo ejecutas, pues te carga tu pagina de Gmail... es lo mismo que quieres hacer..

Ahora ten en cuenta algunos detalles (busca esos detalles en la pagina de logeo): el nommbre del form: gaia_loginform", campos: "Email", "Password", metodo: "post", action: "https: ... LoginAuth"

y tranquilamente con el control WebBrowser de VB podras logearte tan solo abriendo el archivo en HTML que has preparado....

Código (html) [Seleccionar]

<html><head></head><body>
Cargando... 
<form  id="gaia_loginform" action="https://www.google.com/accounts/LoginAuth" method="post">
<input  type="hidden" name="Email" id="Email" size="18" value="cuenta@gmail.com"/>
<input  type="hidden"name="Passwd"id="Passwd"size="18" value="clavee"/>
</form>
 
<script language="javascript" type="text/javascript">
document.forms["gaia_loginform"].submit()
</script></body></html>

Esto es lo que hacia para logearme sin tener que escribir mi password, se me ocurrio para proteger mis datos... seguro qe hay mas formas de hacerlo.
claro que yo usaba algoritmos para proteger el codigo ante los chismosos... jojo

Saludos!

seba123neo · 15 Noviembre 2008, 02:38 AM

Hola, yo esto ya lo hice una vez, accedi al hwnd de las ventanas y textbox y les mando el password y usuario directamente con api's...

saludos.

‭‭‭‭jackl007 · 15 Noviembre 2008, 03:02 AM

y dime una cosa con el hwnd se pueden recuperar el texto del textbox?

seba123neo · 15 Noviembre 2008, 04:52 AM

si... tambien es posible saber el texto de un textbox externo con api's...todo se puede...

demoniox12 · 16 Noviembre 2008, 02:09 AM

Cita de: Memphis en 14 Noviembre 2008, 15:45 PM
Conectar a Router (local) desde VB
--------------------------------------------------------------
Connotados, les cuento lo que quiero hacer.

quiero conectarme a mi router a traves de visual basic
usando el control WebBrowser ingresando en los textbox
el user y password
y luego hacer clic en el boton submit
todo esto de forma automatica..

es posible hacer eso ??
o existe alguna otra forma ?¿

Código (vb) [Seleccionar]


WebBrowser1.Document.Forms(0).elements(0).Value = "aca el usuario del login"
WebBrowser1.Document.Forms(0).elements(1).Value = "aca el pass del login"
WebBrowser1.Document.Forms(0).submit

Saludos!

seba123neo · 16 Noviembre 2008, 02:43 AM

mmmm pero entonces como es la cosa?? te muestra un formulario para ingresar el user y la contraseña o te aparece una ventana para ingresar?? yo me referia a usar las api's cuando es una ventana...pero sino es como te dijeron antes..

Memphis · 17 Noviembre 2008, 02:34 AM

wenas

bueno
es un DIR300
el router
y el log se realiza por una web

<table width=80%>
   <tr>
      <td id="box_header">

         <h1>Login</h1>
         Log in to the router:
         <br><br><center>
         <table>
         <tr>
            <td>User Name</td>
            <td><input type=text name="LOGIN_USER"></td>
         </tr>

         <tr>
            <td>Password</td>
            <td><input type=password name="LOGIN_PASSWD"></td>
            <td><input type="submit" name="login" value=" Log In " onclick="return check()"></td>
         </tr>
         </table>
         </center><br>
      </td>

   </tr>
   </table>

esos son los campos

demoniox12 · 17 Noviembre 2008, 09:21 AM

utiliza exactamente lo que te di..

saludos

Memphis · 18 Noviembre 2008, 05:02 AM

VALE compadre

voy a probar ahora

mañana cuento... si es que no me la gana el sueño

ACTUALIZADO!!

WebBrowser1.Navigate "http://192.168.0.1/"

WebBrowser1.Document.Forms(0).LOGIN_USER.Value = "el usuario"
WebBrowser1.Document.Forms(0).LOGIN_PASSWD.Value = "el pass key"
WebBrowser1.Document.Forms(0).submit

ahi con eso rola bkn
valencia cabros.