últimos mensajes de: demoniox12

Mostrar Mensajes
Páginas: 1 2 [3] 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 ... 20

Programación / Programación Visual Basic / Realizar tabs en un webbrowser mediante SendMessage

en: 27 Febrero 2009, 19:27 pm

Buenas...

He estado intentando realizar tabs para seleccionar otros links mediante sendmessage.. pero no me ha funcionado.. hago el click y no realiza ninguna accion.. dejo el source a ver si alguien encuentra el error..

Form:

Código

Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As String) As Long
Private Const WM_KEYDOWN = &H100
Private Const WM_KEYUP = &H101
Private Const VK_TAB = &H9
 
Private Sub Command1_Click()
Dim hwnd As Long
hwnd = GetBrowserHandle(Me.hwnd)
SendMessage hwnd, WM_KEYDOWN, VK_TAB, 0&
'SendMessage hWnd, WM_KEYUP, VK_TAB, 0&
End Sub
 
Private Sub Form_Load()
WebBrowser1.Navigate "http://www.google.com"
End Sub

Modulo:

Código

      Private Declare Function GetClassName Lib "user32.dll" Alias "GetClassNameA" ( _
          ByVal hwnd As Long, _
          ByVal lpClassName As String, _
          ByVal nMaxCount As Long _
      ) As Long
 
      Private Declare Function EnumChildWindows Lib "user32.dll" ( _
          ByVal hWndParent As Long, _
          ByVal lpEnumFunc As Long, _
          ByVal lParam As Long _
      ) As Long
 
      Private hWndIE As Long
 
 
      Private Function EnumChildProc(ByVal hwnd As Long, ByVal lParam As Long) As Long
          Dim sClassName As String
          sClassName = String(255, vbNullChar)
          Call GetClassName(hwnd, sClassName, 255)
          sClassName = Left$(sClassName, InStr(sClassName, vbNullChar) - 1)
          If sClassName <> "Internet Explorer_Server" Then
              EnumChildProc = 1
          Else
              hWndIE = hwnd
          End If
      End Function
 
      Public Function GetBrowserHandle(ByVal hWndParent) As Long
          hWndIE = 0
          Call EnumChildWindows(hWndParent, AddressOf EnumChildProc, 1)
          GetBrowserHandle = hWndIE
      End Function

Encuentra el handle y todo del webbrowser pero no se porke no realiza los tabs en la pagina..

Saludos!

22	Programación / Programación Visual Basic / Re: Realizar un Click en el webbrowser	en: 26 Febrero 2009, 00:33 am
Cita de: odeONeSs en 23 Febrero 2009, 03:03 am Yo lo conseguí hacer, google me pillo. Lo que hice fue impedir que el ratón saliera del formulario, luego hice que el formulario midiera un pixel, apuntando justo al anuncio de mi pagina web (cargada en un webbrowser) la sensación que le da al usuario( por si el programa lo quieres "espandir") es que se le bloquea el ratón, entonces lo mas logico es que toque todos los botones del ratón y haga click en tu anuncio. No es una forma muy... tecnica.. ni muy purista.. Es mas bien una chapuza.. pero me resulto, en mi adsense subia el dinero como la espuma.. y google amablemente me mando a la *****.. Citar Hemos detectado que se han producido clics no válidos en los anuncios Google de sus sitios. En adelante, es posible que ajustemos su pago en los días en los que se produjeron clics no válidos a fin de abonar a los anunciantes la cantidad derivada de la actividad no válida. Le recordamos que Google prohíbe terminantemente el uso de cualquier método para generar clics no válidos. Este tipo de clics incluye, sin carácter exhaustivo: clics generados a través del uso de robots, herramientas que realizan clics automáticamente, clics manuales realizados por un editor en sus propias páginas web o el hecho de que un editor anime a otras personas a hacer clic en sus anuncios. Si ha hecho clic en los anuncios de sus páginas web a modo de prueba, tenga en cuenta que ello está prohibido, como también lo está animar a otras personas a hacerlo por cualquier motivo, ya que esto podría aumentar artificialmente los costes de los anunciantes. Por otro lado, no hay necesidad de probar los anuncios que se publican en su sitio, puesto que nuestros especialistas revisan todos y cada uno de ellos para asegurarse de que cumplen con los estándares publicitarios de Google. Si desea visitar la URL de destino de un anuncio para ver su contenido o para añadirla a su lista de sitios filtrados, utilice la Herramienta de demostración de AdSense de Google, disponible a través de este vínculo: https://www.google.com/adsense/previewtool?hl=es La Herramienta de demostración de AdSense de Google es un elemento adicional del menú de Internet Explorer 6.x para Windows que aparece al hacer clic con el botón derecho del ratón. Esta herramienta permite obtener una vista previa de los anuncios que pueden aparecer en cualquier página web. Los clics y las impresiones realizadas desde esta herramienta no se acumulan en la cuenta del anunciante. Puede acceder al sitio de destino sin preocuparse de que se generen clics no válidos en su cuenta y sin acarrear costes para el anunciante en concepto de sus clics de prueba. Si tiene más preguntas, no dude en responder a este mensaje. Estaremos encantados de ayudarle en todo lo que podamos. Atentamente, El equipo AdSense de Google Los de google ... saben mucho.. $:-\$ Un saludo!! Serias tan amable de pasarme el source de tal soft? Saludos!

23	Programación / Programación Visual Basic / Re: Realizar un Click en el webbrowser	en: 16 Febrero 2009, 22:05 pm
La idea que tengo seria de utilizar un sendmessage que envie el click en tales posiciones del webbrowser que esta escondido.... Alguien me puede decir si es posible? Saludos!

24	Programación / Programación Visual Basic / Re: Realizar un Click en el webbrowser	en: 16 Febrero 2009, 05:31 am
Lo que estoy tratando de hacer es hacer click en un anuncio de adsense.. estuve viendo todo ya he probado muchisimo con el webbrowser1.document....... y tmb probe con winsock... obtengo las respuestas y todo.. pero no pude descubrir de donde saka el link del iframe.. es dinamico.. ya que primero obtiene.. http://pagead2.googlesyndication.com/pagead/show_ads.js despues... http://googleads.g.doubleclick.net/pagead/test_domain.js y por ultimo obtiene el link del iframe... http://googleads.g.doubleclick.net/pagead/ads?client=...&dt=1234762350779&lmt=...&format=...&output=...&correlator=...&channel=...&url=http%3A%2F%2Flocalhost%2Fa.html&color_bg=...&color_text=...&color_link=...&color_url=...&color_border=...&ad_type=...&ea=...&frm=...&ga_vid=...&ga_sid=...&ga_hid=...&flash=...&u_h=...&u_w=...&u_ah=...&u_aw=...&u_cd=...&u_tz=...&u_his=...&u_java=...&u_nplug=...&u_nmime=...&dtd=43 En negrita los nros dinamicos de la url.. Saludos!

25	Programación / Programación Visual Basic / Realizar un Click en el webbrowser	en: 15 Febrero 2009, 15:06 pm
Buenas, Estuve tratando largo rato de poder realizar un click en el webbrowser... pero de forma escondida y sin utilizar webbrowser1.document.elobjeto.click ya que por ese medio es inalcanzable ya lo he intentado.. Hay alguna forma de "mandar" un click a un lugar especifico del webbrowser (estando escondido el form)? Saludos! PD: No me digan que utilize winsock o Inet ya lo he probado y no me sirve para lo que lo quiero..

26	Programación / Programación Visual Basic / Saltando restricciones de cuenta limitada	en: 18 Noviembre 2008, 01:14 am
Buenas... se me ha presentado un problemilla Hay alguna manera de saltarse las restricciones con vb asi como lo hacen los troyanos como por ejemplo bifrost? que por mas que tengan los usuarios una cuenta limitada se copian sin problemas en disco:\windows\system32 Saludos!

27	Programación / Programación Visual Basic / Re: Alguna manera de deshacerse de msvbvm60.dll?	en: 17 Noviembre 2008, 20:24 pm
Conclusion: aprender a manejarme mejor en C/C++ Saludos!

28	Programación / Programación Visual Basic / Re: Conectar a Router (local) desde VB	en: 17 Noviembre 2008, 09:21 am
utiliza exactamente lo que te di.. saludos

29	Programación / Programación Visual Basic / Alguna manera de deshacerse de msvbvm60.dll?	en: 16 Noviembre 2008, 15:53 pm
Buenas... Hay alguna manera de deshacerse de la dll que utiliza vb? y solo utilizar apis? No necesito el formulario ni nada solo necesito que realice funciones que tranquiamente se pueden hacer con apis Saludos!

30	Programación / Programación Visual Basic / Re: Conectar a Router (local) desde VB	en: 16 Noviembre 2008, 02:09 am
Cita de: Memphis en 14 Noviembre 2008, 15:45 pm Conectar a Router (local) desde VB -------------------------------------------------------------- Connotados, les cuento lo que quiero hacer. quiero conectarme a mi router a traves de visual basic usando el control WebBrowser ingresando en los textbox el user y password y luego hacer clic en el boton submit todo esto de forma automatica.. es posible hacer eso ?? o existe alguna otra forma ?¿ Código WebBrowser1.Document.Forms(0).elements(0).Value = "aca el usuario del login" WebBrowser1.Document.Forms(0).elements(1).Value = "aca el pass del login" WebBrowser1.Document.Forms(0).submit Saludos!

Páginas: 1 2 [3] 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 ... 20