Soyez le premier à donner votre avis sur cette source.
Snippet vu 56 188 fois - Téléchargée 98 fois
Public hProcess, nRet, Retour as Long Const PROCESS_QUERY_INFORMATION = &H400 Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long Declare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpExitCode As Long) As Long Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long ' Pour lancer le programme : Retour = shell("LeProg.exe",1) ' Pour Fermer le programme : hProcess = OpenProcess(fdwAccess, False, Retour) GetExitCodeProcess hProcess, nRet Call TerminateProcess(hProcess, nRet) Call CloseHandle(hProcess)
14 juil. 2009 à 18:17
Utilise l'API ShellExecuteA :
Déclaration :
Public Declare Function ShellExecuteA Lib "shell32" (ByVal hWnd As Long, ByVal LPFile As String, ByVal PathFile As String, ByVal Other As String, ByVal Other2 As String, ByVal Param As Long) As Long
Utilisation :
ShellExecuteA 0, "Open", chemin_dossier, "", , 1
Une recherche sur Google ou PSC t'aurait donné la même réponse en deux minutes.
Bonne prog,
13 juil. 2009 à 19:58
j'aimerai ouvrir un repertoire directement a partir ce son chemin d'accès
15 nov. 2005 à 04:58
En ce qui concerne le gestionnaire des tâches, je sais m'en servir (je suis...ingénieeeuu.....informaticien, mais j'ai winXP), mais merci tout de même d'avoir obligeamment répondu à mon post.
Deux petites piques pour rester dans le ton fraternel caractéristique de la solidarité entre programmeurs sur vbFrance:
Note que le 'e' n'est jamais accentué quand il est placé devant un 'x'.
Note également que sur le web un clic suffit pour valider un formulaire, et que le temps de chargement des pages dépend du débit de ta connexion internet, donc même si les pages mettent du temps à charger, évite de cliquer 2 fois sur le bouton 'Ajouter votre commentaire' : ça fait un peu balourd, un peu comme quelqu'un qui a du mal à faire une recherche sur internet ;)
Si jamais tu as du temps à perdre et que l'envie te prend de me répondre sur un ton aussi constructif que mon post, fais-le via la messagerie interne de vbFrance, histoire de ne pas polluer la page de commentaires (mon message suffit bien, je pense), c'est pas très sympa pour les autres.
Sinon après t'avoir engeulé :) je vais t'expliquer:
je n'arrivais pas à utiliser l'API TerminateProcess(), maintenant le pb est réglé. Merci à Nix au passage pour cette source.
14 nov. 2005 à 19:35
ou même MSDN==> shell, fonction
vous êtes forts pour les recherches (je m'énerve comme un modo :))
14 nov. 2005 à 19:21
sinon après t'avoir engeulé :) je vais t'expliquer:
dans le gestionnaire des tâches, tu fais clic droit sur ton prog et aller dans le processus et voilà (à condition d'avoir XP biensur)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.