Como funciona de la API Enumchildproc ??????

[olve]

Dessa,

Si lo modifico


te envio este codigo al parecer ya lo hace en orden lo unico q hice es cambiar el orden de la asignacion de los textos:


sera lo correcto ?????


  Hwndl = FindWindow(vbNullString, "AA")

  LsTexto1 = FindWindowEx(Hwndl, 0, "ThunderRT6TextBox", vbNullString)
  LsTexto2 = FindWindowEx(Hwndl, LsTexto1, "ThunderRT6TextBox", vbNullString)
  LsTexto3 = FindWindowEx(Hwndl, LsTexto2, "ThunderRT6TextBox", vbNullString)
  LsTexto4 = FindWindowEx(Hwndl, LsTexto3, "ThunderRT6TextBox", vbNullString)
 
  Call SendMessage(LsTexto1, WM_SETTEXT, 0, ByVal Text4.Text)
  Call SendMessage(LsTexto2, WM_SETTEXT, 0, ByVal Text3.Text)
  Call SendMessage(LsTexto3, WM_SETTEXT, 0, ByVal Text2.Text)
  Call SendMessage(LsTexto4, WM_SETTEXT, 0, ByVal Text1.Text)

[Dessa]

Exactamente a eso iva (OrderZA) o sea que el primer Handle que aparece es el del ultimo textbox que se agregó al programar, pero lo mejor era que entiendas ese ordenamiento por vos mismo al listarlo con EnumChildWindows (ahora lo dije bien  ), eso te serviría para cuando tengas que modificar aplicaciones con Hwdl de controles no tan dirictos como este.

[olve]

Gracias, Saludos

[olve]

Hola, Dessa

Espero me puedas orientar como puedo mandar mesages desde vb 6.0 a un apagina de internes (escribir texto a un texto de una pagina Web).


Que herramientas serian las mas optimas ???



Saludos

[seba123neo]

Hola, Dessa

Espero me puedas orientar como puedo mandar mesages desde vb 6.0 a un apagina de internes (escribir texto a un texto de una pagina Web).


Que herramientas serian las mas optimas ???



Saludos

no entiendo que queres hacer, escribir donde ??

[olve]

Seba

Lo que quiero hacer es mandar una cadena de un text de VB 6.0 a un text de un a pagina web.

ejem.

cadena = "AOJ"
text1.text = Cadena  (Exe vb6.0)  y al dar click a un command lo envie la cadena a una pagina web (Cadena llegue al text de la pagian Web)

me explico.

[seba123neo]

deberias plantear las dudas en otro post porque esto no tiene nada que ver con el tema principal del topic. ya hay ejemplos de eso en el foro, pero bueno es algo asi, pones un webbrowser y haces:

Código (vb) [Seleccionar] Expandir

WebBrowser1.Document.nombredelformularioweb.nombredelcontroltextboxweb.Value = Text1.Text