Ver Mensaje Individual
  #34 (permalink)  
Antiguo 25/08/2008, 07:37
Avatar de moradazo
moradazo
 
Fecha de Ingreso: julio-2008
Ubicación: [email protected]
Mensajes: 355
Antigüedad: 15 años, 10 meses
Puntos: 2
Respuesta: Visual Basic 2005. Salvar archivos desde Visual Basic.

Al ejecutarlo paso a paso, hay una parte donde se supone distingue si la ventana existe o no:

Private Sub Comprobar(ByVal clase As String)

Dim ret As Long

' busca la ventana y retorna el Handle
ret = FindWindow(clase, vbNullString)
TextBox1.Text = ret
'si retorna distinto de 0 es porque la encontró
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

Puse un textbox para saber que numeros estaba dando y estos son los resultados:

Internet: 322288895582013560
Excel: 322851845531762688
Outlook: 323696270461894656
Visual Basic: 137922760064304820
Bloc de Notas: 324259220415315968

Jamas me va dar cero, aunque el programa no se este ejecutando. Pero mi pregunta es si en realidad un programa de estos al estar abierto me daria ese numero tan alto? Gracias