Como puedo obtener una ventana de windows que este activa desde vb6

   Salu2:

   Una ? quisiera saber si mediante una API se puede obtener una ventana que se este ejecutando por ejemplo tengo el sig codigo

MODULO .BAS
Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long

Public Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long

EN EL FORM TENGO LO SIG

Private Sub Form_Activate()

On Error GoTo Error_Identificar

Dim StrCadenaAs String
StrCadena = String(100, Chr$(0))
    GetWindowText Me.hwnd, StrCadena, 100
   StrCadena= Left$(StrCadena, InStr(StrCadena, Chr$(0)) - 1)
   StrCadena= StrCadena+ " " + StrCadena
   SetWindowText Me.hwnd, StrCadena

Exit Sub

Error_Identificar:
MsgBox Err.Number & " " & Err.Source & " " & Err.Description, vbCritical, "Mensaje del sistema"

End Sub

Cuando se ejecuta lo unico que hace es que obtiene el nombre de esa ventana y lo pone despues.Pero quisiera saber si por ejemplo desde este programa puedo tambien obtener el nombre de otra ventana que se este activando aparte, por ejemplo que habra la ventana para hacer la conexion a internet y obtener el nombre de esa ventana como lo puedo ser.....

	Bienvenido(a), Visitante. Favor de ingresar o registrarse. ¿Perdiste tu email de activación? - Agosto 20, 2008, 10:55:03 Boton Buscar