IsWindow repond toujours non !

zoup - 5 juin 2000 à 18:28
cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 - 27 juil. 2007 à 14:39
Bonjour,

Le code suivant repond toujours non bien
que le programme lancé par shell soit
ouvert.
Y a t il une erreur?
je suis sous NT4 SP4 et VB6 SP3.

voici le code du module:

Option Explicit

Public Declare Function IsWindow Lib "user32" (ByVal hWnd As Long) As Long

Public Function zoup()

Dim retour As Long

retour = Shell("c:\program files\winzip\winzip32", 1)
MsgBox (retour)
If (IsWindow(retour)) Then
MsgBox ("oui")
Else
MsgBox ("non")
End If
.........

1 réponse

cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 9
27 juil. 2007 à 14:39
c'est normal retour n'est pas un handle de fenetre

@+
0
Rejoignez-nous