El fondo de VB simula el clic del mouse en una página web

Recientemente he estado buscando una manera de simular un clic del mouse en una página web usando postmessage, pero solo activa el navegador, no el botón. ¡Porque no puedo encontrar el hwnd del "botón"!

Sería mejor si fuera sólo una página web y no Flash.

Añade Microsoft Internet Controls desde el menú "Proyectos, Gadgets" y dibuja el control webbrowser1.

Navega hasta tu sitio web y detecta el botón que deseas en el evento webbrowser1_DocumentComplete (analiza primero el código fuente). ). Quiere un botón (primero analice el código fuente para encontrar el botón o enlace que desea)

Como sigue:

En caso de error, reanudar siguiente

Atenuar docm como documento HTML , obj1 como objeto

Si no (pDisp es webbrowser1.Object), salga del sub

Luego salga del sub

. Objeto) Luego salga de Sub

Establezca docm = webbrowser1.Document

Para cada obj1 en docm.getElementsByTagName("input")

... ...

siguiente

Directamente docm.getElementByid("xxxxxxxx")

Después de encontrarlo, asígnelo a una variable global (por ejemplo: atenuar htmlIn como HTMLInputElement para definir un cuadro de entrada de botón) y haga clic en él usando un control de temporizador: htmlIn.click

….

Se recomienda navegar por el sitio web en 40 segundos: webbrowser1.Navigate strURL

Haga clic en el evento anterior.

Dado que webbrowser1.fresh solo envía información parcial, el sitio web solo acepta y devuelve información parcial

.