elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Sigue las noticias más importantes de seguridad informática en el Twitter! de elhacker.NET


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  ayuda para sacar estas imagenes WebBrowser
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: ayuda para sacar estas imagenes WebBrowser  (Leído 1,829 veces)
dmgdani

Desconectado Desconectado

Mensajes: 29



Ver Perfil
ayuda para sacar estas imagenes WebBrowser
« en: 25 Septiembre 2014, 04:04 am »

hola a todos haber como me podiais ayudar para sacar estas imagenes capcha
de estas paginas web.
en todas es muy similar pero al estar en un iframe no consigo haceder a ellas tambien intente

WebBrowser1.Document.getelementbyid("adcopy-outer").ScrollIntoView (True)

para acercar el srcoll y luego capturar la pantalla pero si esta minimizada no se como capturar solo el WebBrowser y no la ventana activa.
tambien se agradeceria si supieses la forma de capturar los controles recargar capcha mas o menos para ponerlos yo y poder hacerlo mas automatizado.

y ya para terminar hay algun programa que te rellene los capchas automaticamente.



//http://payfaucet.com/
//http://www.faucetbtc.com
//http://www.greencoins.org

Código:
       Dim ORange As Object
       Dim i As Integer
   
       Set ORange = WebBrowser1.Document.Body.createControlRange()
       Picture2.Cls
       For i = 0 To WebBrowser1.Document.images.length - 1
           Call ORange.Add(WebBrowser1.Document.images.Item(i))
           Call ORange.execCommand("Copy")
           Set Picture2.Picture = Clipboard.GetData
'           MsgBox WebBrowser1.Document.Images.Item(i).GetAttribute("src")
           
           MsgBox WebBrowser1.Document.images.Item(i).GetAttribute("src")
           
'           If WebBrowser1.Document.images.Item(i).GetAttribute("id") = "banner" Then
'               Call ORange.Add(WebBrowser1.Document.images.Item(i))
'               Call ORange.execCommand("Copy")
'               Set Picture2.Picture = Clipboard.GetData
'               Exit For
'           End If
       Next
    End If





un saludo y muchas gracias


En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
que programa hace estas imagenes impresionantes
Diseño Gráfico
CarSoft 7 3,278 Último mensaje 2 Junio 2006, 20:28 pm
por aNexos
Deshabilitar carga de imagenes en webbrowser
Programación Visual Basic
rubeng 7 3,383 Último mensaje 3 Septiembre 2007, 07:45 am
por cobein
No mostrar imagenes en las paginas web del webbrowser.
Programación Visual Basic
Chefito 2 1,772 Último mensaje 22 Enero 2008, 11:48 am
por Chefito
¿Como se crean estas imágenes? « 1 2 »
Diseño Gráfico
SMFSM 11 15,312 Último mensaje 24 Junio 2014, 10:49 am
por Madafaqas
Sacar imágenes de una url
Desarrollo Web
sinfronio 3 2,374 Último mensaje 8 Octubre 2015, 20:27 pm
por Platanito Mx
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines