El fondo de VB simula el clic del mouse en una página web
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
.