Auto Login problema con la tilde

Iniciado por j0selit0_vaca, 28 Septiembre 2011, 05:15 AM

0 Miembros y 1 Visitante están viendo este tema.

j0selit0_vaca

Hola que tal estoy intentando crear un autoLogin (VB.NET) de websites Y estoy teniendo problemas con las tildes este es parte de el codigo de la web  :



         
   
Citar

<td class="smallfont" style="white-space: nowrap;"><label for="navbar_username">Nombre de Usuario</label></td>
<td><input type="text" class="bginput" style="font-size: 11px" name="vb_login_username" id="navbar_username" size="15" accesskey="u" tabindex="104" value="Nombre de Usuario" onfocus="if (this.value == 'Nombre de Usuario') this.value = '';" /></td>

         <td class="smallfont" nowrap="nowrap"><label for="cb_cookieuser_navbar"><input type="checkbox" name="cookieuser" value="1" tabindex="105" id="cb_cookieuser_navbar" accesskey="c" />Iniciar sesión automáticamente</label></td>

      </tr>

      <tr>

         <td class="smallfont"><label for="navbar_password">Contraseña</label></td>

         <td><input type="password" class="bginput" style="font-size: 11px" name="vb_login_password" id="navbar_password" size="10" tabindex="102" /></td>

         <td><input type="submit" class="button" value="Iniciar Sesión" tabindex="104" title="Escribe tu nombre de usuario y contraseña en los campos para iniciar la sesión o pulsa el botón 'registrarse' para crear un perfil." accesskey="s" /></td>


               
Esto funciona bien :  ;-)

CitarWebBrowser1.Document.GetElementById("vb_login_username").SetAttribute("value", "myusername")


Esto tambien :  ;-)
CitarWebBrowser1.Document.GetElementById("vb_login_password").SetAttribute("value", "mypassword")



Esto no Funciona   :-(
Citar
WebBrowser1.Document.GetElementById("Iniciar Sesión").InvokeMember("click")

Intente esto :  :-(
Citar
WebBrowser1.Document.GetElementById("Iniciar Sesi&oacute;n").InvokeMember("click")

Por la logica de los dos primeros intente esto tambien :  :-(

Citar
WebBrowser1.Document.GetElementById("vb_login").InvokeMember("click")


nada espero que me ayuden a resolver este problema muchas gracias .











s00rk

#1
En vez de
WebBrowser1.Document.GetElementById("Iniciar Sesión").InvokeMember("click")
intenta con
WebBrowser1.Document.GetElementById("Iniciar Sesión").InvokeMember("submit")

El evento de iniciar sesion es submit jeje o asi es casi siempre ;P

P.D. Esta es la sección de VB, y lo tuyo es VB.NET osea en la sección .NET jejeje

j0selit0_vaca

nada  por aqui:(

CitarWebBrowser1.Document.GetElementById("Iniciar Sesión").InvokeMember("submit")

nada por aca :

CitarWebBrowser1.Document.GetElementById("Iniciar Sesi&oacute;n").InvokeMember("submit")

s00rk

Pues ah de ser porque el boton submit no tiene name para identificarlo, ya que al parecer a los otros los checas con el atributo
name
ejemplo:
name="vb_login_password"
pero el submit no contiene ninguno de ello lo que talvez podria ser en este caso sino tiene name o id, seria checar todos los elementos supongo o algo asi jeje

Keyen Night

Y usando el ASCII de "ó" no funcionará?

Código (vb.net) [Seleccionar]
Convert.ToChar(&HF3)

Código (vb.net) [Seleccionar]
WebBrowser1.Document.GetElementById("Iniciar Sesi" & Convert.ToChar(&HF3) & "n").InvokeMember("submit")
La Fé Mueve Montañas...
                                    ...De Dinero

La programación es más que un trabajo es más que un hobby es una pasión...

j0selit0_vaca

Ayayay ya me estoy  cansando con este problemita

CitarWebBrowser1.Document.GetElementById("Iniciar Sesi" & Convert.ToChar(&HF3) & "n").InvokeMember("submit")

gracias por tu ayuda pero nada .Algo he aprendido .sabemos que vbnet utiliza el ie6 por defecto entonces cuando descarga el codigo lo descarga de esta manera :

CitarIniciar Sesi�n
no reconoce ese caracter entonces lo que intente es hacerlo con el geko(webrowser de vbnet para firefox) pero nisiquiera consegui que me funcionase esto :

CitarGeckoWebBrowser1.Document.GetElementById("vb_login_username").SetAttribute("value", "myusername")


luego intente hacer lo mismo con el WebKitBrowser(webrowser de vbnet para chrome)
Citar
WebKitBrowser1.Document.GetElementById("vb_login_username").SetAttribute("value", "myusername")
pero nada  :-(


Aqui les lanzo un reto a cualquiera esto no deberia tomar mas de dos minutos hacerlo pero no me sale  :xD  me he dado cuenta que la pagina en la que intento crear el auto login tiene codigo de logeo similar a estas  asi que si pueden crear un
autologin para cualquiera de ellas mi problema estaria resuelto .




Citarhttp://foros.hondaclub.com.ar/
Citarhttp://www.programaswarez.com/foros.php
Citarwww.macusergroup.com.ar/foro/


Gracias (si los links los consideran spam haganmelo saber por favor ..)





s00rk

Pues me ha funcionado exepto para http://www.programaswarez.com/foros.php xD
para las otras dos si, en esa no porque tiene un buscador xD

Aqui el codigo mira:

Código (vb.net) [Seleccionar]
Imports System.Web
Public Class Form1
    Dim intento As Boolean = False
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        WebBrowser1.Navigate("http://www.macusergroup.com.ar/foro/")
    End Sub

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        If (intento <> True) Then
            WebBrowser1.Document.GetElementById("vb_login_username").SetAttribute("value", "myusername")
            WebBrowser1.Document.GetElementById("vb_login_password").SetAttribute("value", TextBox2.Text)
            WebBrowser1.Document.Forms(0).InvokeMember("submit")
            intento = True
        End If
    End Sub

End Class

j0selit0_vaca

Muchas gracias por el codigo s00rk .
Esta no me la sabia : 
CitarWebBrowser1.Document.Forms(0).InvokeMember("submit")

  ;-) .

Saludos.