La commande shell/récup d'un processus actif
cs_Belec
Messages postés
13
Date d'inscription
vendredi 21 mars 2003
Statut
Membre
Dernière intervention
6 mars 2008
-
20 mai 2003 à 11:20
isa911 Messages postés 63 Date d'inscription mercredi 28 février 2001 Statut Membre Dernière intervention 25 novembre 2010 - 11 juil. 2005 à 14:03
isa911 Messages postés 63 Date d'inscription mercredi 28 février 2001 Statut Membre Dernière intervention 25 novembre 2010 - 11 juil. 2005 à 14:03
A voir également:
- La commande shell/récup d'un processus actif
- Commande make linux - Conseils pratiques -C / C++ / C++.NET
- Alternative processus excel ✓ - Forum VB.NET
- 'Mvn' n'est pas reconnu en tant que commande interne - Forum Java
- Mvn n'est pas reconnu en tant que commande interne ✓ - Forum Java
- Voir les processus en cours linux - Forum C / C++ / C++.NET
3 réponses
isa911
Messages postés
63
Date d'inscription
mercredi 28 février 2001
Statut
Membre
Dernière intervention
25 novembre 2010
11 juil. 2005 à 14:00
11 juil. 2005 à 14:00
Isa911
isa911
Messages postés
63
Date d'inscription
mercredi 28 février 2001
Statut
Membre
Dernière intervention
25 novembre 2010
11 juil. 2005 à 14:02
11 juil. 2005 à 14:02
Isa911
isa911
Messages postés
63
Date d'inscription
mercredi 28 février 2001
Statut
Membre
Dernière intervention
25 novembre 2010
11 juil. 2005 à 14:03
11 juil. 2005 à 14:03
C'est quoi, ce truc !!!
J'essaye encore 1 coup !
As tu essayé la methode Open ?
If Module1.CatiaOuvert = True Then
Set DrwDocument = AppCATIA.Documents.Open(Adressecomp)
End If
Public Function CatiaOuvert() As Boolean
On Error GoTo err:
Set AppCATIA = GetObject(, "catia.Application")
err:
If err.Number <> 0 Then
CatiaOuvert = False
Else
CatiaOuvert = True
End If
End Function
Isa911
J'essaye encore 1 coup !
As tu essayé la methode Open ?
If Module1.CatiaOuvert = True Then
Set DrwDocument = AppCATIA.Documents.Open(Adressecomp)
End If
Public Function CatiaOuvert() As Boolean
On Error GoTo err:
Set AppCATIA = GetObject(, "catia.Application")
err:
If err.Number <> 0 Then
CatiaOuvert = False
Else
CatiaOuvert = True
End If
End Function
Isa911
