[VB] afficher appli access déja ouverte
Résolu/Fermé
fl0
Messages postés
357
Date d'inscription
lundi 5 mars 2007
Statut
Membre
Dernière intervention
10 novembre 2021
-
15 juil. 2008 à 16:16
fl0 Messages postés 357 Date d'inscription lundi 5 mars 2007 Statut Membre Dernière intervention 10 novembre 2021 - 18 juil. 2008 à 08:39
fl0 Messages postés 357 Date d'inscription lundi 5 mars 2007 Statut Membre Dernière intervention 10 novembre 2021 - 18 juil. 2008 à 08:39
A voir également:
- [VB] afficher appli access déja ouverte
- Comment desinstaller une appli sur pc - Guide
- Vb cable - Télécharger - Audio & Musique
- Vb - Télécharger - Langages
- Appli gps sans internet - Guide
- Afficher mot de passe wifi android - Guide
2 réponses
fl0
Messages postés
357
Date d'inscription
lundi 5 mars 2007
Statut
Membre
Dernière intervention
10 novembre 2021
209
16 juil. 2008 à 09:59
16 juil. 2008 à 09:59
allé umpeu d'aide...
fl0
Messages postés
357
Date d'inscription
lundi 5 mars 2007
Statut
Membre
Dernière intervention
10 novembre 2021
209
18 juil. 2008 à 08:39
18 juil. 2008 à 08:39
Salut
C tous je me suis débrouiller (si il y a certaine fonction inconnu c'est normal c'est un script umpeu special mais le principe est bon)
HWND Handle= NULL;
Handle= FindWindow("OMAIN",NULL); //OMAIN c'est la classe d'une application access
//Si access est ouvert alors le handle est !=0
if(Handle)
{
ShowWindow(Handle, SW_MINIMIZE); //
ShowWindow ( Handle, SW_SHOWMAXIMIZED );
SetForegroundWindow(Handle);
}
else
{
ProgramExecute("\"C:\\Program Files\\Microsoft Office\\OFFICE11\\MSACCESS.EXE\" \"C:\\superviseur\\access\\phase finale\\5360 - SUPERVISION PROGRAMME.MDB\" /wrkgrp \"C:\\superviseur\\access\\phase finale\\TechSpace.mdw\" /user \"Superviseur\" /pwd \"Superviseur\"");
}
C tous je me suis débrouiller (si il y a certaine fonction inconnu c'est normal c'est un script umpeu special mais le principe est bon)
HWND Handle= NULL;
Handle= FindWindow("OMAIN",NULL); //OMAIN c'est la classe d'une application access
//Si access est ouvert alors le handle est !=0
if(Handle)
{
ShowWindow(Handle, SW_MINIMIZE); //
ShowWindow ( Handle, SW_SHOWMAXIMIZED );
SetForegroundWindow(Handle);
}
else
{
ProgramExecute("\"C:\\Program Files\\Microsoft Office\\OFFICE11\\MSACCESS.EXE\" \"C:\\superviseur\\access\\phase finale\\5360 - SUPERVISION PROGRAMME.MDB\" /wrkgrp \"C:\\superviseur\\access\\phase finale\\TechSpace.mdw\" /user \"Superviseur\" /pwd \"Superviseur\"");
}