elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Trabajando con las ramas de git (tercera parte)


  Mostrar Mensajes
Páginas: 1 2 3 4 5 [6] 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 ... 23
51  Programación / Programación Visual Basic / Re: Loguearse en una web desde vb6 en: 10 Septiembre 2010, 21:26 pm

y ahi entran los creditos ;D



Este es un codigo algo "basico" de como logearse en una pagina (tambien con algunos cambios puedes enviar mensajes automaticos por hi5 .. o aceptar  a los amigos del facebook)....  Si saben de otro metodo .. Postealo..

Para este proyecto se usara :

+ 1 COmmand
+ 1 WebBrowser
+ 2 cajas de texto (usuario y contraseña)

De ejemplo usaremos www.hi5.com ...
Código
  1. Private Sub Form_Load()
  2. WebBrowser1.Navigate ("http://hi5.com")
  3. End Sub
  4.  

Asumimos que :


Citar
<input type="text" name="email" maxlength="255" size="24" tabindex="1" value="" id="email">

<input type="password" name="password" maxlength="255" size="24" tabindex="2" value="">


El codigo dentro del Command1 es :
Código
  1. Private Sub Command1_Click()
  2.  
  3. Me.WebBrowser1.Document.All("email").Value = Text1.Text
  4. Me.WebBrowser1.Document.All("password").Value = Text2.Text
  5.  Dim HTML
  6.  Dim HTMLI
  7.  
  8.  Set HTML = WebBrowser1.Document
  9. For Each HTMLI In HTML.getElementsByTagName("input")
  10.      If HTMLI.Value = "Iniciar sesión" Then
  11.        HTMLI.Click
  12.        Exit Sub
  13.      End If
  14.    Next
  15.  
  16. End Sub
  17.  

Espero que te sirva :D
52  Programación / Programación Visual Basic / Re: como ejecuto una funcion cada X segundos? en: 9 Septiembre 2010, 04:40 am
Cita de: Petro_Boca en  9 Septiembre 2010, 04:18 am
Cita de: ignorantev1.1 en  9 Septiembre 2010, 04:17 am
Timer!

es lo q pense, pero me podes dar un ejemploÇ?

nunca lo supe usar a ese relojito feo xd

solucionado

Código
  1.  
  2.    Private Sub form_load()
  3.  
  4. Timer1.Interval = 1
  5. Timer1.Enabled = True
  6.  
  7.  
  8.  
  9.  
  10.     End Sub
  11.  
  12.  

para el timer

Código
  1.  
  2. Private Sub Timer1_Timer()
  3. Timer1.Enabled = True
  4. codigo
  5. End Sub
  6.  
  7.  

ese es el q uso y funca u_u :P
53  Programación / Programación Visual Basic / Re: como ejecuto una funcion cada X segundos? en: 9 Septiembre 2010, 04:18 am
Cita de: ignorantev1.1 en  9 Septiembre 2010, 04:17 am
Timer!

es lo q pense, pero me podes dar un ejemploÇ?

nunca lo supe usar a ese relojito feo xd
54  Programación / Programación Visual Basic / como ejecuto una funcion cada X segundos? en: 9 Septiembre 2010, 04:11 am
como ejecuto una funcion cada X segundos?
55  Programación / Programación Visual Basic / Re: Como llamo a un boton (1 vez...) en: 9 Septiembre 2010, 01:45 am
osea yo no sabia q se podian poner 2 cosas (nose como se llaman, si alguien me lo dice...) con "Form"

osea, como ya tenia el Form_MouseMove, no sabia q lo podia cerrar y abrir el form_load
56  Programación / Programación Visual Basic / Re: Como llamo a un boton (1 vez...) en: 9 Septiembre 2010, 01:43 am
Cita de: aaronduran2 en  9 Septiembre 2010, 01:40 am
Sí que funciona... Al menos a mí sí.

Código
  1. Private Sub Command1_Click()
  2.     MsgBox "Hola"
  3. End Sub
  4.  
  5. Private Sub Form_Load()
  6.     Call Command1_Click
  7. End Sub

asi no..

Código
  1.  
  2. Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
  3. TODO EL CODIGO
  4.     Call Command1_Click
  5.  
  6.     End Sub
  7.  
  8.  

ASI SI.

Código
  1.  
  2.  Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
  3. TODO EL CODIGO
  4.     End Sub
  5.  
  6.    Private Sub form_load()
  7.  
  8.    Call Command2_Click
  9.  
  10.     End Sub
  11.  
  12.  

osea, me habias entendido mal :P

pero ya fue, dejalo ahi xd
57  Programación / Programación Visual Basic / Re: Como llamo a un boton (1 vez...) en: 9 Septiembre 2010, 01:38 am
Cita de: aaronduran2 en  9 Septiembre 2010, 01:36 am
Si se abre cuando mueves el ratón, es porque pusiste el procedimiento en el evento MouseMove, en vez de ponerlo en Form_Load.

Un saludo

es verdad...
Código
  1. Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
  2.  


pero si cambio Private Sub Form_MouseMove por Private Sub Form_Load...

andara?
58  Programación / Programación Visual Basic / Como llamo a un boton (1 vez...) en: 9 Septiembre 2010, 01:30 am
como puedo hacer para llamar a un boton desde el form ?

osea, q el boton se autoejecute junto con el form

ya probe con :

call command2_click

pero ese abre el boton por cada milimetro q muevo el maus :S
59  Programación / Programación Visual Basic / Re: ¿ Se puede pulsar un botón del formulario ? en: 9 Septiembre 2010, 00:50 am
Cita de: Petro_Boca en  9 Septiembre 2010, 00:36 am
Cita de: 79137913 en 27 Agosto 2010, 20:01 pm
HOLA!!!


SI:

Código
  1. Private Sub Form1_Load()
  2. Call Command1_Click()
  3. End Sub
  4.  


GRACIAS POR LEER!!!


yo hice eso y entre en una bola de msgbox

alguien sabe q puedo hacer?
60  Programación / Programación Visual Basic / Re: ¿ Se puede pulsar un botón del formulario ? en: 9 Septiembre 2010, 00:36 am
Cita de: 79137913 en 27 Agosto 2010, 20:01 pm
HOLA!!!


SI:

Código
  1. Private Sub Form1_Load()
  2. Call Command1_Click()
  3. End Sub
  4.  


GRACIAS POR LEER!!!


yo hice eso y entre en una bola de msgbox
Páginas: 1 2 3 4 5 [6] 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 ... 23
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines