J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout ! J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas trop
satisfaisantes.
Merci d'avance.
J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout ! J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas trop
satisfaisantes.
Merci d'avance.
J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout ! J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas trop
satisfaisantes.
Merci d'avance.
Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe 2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
et se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
"Hafe" a écrit dans le message de news:J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas trop
satisfaisantes.
Merci d'avance.
Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe 2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
et se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
"Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de news:
7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas trop
satisfaisantes.
Merci d'avance.
Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe 2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
et se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
"Hafe" a écrit dans le message de news:J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas trop
satisfaisantes.
Merci d'avance.
Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe 2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
"Hafe" a écrit dans le message de news:
> J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>
> Dans ce programme, pour appeler un exe externe et attendre la fin de son
> exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
> (code
> trouvé sur le site de Microsoft) : l'appel se fait correctement sous
> Windows
> Nt et Windows 2000 (Pro et Server).
>
> Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
> bien trouvé un article sur le support Microsoft mais qui concerne
> uniquement
> Windows 2003.
>
> Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> satisfaisantes.
> Merci d'avance.
>
>
>
Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe 2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
"Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de news:
7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
> J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>
> Dans ce programme, pour appeler un exe externe et attendre la fin de son
> exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
> (code
> trouvé sur le site de Microsoft) : l'appel se fait correctement sous
> Windows
> Nt et Windows 2000 (Pro et Server).
>
> Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
> bien trouvé un article sur le support Microsoft mais qui concerne
> uniquement
> Windows 2003.
>
> Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> satisfaisantes.
> Merci d'avance.
>
>
>
Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe 2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
"Hafe" a écrit dans le message de news:
> J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>
> Dans ce programme, pour appeler un exe externe et attendre la fin de son
> exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
> (code
> trouvé sur le site de Microsoft) : l'appel se fait correctement sous
> Windows
> Nt et Windows 2000 (Pro et Server).
>
> Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
> bien trouvé un article sur le support Microsoft mais qui concerne
> uniquement
> Windows 2003.
>
> Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> satisfaisantes.
> Merci d'avance.
>
>
>
Si ce n'est pas du VB ce que tu as proposé, qu'est-ce alors ?
Utiliser des API's ne signifie pas ne pas utiliser VB.
Disons plutôt que tu utilises des librairies de fonctions externes, ici,
écrites en C, paliant ainsi les faiblesses de VB...
Guy
"X" a écrit dans le message de news:Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe
2 par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
fichier et se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier... Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
"Hafe" a écrit dans le message de news:J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
trop
satisfaisantes.
Merci d'avance.
Si ce n'est pas du VB ce que tu as proposé, qu'est-ce alors ?
Utiliser des API's ne signifie pas ne pas utiliser VB.
Disons plutôt que tu utilises des librairies de fonctions externes, ici,
écrites en C, paliant ainsi les faiblesses de VB...
Guy
"X" <X@Y.Z> a écrit dans le message de news:
exBUn9E2GHA.4228@TK2MSFTNGP06.phx.gbl...
Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe
2 par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
fichier et se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier... Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
"Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de news:
7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
trop
satisfaisantes.
Merci d'avance.
Si ce n'est pas du VB ce que tu as proposé, qu'est-ce alors ?
Utiliser des API's ne signifie pas ne pas utiliser VB.
Disons plutôt que tu utilises des librairies de fonctions externes, ici,
écrites en C, paliant ainsi les faiblesses de VB...
Guy
"X" a écrit dans le message de news:Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe
2 par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
fichier et se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier... Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
"Hafe" a écrit dans le message de news:J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
Dans ce programme, pour appeler un exe externe et attendre la fin de son
exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
(code
trouvé sur le site de Microsoft) : l'appel se fait correctement sous
Windows
Nt et Windows 2000 (Pro et Server).
Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai
bien trouvé un article sur le support Microsoft mais qui concerne
uniquement
Windows 2003.
Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
trop
satisfaisantes.
Merci d'avance.
La fonction Shell ne permet pas d'attendre la fin de l'exécution du
programme, c'est pour cela qu'il utilise la fonction CreateProcess()
"X" a écrit dans le message de
news:Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe
2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
etse ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------"Hafe" a écrit dans le message de news:
> J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>
> Dans ce programme, pour appeler un exe externe et attendre la fin de
> son
> exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
> (code
> trouvé sur le site de Microsoft) : l'appel se fait correctement sous
> Windows
> Nt et Windows 2000 (Pro et Server).
>
> Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai> bien trouvé un article sur le support Microsoft mais qui concerne
> uniquement
> Windows 2003.
>
> Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
trop> satisfaisantes.
> Merci d'avance.
>
>
>
La fonction Shell ne permet pas d'attendre la fin de l'exécution du
programme, c'est pour cela qu'il utilise la fonction CreateProcess()
"X" <X@Y.Z> a écrit dans le message de
news:exBUn9E2GHA.4228@TK2MSFTNGP06.phx.gbl...
Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe
2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
et
se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------
"Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de news:
7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
> J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>
> Dans ce programme, pour appeler un exe externe et attendre la fin de
> son
> exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
> (code
> trouvé sur le site de Microsoft) : l'appel se fait correctement sous
> Windows
> Nt et Windows 2000 (Pro et Server).
>
> Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai
> bien trouvé un article sur le support Microsoft mais qui concerne
> uniquement
> Windows 2003.
>
> Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
trop
> satisfaisantes.
> Merci d'avance.
>
>
>
La fonction Shell ne permet pas d'attendre la fin de l'exécution du
programme, c'est pour cela qu'il utilise la fonction CreateProcess()
"X" a écrit dans le message de
news:Bonjour,
Pour appeler seulement, ça devrait suffire:
Shell "explorer.exe http://www.ifrance.com/Irolog"
Pour ouvrir et fermer, mais ce n'est pas en VB:
Private Declare Function OpenProcess Lib "kernel32" ( _
ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long _
) As Long
'
Private Declare Function TerminateProcess Lib "kernel32" ( _
ByVal hProcess As Long, _
ByVal uExitCode As Long _
) As Long
Private Declare Function CloseHandle Lib "kernel32" ( _
ByVal hObject As Long) As Long
'
Private Const PROCESS_TERMINATE = &H1
Dim NumProcess As Long
Dim RC As Long
Dim hProcess As Long
'
Sub ouvrir()
NumProcess = Shell(Nom_fic, 1)
End sub
Sub fermer()
hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
RC = TerminateProcess(hProcess, 0&)
RC = CloseHandle(hProcess)
End Sub
Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler l'exe
2
par Shelle, ensuite l'exe 2 fait son travail, le balance dans un fichier
etse ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
Enfin, pour les cas généraux...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------"Hafe" a écrit dans le message de news:
> J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>
> Dans ce programme, pour appeler un exe externe et attendre la fin de
> son
> exécution, j'utilisais la fonction CreateProcess et tout ce qui va avec
> (code
> trouvé sur le site de Microsoft) : l'appel se fait correctement sous
> Windows
> Nt et Windows 2000 (Pro et Server).
>
> Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
J'ai> bien trouvé un article sur le support Microsoft mais qui concerne
> uniquement
> Windows 2003.
>
> Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
trop> satisfaisantes.
> Merci d'avance.
>
>
>
On peut éventuellement temporiser derrière alors...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
a écrit dans le message de news:
> La fonction Shell ne permet pas d'attendre la fin de l'exécution du
> programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>
>
>
> "X" a écrit dans le message de
> news:
>> Bonjour,
>>
>> Pour appeler seulement, ça devrait suffire:
>>
>> Shell "explorer.exe http://www.ifrance.com/Irolog"
>>
>> Pour ouvrir et fermer, mais ce n'est pas en VB:
>>
>> Private Declare Function OpenProcess Lib "kernel32" ( _
>> ByVal dwDesiredAccess As Long, _
>> ByVal bInheritHandle As Long, _
>> ByVal dwProcessId As Long _
>> ) As Long
>> '
>> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> ByVal hProcess As Long, _
>> ByVal uExitCode As Long _
>> ) As Long
>> Private Declare Function CloseHandle Lib "kernel32" ( _
>> ByVal hObject As Long) As Long
>> '
>> Private Const PROCESS_TERMINATE = &H1
>> Dim NumProcess As Long
>> Dim RC As Long
>> Dim hProcess As Long
>> '
>> Sub ouvrir()
>> NumProcess = Shell(Nom_fic, 1)
>> End sub
>> Sub fermer()
>> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> RC = TerminateProcess(hProcess, 0&)
>> RC = CloseHandle(hProcess)
>> End Sub
>>
>>
>> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
>> 2
>> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> et
>> se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
>> Enfin, pour les cas généraux...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
> ----------
>> "Hafe" a écrit dans le message de
>>
>> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >
>> > Dans ce programme, pour appeler un exe externe et attendre la fin de
>> > son
>> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
>> > (code
>> > trouvé sur le site de Microsoft) : l'appel se fait correctement sous
>> > Windows
>> > Nt et Windows 2000 (Pro et Server).
>> >
>> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
> J'ai
>> > bien trouvé un article sur le support Microsoft mais qui concerne
>> > uniquement
>> > Windows 2003.
>> >
>> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> trop
>> > satisfaisantes.
>> > Merci d'avance.
>> >
>> >
>> >
>>
>>
>
>
On peut éventuellement temporiser derrière alors...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
<thierry@free> a écrit dans le message de news:
utUV9XQ2GHA.4796@TK2MSFTNGP06.phx.gbl...
> La fonction Shell ne permet pas d'attendre la fin de l'exécution du
> programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>
>
>
> "X" <X@Y.Z> a écrit dans le message de
> news:exBUn9E2GHA.4228@TK2MSFTNGP06.phx.gbl...
>> Bonjour,
>>
>> Pour appeler seulement, ça devrait suffire:
>>
>> Shell "explorer.exe http://www.ifrance.com/Irolog"
>>
>> Pour ouvrir et fermer, mais ce n'est pas en VB:
>>
>> Private Declare Function OpenProcess Lib "kernel32" ( _
>> ByVal dwDesiredAccess As Long, _
>> ByVal bInheritHandle As Long, _
>> ByVal dwProcessId As Long _
>> ) As Long
>> '
>> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> ByVal hProcess As Long, _
>> ByVal uExitCode As Long _
>> ) As Long
>> Private Declare Function CloseHandle Lib "kernel32" ( _
>> ByVal hObject As Long) As Long
>> '
>> Private Const PROCESS_TERMINATE = &H1
>> Dim NumProcess As Long
>> Dim RC As Long
>> Dim hProcess As Long
>> '
>> Sub ouvrir()
>> NumProcess = Shell(Nom_fic, 1)
>> End sub
>> Sub fermer()
>> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> RC = TerminateProcess(hProcess, 0&)
>> RC = CloseHandle(hProcess)
>> End Sub
>>
>>
>> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
>> 2
>> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> et
>> se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
>> Enfin, pour les cas généraux...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr
>> http://irolog.free.fr/ecrire/index.htm
-------------------------------------------------------------------------
> ----------
>> "Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de
>> 7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
>> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >
>> > Dans ce programme, pour appeler un exe externe et attendre la fin de
>> > son
>> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
>> > (code
>> > trouvé sur le site de Microsoft) : l'appel se fait correctement sous
>> > Windows
>> > Nt et Windows 2000 (Pro et Server).
>> >
>> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
> J'ai
>> > bien trouvé un article sur le support Microsoft mais qui concerne
>> > uniquement
>> > Windows 2003.
>> >
>> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> trop
>> > satisfaisantes.
>> > Merci d'avance.
>> >
>> >
>> >
>>
>>
>
>
On peut éventuellement temporiser derrière alors...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
a écrit dans le message de news:
> La fonction Shell ne permet pas d'attendre la fin de l'exécution du
> programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>
>
>
> "X" a écrit dans le message de
> news:
>> Bonjour,
>>
>> Pour appeler seulement, ça devrait suffire:
>>
>> Shell "explorer.exe http://www.ifrance.com/Irolog"
>>
>> Pour ouvrir et fermer, mais ce n'est pas en VB:
>>
>> Private Declare Function OpenProcess Lib "kernel32" ( _
>> ByVal dwDesiredAccess As Long, _
>> ByVal bInheritHandle As Long, _
>> ByVal dwProcessId As Long _
>> ) As Long
>> '
>> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> ByVal hProcess As Long, _
>> ByVal uExitCode As Long _
>> ) As Long
>> Private Declare Function CloseHandle Lib "kernel32" ( _
>> ByVal hObject As Long) As Long
>> '
>> Private Const PROCESS_TERMINATE = &H1
>> Dim NumProcess As Long
>> Dim RC As Long
>> Dim hProcess As Long
>> '
>> Sub ouvrir()
>> NumProcess = Shell(Nom_fic, 1)
>> End sub
>> Sub fermer()
>> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> RC = TerminateProcess(hProcess, 0&)
>> RC = CloseHandle(hProcess)
>> End Sub
>>
>>
>> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
>> 2
>> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> et
>> se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
>> Enfin, pour les cas généraux...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
> ----------
>> "Hafe" a écrit dans le message de
>>
>> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >
>> > Dans ce programme, pour appeler un exe externe et attendre la fin de
>> > son
>> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
>> > (code
>> > trouvé sur le site de Microsoft) : l'appel se fait correctement sous
>> > Windows
>> > Nt et Windows 2000 (Pro et Server).
>> >
>> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout !
> J'ai
>> > bien trouvé un article sur le support Microsoft mais qui concerne
>> > uniquement
>> > Windows 2003.
>> >
>> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> trop
>> > satisfaisantes.
>> > Merci d'avance.
>> >
>> >
>> >
>>
>>
>
>
Et tu vas faire comment pour savoir quand ton programme aura fini d'etre
exécuté ?
Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
utiliser
un truc plus sur : CreateProcess().
"X" a écrit dans le message de
news:On peut éventuellement temporiser derrière alors...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------a écrit dans le message de news:
> La fonction Shell ne permet pas d'attendre la fin de l'exécution du
> programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>
>
>
> "X" a écrit dans le message de
> news:
>> Bonjour,
>>
>> Pour appeler seulement, ça devrait suffire:
>>
>> Shell "explorer.exe http://www.ifrance.com/Irolog"
>>
>> Pour ouvrir et fermer, mais ce n'est pas en VB:
>>
>> Private Declare Function OpenProcess Lib "kernel32" ( _
>> ByVal dwDesiredAccess As Long, _
>> ByVal bInheritHandle As Long, _
>> ByVal dwProcessId As Long _
>> ) As Long
>> '
>> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> ByVal hProcess As Long, _
>> ByVal uExitCode As Long _
>> ) As Long
>> Private Declare Function CloseHandle Lib "kernel32" ( _
>> ByVal hObject As Long) As Long
>> '
>> Private Const PROCESS_TERMINATE = &H1
>> Dim NumProcess As Long
>> Dim RC As Long
>> Dim hProcess As Long
>> '
>> Sub ouvrir()
>> NumProcess = Shell(Nom_fic, 1)
>> End sub
>> Sub fermer()
>> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> RC = TerminateProcess(hProcess, 0&)
>> RC = CloseHandle(hProcess)
>> End Sub
>>
>>
>> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
l'exe>> 2
>> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
fichier> et
>> se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
>> Enfin, pour les cas généraux...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
-> ----------
>> "Hafe" a écrit dans le message de
news:>>
>> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >
>> > Dans ce programme, pour appeler un exe externe et attendre la fin de
>> > son
>> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
avec>> > (code
>> > trouvé sur le site de Microsoft) : l'appel se fait correctement sous
>> > Windows
>> > Nt et Windows 2000 (Pro et Server).
>> >
>> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout
>> > !
> J'ai
>> > bien trouvé un article sur le support Microsoft mais qui concerne
>> > uniquement
>> > Windows 2003.
>> >
>> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> trop
>> > satisfaisantes.
>> > Merci d'avance.
>> >
>> >
>> >
>>
>>
>
>
Et tu vas faire comment pour savoir quand ton programme aura fini d'etre
exécuté ?
Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
utiliser
un truc plus sur : CreateProcess().
"X" <X@Y.Z> a écrit dans le message de
news:OhU3TbV2GHA.3464@TK2MSFTNGP03.phx.gbl...
On peut éventuellement temporiser derrière alors...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------
<thierry@free> a écrit dans le message de news:
utUV9XQ2GHA.4796@TK2MSFTNGP06.phx.gbl...
> La fonction Shell ne permet pas d'attendre la fin de l'exécution du
> programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>
>
>
> "X" <X@Y.Z> a écrit dans le message de
> news:exBUn9E2GHA.4228@TK2MSFTNGP06.phx.gbl...
>> Bonjour,
>>
>> Pour appeler seulement, ça devrait suffire:
>>
>> Shell "explorer.exe http://www.ifrance.com/Irolog"
>>
>> Pour ouvrir et fermer, mais ce n'est pas en VB:
>>
>> Private Declare Function OpenProcess Lib "kernel32" ( _
>> ByVal dwDesiredAccess As Long, _
>> ByVal bInheritHandle As Long, _
>> ByVal dwProcessId As Long _
>> ) As Long
>> '
>> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> ByVal hProcess As Long, _
>> ByVal uExitCode As Long _
>> ) As Long
>> Private Declare Function CloseHandle Lib "kernel32" ( _
>> ByVal hObject As Long) As Long
>> '
>> Private Const PROCESS_TERMINATE = &H1
>> Dim NumProcess As Long
>> Dim RC As Long
>> Dim hProcess As Long
>> '
>> Sub ouvrir()
>> NumProcess = Shell(Nom_fic, 1)
>> End sub
>> Sub fermer()
>> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> RC = TerminateProcess(hProcess, 0&)
>> RC = CloseHandle(hProcess)
>> End Sub
>>
>>
>> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
l'exe
>> 2
>> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
fichier
> et
>> se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
>> Enfin, pour les cas généraux...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr
>> http://irolog.free.fr/ecrire/index.htm
-------------------------------------------------------------------------
-
> ----------
>> "Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de
news:
>> 7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
>> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >
>> > Dans ce programme, pour appeler un exe externe et attendre la fin de
>> > son
>> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
avec
>> > (code
>> > trouvé sur le site de Microsoft) : l'appel se fait correctement sous
>> > Windows
>> > Nt et Windows 2000 (Pro et Server).
>> >
>> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout
>> > !
> J'ai
>> > bien trouvé un article sur le support Microsoft mais qui concerne
>> > uniquement
>> > Windows 2003.
>> >
>> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> trop
>> > satisfaisantes.
>> > Merci d'avance.
>> >
>> >
>> >
>>
>>
>
>
Et tu vas faire comment pour savoir quand ton programme aura fini d'etre
exécuté ?
Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
utiliser
un truc plus sur : CreateProcess().
"X" a écrit dans le message de
news:On peut éventuellement temporiser derrière alors...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------a écrit dans le message de news:
> La fonction Shell ne permet pas d'attendre la fin de l'exécution du
> programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>
>
>
> "X" a écrit dans le message de
> news:
>> Bonjour,
>>
>> Pour appeler seulement, ça devrait suffire:
>>
>> Shell "explorer.exe http://www.ifrance.com/Irolog"
>>
>> Pour ouvrir et fermer, mais ce n'est pas en VB:
>>
>> Private Declare Function OpenProcess Lib "kernel32" ( _
>> ByVal dwDesiredAccess As Long, _
>> ByVal bInheritHandle As Long, _
>> ByVal dwProcessId As Long _
>> ) As Long
>> '
>> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> ByVal hProcess As Long, _
>> ByVal uExitCode As Long _
>> ) As Long
>> Private Declare Function CloseHandle Lib "kernel32" ( _
>> ByVal hObject As Long) As Long
>> '
>> Private Const PROCESS_TERMINATE = &H1
>> Dim NumProcess As Long
>> Dim RC As Long
>> Dim hProcess As Long
>> '
>> Sub ouvrir()
>> NumProcess = Shell(Nom_fic, 1)
>> End sub
>> Sub fermer()
>> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> RC = TerminateProcess(hProcess, 0&)
>> RC = CloseHandle(hProcess)
>> End Sub
>>
>>
>> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
l'exe>> 2
>> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
fichier> et
>> se ferme tout seul, puis l'exe 1 reprend les donnée dans le fichier...
>> Enfin, pour les cas généraux...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
-> ----------
>> "Hafe" a écrit dans le message de
news:>>
>> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >
>> > Dans ce programme, pour appeler un exe externe et attendre la fin de
>> > son
>> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
avec>> > (code
>> > trouvé sur le site de Microsoft) : l'appel se fait correctement sous
>> > Windows
>> > Nt et Windows 2000 (Pro et Server).
>> >
>> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du tout
>> > !
> J'ai
>> > bien trouvé un article sur le support Microsoft mais qui concerne
>> > uniquement
>> > Windows 2003.
>> >
>> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont pas
> trop
>> > satisfaisantes.
>> > Merci d'avance.
>> >
>> >
>> >
>>
>>
>
>
Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
que mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde, tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
a écrit dans le message de news:
> Et tu vas faire comment pour savoir quand ton programme aura fini d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" a écrit dans le message de
> news:
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
> ----------
>> a écrit dans le message de news:
>>
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>> >
>> >
>> >
>> > "X" a écrit dans le message de
>> > news:
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
>>------------------------------------------------------------------------
> -
>> > ----------
>> >> "Hafe" a écrit dans le message de
> news:
>> >>
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la fin
>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>
Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
que mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde, tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
<thierry@free> a écrit dans le message de news:
e48PybW2GHA.4312@TK2MSFTNGP02.phx.gbl...
> Et tu vas faire comment pour savoir quand ton programme aura fini d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" <X@Y.Z> a écrit dans le message de
> news:OhU3TbV2GHA.3464@TK2MSFTNGP03.phx.gbl...
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr
>> http://irolog.free.fr/ecrire/index.htm
-------------------------------------------------------------------------
> ----------
>> <thierry@free> a écrit dans le message de news:
>> utUV9XQ2GHA.4796@TK2MSFTNGP06.phx.gbl...
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>> >
>> >
>> >
>> > "X" <X@Y.Z> a écrit dans le message de
>> > news:exBUn9E2GHA.4228@TK2MSFTNGP06.phx.gbl...
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr
>> >> http://irolog.free.fr/ecrire/index.htm
>>
------------------------------------------------------------------------
> -
>> > ----------
>> >> "Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de
> news:
>> >> 7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la fin
>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>
Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
que mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde, tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
a écrit dans le message de news:
> Et tu vas faire comment pour savoir quand ton programme aura fini d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" a écrit dans le message de
> news:
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
> ----------
>> a écrit dans le message de news:
>>
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>> >
>> >
>> >
>> > "X" a écrit dans le message de
>> > news:
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
>>------------------------------------------------------------------------
> -
>> > ----------
>> >> "Hafe" a écrit dans le message de
> news:
>> >>
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la fin
>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>
efectivement, chacun son tuc : solution propre ou bidouille...
"X" a écrit dans le message de
news:Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
tempsque mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde, tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------a écrit dans le message de news:
> Et tu vas faire comment pour savoir quand ton programme aura fini
> d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" a écrit dans le message de
> news:
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
-> ----------
>> a écrit dans le message de news:
>>
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>> >
>> >
>> >
>> > "X" a écrit dans le message de
>> > news:
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier...>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
>>------------------------------------------------------------------------
-> -
>> > ----------
>> >> "Hafe" a écrit dans le message de
> news:
>> >>
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la fin
de>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui
>> >> > va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
sous>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
tout>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
pas>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>
efectivement, chacun son tuc : solution propre ou bidouille...
"X" <X@Y.Z> a écrit dans le message de
news:OiqpdhW2GHA.1252@TK2MSFTNGP04.phx.gbl...
Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
temps
que mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde, tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------
<thierry@free> a écrit dans le message de news:
e48PybW2GHA.4312@TK2MSFTNGP02.phx.gbl...
> Et tu vas faire comment pour savoir quand ton programme aura fini
> d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" <X@Y.Z> a écrit dans le message de
> news:OhU3TbV2GHA.3464@TK2MSFTNGP03.phx.gbl...
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr
>> http://irolog.free.fr/ecrire/index.htm
-------------------------------------------------------------------------
-
> ----------
>> <thierry@free> a écrit dans le message de news:
>> utUV9XQ2GHA.4796@TK2MSFTNGP06.phx.gbl...
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>> >
>> >
>> >
>> > "X" <X@Y.Z> a écrit dans le message de
>> > news:exBUn9E2GHA.4228@TK2MSFTNGP06.phx.gbl...
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier...
>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr
>> >> http://irolog.free.fr/ecrire/index.htm
>>
------------------------------------------------------------------------
-
> -
>> > ----------
>> >> "Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de
> news:
>> >> 7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la fin
de
>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui
>> >> > va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
sous
>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
tout
>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
pas
>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>
efectivement, chacun son tuc : solution propre ou bidouille...
"X" a écrit dans le message de
news:Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
tempsque mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde, tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------a écrit dans le message de news:
> Et tu vas faire comment pour savoir quand ton programme aura fini
> d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" a écrit dans le message de
> news:
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
-> ----------
>> a écrit dans le message de news:
>>
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction CreateProcess()
>> >
>> >
>> >
>> > "X" a écrit dans le message de
>> > news:
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier...>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
>>------------------------------------------------------------------------
-> -
>> > ----------
>> >> "Hafe" a écrit dans le message de
> news:
>> >>
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la fin
de>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui
>> >> > va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
sous>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
tout>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
pas>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>
L'API dans un langage VB, c'est comme de l'assembleur en ligne (assembler
in line) dans du C, ce n'est pas une solution "propre", c'est de l'ultime
quand on ne peut rien faire d'autre de rationnel :o)
On voit de plus en plus des API ici, alors qu'on peut faire du VB, dans ce
cas, si on veut faire du langage système, il faut le faire en assembleur,
qui désormais, à part son code propre, utilise les API... Ce n'est pas un
forum de programmation système...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
a écrit dans le message de news:efectivement, chacun son tuc : solution propre ou bidouille...
"X" a écrit dans le message de
news:Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
tempsque mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde,
tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------a écrit dans le message de news:
> Et tu vas faire comment pour savoir quand ton programme aura fini
> d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" a écrit dans le message de
> news:
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
-> ----------
>> a écrit dans le message de news:
>>
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction
>> > CreateProcess()
>> >
>> >
>> >
>> > "X" a écrit dans le message de
>> > news:
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier...>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
>>------------------------------------------------------------------------
-> -
>> > ----------
>> >> "Hafe" a écrit dans le message de
> news:
>> >>
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la
>> >> > fin
de>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui
>> >> > va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
sous>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
tout>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui
>> >> > concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
pas>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>
L'API dans un langage VB, c'est comme de l'assembleur en ligne (assembler
in line) dans du C, ce n'est pas une solution "propre", c'est de l'ultime
quand on ne peut rien faire d'autre de rationnel :o)
On voit de plus en plus des API ici, alors qu'on peut faire du VB, dans ce
cas, si on veut faire du langage système, il faut le faire en assembleur,
qui désormais, à part son code propre, utilise les API... Ce n'est pas un
forum de programmation système...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
<thierry@free> a écrit dans le message de news:
u13zXwW2GHA.1304@TK2MSFTNGP05.phx.gbl...
efectivement, chacun son tuc : solution propre ou bidouille...
"X" <X@Y.Z> a écrit dans le message de
news:OiqpdhW2GHA.1252@TK2MSFTNGP04.phx.gbl...
Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
temps
que mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde,
tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr
http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------
<thierry@free> a écrit dans le message de news:
e48PybW2GHA.4312@TK2MSFTNGP02.phx.gbl...
> Et tu vas faire comment pour savoir quand ton programme aura fini
> d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" <X@Y.Z> a écrit dans le message de
> news:OhU3TbV2GHA.3464@TK2MSFTNGP03.phx.gbl...
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr
>> http://irolog.free.fr/ecrire/index.htm
-------------------------------------------------------------------------
-
> ----------
>> <thierry@free> a écrit dans le message de news:
>> utUV9XQ2GHA.4796@TK2MSFTNGP06.phx.gbl...
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction
>> > CreateProcess()
>> >
>> >
>> >
>> > "X" <X@Y.Z> a écrit dans le message de
>> > news:exBUn9E2GHA.4228@TK2MSFTNGP06.phx.gbl...
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier...
>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr
>> >> http://irolog.free.fr/ecrire/index.htm
>>
------------------------------------------------------------------------
-
> -
>> > ----------
>> >> "Hafe" <Hafe@discussions.microsoft.com> a écrit dans le message de
> news:
>> >> 7B0F73FE-1BD0-47CA-95D1-A90652BF34F9@microsoft.com...
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la
>> >> > fin
de
>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui
>> >> > va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
sous
>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
tout
>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui
>> >> > concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
pas
>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>
L'API dans un langage VB, c'est comme de l'assembleur en ligne (assembler
in line) dans du C, ce n'est pas une solution "propre", c'est de l'ultime
quand on ne peut rien faire d'autre de rationnel :o)
On voit de plus en plus des API ici, alors qu'on peut faire du VB, dans ce
cas, si on veut faire du langage système, il faut le faire en assembleur,
qui désormais, à part son code propre, utilise les API... Ce n'est pas un
forum de programmation système...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
a écrit dans le message de news:efectivement, chacun son tuc : solution propre ou bidouille...
"X" a écrit dans le message de
news:Ben, 2, 3 secondes généralement c'est terminé, faut étalonner avec le
tempsque mets le second exe, plus une marge; ou encore en lisant le fichier
produit par l'exe 2 , tant que pas lu, et si pas plus de x seconde,
tente
une nouvelle lecture..
Mais bon, chacun son truc...
--
Site ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site LOGICIELS
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
--------------------------------------------------------------------------
----------a écrit dans le message de news:
> Et tu vas faire comment pour savoir quand ton programme aura fini
> d'etre
> exécuté ?
> Dans son cas, Shell n'est pas adapté, c'est pour cela qu'il préfère
> utiliser
> un truc plus sur : CreateProcess().
>
>
> "X" a écrit dans le message de
> news:
>> On peut éventuellement temporiser derrière alors...
>>
>> --
>> Site ROMANS édités
>> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> Site LOGICIELS
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm-------------------------------------------------------------------------
-> ----------
>> a écrit dans le message de news:
>>
>> > La fonction Shell ne permet pas d'attendre la fin de l'exécution du
>> > programme, c'est pour cela qu'il utilise la fonction
>> > CreateProcess()
>> >
>> >
>> >
>> > "X" a écrit dans le message de
>> > news:
>> >> Bonjour,
>> >>
>> >> Pour appeler seulement, ça devrait suffire:
>> >>
>> >> Shell "explorer.exe http://www.ifrance.com/Irolog"
>> >>
>> >> Pour ouvrir et fermer, mais ce n'est pas en VB:
>> >>
>> >> Private Declare Function OpenProcess Lib "kernel32" ( _
>> >> ByVal dwDesiredAccess As Long, _
>> >> ByVal bInheritHandle As Long, _
>> >> ByVal dwProcessId As Long _
>> >> ) As Long
>> >> '
>> >> Private Declare Function TerminateProcess Lib "kernel32" ( _
>> >> ByVal hProcess As Long, _
>> >> ByVal uExitCode As Long _
>> >> ) As Long
>> >> Private Declare Function CloseHandle Lib "kernel32" ( _
>> >> ByVal hObject As Long) As Long
>> >> '
>> >> Private Const PROCESS_TERMINATE = &H1
>> >> Dim NumProcess As Long
>> >> Dim RC As Long
>> >> Dim hProcess As Long
>> >> '
>> >> Sub ouvrir()
>> >> NumProcess = Shell(Nom_fic, 1)
>> >> End sub
>> >> Sub fermer()
>> >> hProcess = OpenProcess(PROCESS_TERMINATE, -1&, NumProcess)
>> >> RC = TerminateProcess(hProcess, 0&)
>> >> RC = CloseHandle(hProcess)
>> >> End Sub
>> >>
>> >>
>> >> Sinon, j ne comprends pas pourqoi tout ça??? Un exe 1 peut appeler
> l'exe
>> >> 2
>> >> par Shelle, ensuite l'exe 2 fait son travail, le balance dans un
> fichier
>> > et
>> >> se ferme tout seul, puis l'exe 1 reprend les donnée dans le
fichier...>> >> Enfin, pour les cas généraux...
>> >>
>> >> --
>> >> Site ROMANS édités
>> >> http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
>> >> Site LOGICIELS
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr
>> >> http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://irolog.free.fr/ecrire/index.htm
>>------------------------------------------------------------------------
-> -
>> > ----------
>> >> "Hafe" a écrit dans le message de
> news:
>> >>
>> >> > J'ai un programme VB6 qui date de Windows NT puis Windows 2000.
>> >> >
>> >> > Dans ce programme, pour appeler un exe externe et attendre la
>> >> > fin
de>> >> > son
>> >> > exécution, j'utilisais la fonction CreateProcess et tout ce qui
>> >> > va
> avec
>> >> > (code
>> >> > trouvé sur le site de Microsoft) : l'appel se fait correctement
sous>> >> > Windows
>> >> > Nt et Windows 2000 (Pro et Server).
>> >> >
>> >> > Depuis que je suis sous Windows XP, cela ne fonctionne plus du
tout>> >> > !
>> > J'ai
>> >> > bien trouvé un article sur le support Microsoft mais qui
>> >> > concerne
>> >> > uniquement
>> >> > Windows 2003.
>> >> >
>> >> > Quelqu'un a une idée ? Les autres méthodes à disposition ne sont
pas>> > trop
>> >> > satisfaisantes.
>> >> > Merci d'avance.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >
>> >
>>
>>
>
>