elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
28 Mayo 2012, 05:14  


Tema destacado:


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (Moderador: [D4N93R])
| | | |-+  Crear Objeto Desde Código
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Crear Objeto Desde Código  (Leído 809 veces)
Rudy21

Desconectado Desconectado

Mensajes: 149


Rudy21 Web Design


Ver Perfil WWW
Crear Objeto Desde Código
« en: 21 Septiembre 2011, 05:10 »

Buenas Noches

Actualmente tengo el código en VB NET de un programa que carga una página en un WebBrowser y en el sub de DocumentComplete realiza una función

ahora quiero hacer el mismo proceso varias veces (actualmente lo que hago es abrir varias veces el programa)

pero si lo hago necesito crear WebBrowsers de manera Dinámica esto lo logro sin problemas
Código:
        Dim wb1 As WebBrowser
        wb1 = New WebBrowser
        wb1.Navigate("http://www.google.com")

se me ocurre crear varias instancias como sean necesarias de la manera
wb1
wb2
wb3
wb4

etc....

pero como puedo manejar el evento DocumentComplete del webbrowser, seria la misma función para todos los navegadores algo así como

Código:
Private Sub wb1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles wb1.DocumentCompleted

pero hacer que el Handles maneje wb1.DocumentCompleted, wb2.DocumentCompleted, wb3.DocumentCompleted

algo así
Código:
Private Sub wb1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles wb1.DocumentCompleted, wb2.DocumentCompleted, wb3.DocumentCompleted


como hago para hacer esto dinámicamente

Saludos =D



En línea


Keyen Night


Desconectado Desconectado

Mensajes: 315


Nothing


Ver Perfil
Re: Crear Objeto Desde Código
« Respuesta #1 en: 21 Septiembre 2011, 05:26 »

La instrucción para agregar Handles en tiempo de ejecución es

Código
AddHandler OBJETO.EVENTO, AddressOf SUB

Ejemplo:

Código
        Dim X As New Button
       X.Text = "EJEMPLO"
       AddHandler X.Click, AddressOf EJEMPLO_Click
 
   Private Sub EJEMPLO_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
 
   End Sub
 

Que quieres hacer con varias instancias?, si explicas más quizás te pueda aconsejar una manera mejor.


En línea

La Fé Mueve Montañas...
                                    ...De Dinero

[Aporte] Factorización Relativamente Rápida
seba123neo


Desconectado Desconectado

Mensajes: 3.214



Ver Perfil WWW
Re: Crear Objeto Desde Código
« Respuesta #2 en: 21 Septiembre 2011, 06:15 »

Threads ?
En línea

Mucha gente, especialmente la ignorante desea castigarte por decir la verdad, por ser correcto, por ser tú. Nunca te disculpes por ser correcto, o por estar años delante de tu tiempo.
Si estas en lo cierto, y lo sabes, que hable tu razón. Incluso si eres una minoria de uno solo, la verdad sigue siendo la verdad. M. Gandhi
Rudy21

Desconectado Desconectado

Mensajes: 149


Rudy21 Web Design


Ver Perfil WWW
Re: Crear Objeto Desde Código
« Respuesta #3 en: 21 Septiembre 2011, 06:24 »

Lo que hace el programa es cargar la página http://miserver.com/formulario.php?numero= numero.text en el navegador (el archivo php automáticamente hace un SUBMIT al formulario a http://otrapagina.com/submit.php

entonces en el document complete si la URL actual es http://otrapagina.com/submit.php

aumentamos la variable CANTIDAD y si cantidad es MENOR a cantidad.text
cargamos nuevamente http://miserver.com/formulario.php?numero.text

lo que hace el programa es enviar mensajes de texto a un celular (como esos de publicidad de destruye 5 iphones y gana un tono y te piden que metas tu numero de celular y te llega un código)  entonces si pongo un numero y quiero que le llegue ese mensaje 5 veces pongo su numero y cantidad 5

entonces carga 5 veces el formulario de envio

Realmente es para jugarle bromas a mis amigos o molestar gente =D

pero lo que quiero es poder enviar a varios numeros en una sola instancia del programa
En línea


Rudy21

Desconectado Desconectado

Mensajes: 149


Rudy21 Web Design


Ver Perfil WWW
Re: Crear Objeto Desde Código
« Respuesta #4 en: 21 Septiembre 2011, 06:35 »

