Visual Basic 2005. Salvar archivos desde Visual Basic.

[moradazo]

Gracias por tu respuesta.
Ya entendí, es buscar la manera de ver todas las ventanas que tenga activas en ese momento y elegir la que diga "Treat3" bueno algo asi pensaba:

Código PHP:

   Private Sub Comprobar(ByVal clase As String) 
        Dim ret As Long 
        ret = FindWindow(Nothing, "Treat3") 
        If ret <> 0 Then 
            MsgBox("La aplicación está abierta", vbInformation + vbOKOnly) 
        Else 
            MsgBox("La aplicación NO está abierta", vbInformation + vbOKOnly) 
        End If 
    End Sub  
   

Con éste código me va buscar exclusivamente las ventanas que sean llamadas solo por Treat3, pero se me ocurre pensar que busque más bien las que empiezan o contengan el "Treat3".

Yo pensé algo así:

Código:

Private Sub Comprobar(ByVal clase As String)
        Dim A As String ="Treat3"
        Dim ret As Long
        ret = FindWindow(Nothing, A.Contains("Treat3"))
        If ret <> 0 Then
            MsgBox("La aplicación está abierta", vbInformation + vbOKOnly)
        Else
            MsgBox("La aplicación NO está abierta", vbInformation + vbOKOnly)
        End If
    End Sub

Pero más bien ahi estoy preguntando si el titulo contiene el mismo título, es una idea que quize probar y no pude. Alguna otra forma para saber el nombre de la ventana?