Ayuda soy principiante!

[xDie]

Hola buenos les cuento, estoy haciendo un programa que tiene el internet controls, para que me habra una web y me presione un boton del formulario.. e echo esto

Código [Seleccionar] Expandir


Private Sub VotarDos()

    On Error GoTo Reload
         
    WebBrowser.Document.Forms(0).Elements(1).Click
   
    Votados = Votados + 1
    VotadosPost = VotadosPost + 1
    Exit Sub
Reload: Form_Load

End Sub

Ahora yo quiero que despues de eso vuelva para atras y haga lo mismo, por eso a esta funcion la llame de un timer

Código [Seleccionar] Expandir


Call VotarDos

el tema es que intente volver atras con webBrowser.goback y como que los itmer hacen relajos y no puedo,  haste puse un solo timer para que vuelva hacia atras la pagina.. pero nose... que dicen ustdes???

[Hans el Topo]

Hola buenos les cuento, estoy haciendo un programa que tiene el internet controls, para que me habra una web y me presione un boton del formulario.. e echo esto

Código [Seleccionar] Expandir


Private Sub VotarDos()

    On Error GoTo Reload
         
    WebBrowser.Document.Forms(0).Elements(1).Click
   
    Votados = Votados + 1
    VotadosPost = VotadosPost + 1
    Exit Sub
Reload: Form_Load

End Sub

Ahora yo quiero que despues de eso vuelva para atras y haga lo mismo, por eso a esta funcion la llame de un timer

Código [Seleccionar] Expandir


Call VotarDos

el tema es que intente volver atras con webBrowser.goback y como que los itmer hacen relajos y no puedo,  haste puse un solo timer para que vuelva hacia atras la pagina.. pero nose... que dicen ustdes???

kita eso y pon un único timer con un intervalo de lo que calcules que le costará realizar la acción... xD

Código [Seleccionar] Expandir

Const URL_DESEADA ="http://www.tudire.com"

Private Sub Form_Activate()
    Me.WebBrowser.Navigate URL_DESEADA, navNoReadFromCache + navNoWriteToCache + navNoHistory
End Sub

Private Sub timer1_timer()
    On Error GoTo Reload
     
    WebBrowser.Document.Forms(0).Elements(1).Click
   
    Votados = Votados + 1
    VotadosPost = VotadosPost + 1
    Exit Sub
    Me.WebBrowser.Navigate URL_DESEADA, navNoReadFromCache + navNoWriteToCache + navNoHistory
    Me.WebBrowser.Refresh

Reload: Form_Load
end sub


espero que te sirva...
sino me dices y pienso algo 

[xDie]

Gracias pero no me sirvio eso.. porque no puedo poner la url como constante ya que la va cambiar el usuario, y no quiero borrar la cache, si no cuando vuelvo para atras me da error qeu no encuentra nada y eso...

[Hans el Topo]

Gracias pero no me sirvio eso.. porque no puedo poner la url como constante ya que la va cambiar el usuario, y no quiero borrar la cache, si no cuando vuelvo para atras me da error qeu no encuentra nada y eso...

si la url la va a cambiar el usuario ,en vez de hacer una constante la tomas de un textbox y listo no?

lo del cache es para que no sospechen de lo que haces...lo puedes quitar y tan feliz...




si me explicas que quiers hacer... aligual podria ayudarte mas concretamente, xk no me quedo realmente claro lo que deseas...

[xDie]

Bueno te explico!!!
Quiero hacer un programa que haga votos en la pagina de www.sexyono.com, esta pagina cuando te registras te dan una direccion donde esta tu foto, cuando vos votas, la foto cambia por otra, por eso quiero que vuelva para atras y que vote de vuelta pero otro voto... ya tengo ams de la mitad del programa hecho, puedo hacer los votos pero aleatorios... te dejo el source http://rapidshare.de/files/26203878/proyecto.rar.html
mi msn es rodri89soft@hotmail.com Gracias!!!

[Hans el Topo]

Bueno te explico!!!
Quiero hacer un programa que haga votos en la pagina de www.sexyono.com, esta pagina cuando te registras te dan una direccion donde esta tu foto, cuando vos votas, la foto cambia por otra, por eso quiero que vuelva para atras y que vote de vuelta pero otro voto... ya tengo ams de la mitad del programa hecho, puedo hacer los votos pero aleatorios... te dejo el source http://rapidshare.de/files/26203878/proyecto.rar.html
mi msn es rodri89soft@hotmail.com Gracias!!!

debajo de cada foto te pone la url del usuario...

el programa deberia de contar con 5 lineas o unas pocas más... xD

Código [Seleccionar] Expandir

Private Sub timer1_timer()
    On Error GoTo nopasana

    Me.WebBrowser.Navigate txturl.text    'cargamos la url
    Me.WebBrowser.Refresh                     'refrescamos el control

   'aki realizas que se clickee el valor que deseas
   
   
     txtvotos.text=txtvotos.text+1
    Exit Sub
   
Reload: resume next
end sub

necesitas 1 command 1 timer(ponle el intervalo de 2000 o asi...) y 2 txt (3 si kieres marcar el valor del click dinamico)
el txt1 para poner el link a la foto,el txt2 para contar los votos k has enviado,el command activa el timer y el timer hace todo...

[xDie]

No puedo ahcerlo de la manera que dices, gracias por intentar ayudar!

[Hans el Topo]

No puedo ahcerlo de la manera que dices, gracias por intentar ayudar!

xk no puedes hacerlo?

[xDie]

No me funciona eso que hiciste, no lelga a hacer el voto, y el toro da error de actualizar, no sirve el refresh.. si tenes un ejemplo  para mostrarlo estaria bueno.. o modificas el codigo que te di...Gracias!!!

[soru13]

como podria hacer que con ese codigo, me posteara mensajes autamaticamente con los timers y un mensaje predeterminado???