Si, los Threads me pueden servir, pero no se como aplicarlo exactamente una manera de solucionarlo fue hacer esto:

Código:

        Dim continuar As Boolean
        Dim wb1 As WebBrowser
        Dim cantidad As Integer
        cantidad = 0
nexti:
        If cantidad = 5 Then Exit Sub
        continuar = True
        wb1 = New WebBrowser
        wb1.Navigate("http://www.MISERVIDOR.com/form.php?1=1234567890")
        Do While continuar = True
            If wb1.CanGoBack Then
                continuar = False
                cantidad = cantidad + 1
                GoTo nexti
            End If
        Loop

de esta manera logro que se envien los mensajes sin problema, pero como hago para repetir este proceso n veces, supongo que como dicen es con Threads

En línea


.mokk.

Desconectado Desconectado

Mensajes: 177



Ver Perfil
Re: Crear Objeto Desde Código
« Respuesta #5 en: 21 Septiembre 2011, 07:17 »

Se podria hacer con un simple webbrowser no ? o.O

En teoria seria asi:

Ocuparemos un contador iniciado en 0, luego el webbrowser y ya finalmente pues en el metodo de webbrowserdocumentcomplete

solo mandamos desde otro metodo la primera vez que carga la web ejemplo desde el sub de un click

Código
Dim cont as integer = 0
Private Sub Click(blablabla)
  codigo blablabla
  WebBrowser1.Navigate("http://www.MISERVIDOR.com/form.php?1=1234567890")
End Sub
 
private sub WebBrowser1_DocumentComplete(blablbla)
  if cont < contador.text then
     cont += 1
     WebBrowser1.Navigate("http://www.MISERVIDOR.com/form.php?1=1234567890")
  end if
end sub
 

Eso cada vez que termine de cargarse la web hara eso y checara, ya si quieres que cheque tmb que este en la url de
http://otrapagina.com/submit.php
hay una propiedad del webbrowser que te lo indica, entonces solamente en ese if agregamos esa validacion de que solamente entre en el cuando cargue completamente la web de esa url.
« Última modificación: 21 Septiembre 2011, 07:20 por .mokk. » En línea

Rudy21

Desconectado Desconectado

Mensajes: 149


Rudy21 Web Design


Ver Perfil WWW
Re: Crear Objeto Desde Código
« Respuesta #6 en: 21 Septiembre 2011, 17:23 »

Si asi es como lo tengo originalmente

pero lo que quiero haces es poder repetir ese mismo proceso varias veces

poder enviar a varios numeros al mismo tiempo

algo asi como copiar y pegar el navegador y el sub de document complete
En línea


Keyen Night


Desconectado Desconectado

Mensajes: 315


Nothing


Ver Perfil
Re: Crear Objeto Desde Código
« Respuesta #7 en: 21 Septiembre 2011, 18:00 »

Desde el principio como tu mismo lo planteastes y como te explique en mi primer comment, debes crear varias instancias WebBrowser puede ser un Array de WebBrowser y crear un Sub preparado para recibir los eventos que necesites, agregar Handles con AddHandler recorriendo el Array. Cuando mandes a los WebBrowser a navegar simplemente debes recorrer el Array y usar la instrucción .Navigate

De esta manera todo se hara al mismo tiempo.
En línea

La Fé Mueve Montañas...
                                    ...De Dinero

[Aporte] Factorización Relativamente Rápida
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Escanear desde VB a un Objeto OLE
Programación Visual Basic
Cj2009z 0 346 Último mensaje 8 Diciembre 2006, 20:31
por Cj2009z
El componente ActiveX no puede crear el objeto
Dudas Generales
Pakuel 5 1,911 Último mensaje 24 Agosto 2007, 11:27
por Pakuel
Como crear un efecto de fuego sobre un objeto
Diseño Gráfico
Velku 5 3,202 Último mensaje 29 Septiembre 2009, 15:53
por Sub_Cero
Crear un objeto dentro de otro objeto
Programación Visual Basic
Tokes 7 2,265 Último mensaje 30 Agosto 2010, 05:41
por BlackZeroX (Astaroth)
Como crear un objeto sin inicializarlo?
PHP
Skeletron 1 934 Último mensaje 5 Enero 2011, 18:14
por 4ng3r
Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines