Yo soy Anti-Lammers 

Todo a tu correo? Me huele a gordo lammer...

Igual, cuando tengas el exe listo, damelo que con el mismo EXE te hackeo el correo

+10

Una cosa es dar "Una orientacion", y otra es Hacer Codigos.

buen code,...

yo me complique la vida para hacerlo en VB6 (Y con WB)

Si, mira:

yo tenia el codigo en 1 timer.

en intervalo 7000

y para no complicarme tanto dije.. " a la *****!"

y agrege otro timer con intervalo 8000, y con el mismo codigo para tocar el boton. pero cambiaba lo de HTMLII -> esa cosa q es algo asi xD!

Perdon por mi ignorancia, habia olvidado el & vbCrLf &

Existe algun Chr() que equivalga a un "Enter" ?

osea

un

espacio

asi

se

entiende ?

y si no existe, como lo puedo hacer :S?

solucionado poniendo el mismo codigo, pero wee un re quilombo.

solucion:

timer 

No funca :B

estoy usando este codigo:

 
Private Sub Timer1_Timer()
On Error Resume Next
Timer1.Enabled = False
Me.WebBrowser1.Document.All("ESTO NO LES IMPORTA XD").Value = "Hola!"
 
Dim HTML
Dim HTMLI
Set HTML = WebBrowser1.Document
For Each HTMLI In HTML.getElementsByTagName("input")
If HTMLI.Value = "NOMBRE DEL BOTON" Then
HTMLI.Click
Exit Sub
End If
Next
End Sub
 
 
Private Sub Form_Load()
WebBrowser1.Navigate ("PAGINA")
Exit Sub
 
 
 

con eso funciona..

pero quiero clikear 2 BOTONES. osea, primero uno y despues otro. me di cuenta q su cambio el End If (arriba o abajo de exit sub), NO ANDA!. ya probe asi, y tampoco anda:

 
BALABLBALBALBALBA CODIGO
 
Dim HTML
Dim HTMLI
Set HTML = WebBrowser1.Document
For Each HTMLI In HTML.getElementsByTagName("input")
If HTMLI.Value = "BOTON1" Then
If HTMLI.Value = "BOTON2" Then
HTMLI.Click
Exit Sub
End If
End If
Next
 

asi y mil formas mas ~.~

como hago?