Nom de l'application parente ?Résolu

Question

Bonjour,

Je ne suis pas certain que mon premier message soit passè alors ..

Voila mon problème. Je dois créer un contrôle activeX pour d'autres dévelopeurs. L'objectif de ce contole est de vérifier la version du soft en-cours. J'ai besoin pour ça de connaître le nom de l'application. Comment, à partir de mon contrôle, connaître le nom de l'application parent. Je pensais utiliser la fonction App.ExeName mais elle me retourne le nom de mon contrôle OCX. Si j'utilise Parent.App.eXename ça ne marche pas.

Avez vous une idée ??

Merci

cs_rt15 · Accepted Answer

Milles excuse, je suis même pas arrivé à utiliser GetCommandLine depuis VB6.

Par contre l'API GetModuleFileName semble fonctionner (Je l'ai testé avec succès depuis une dll ActiveX, je me souvenais plus que c'était un contrôle).

Public Sub allo()
Dim a As String
a=Space$(250)
Call GetModuleFileName(0,a,251)
MsgBox a
End Sub

cs_rt15 · Answer

Peut être avec l'API GetCommandLine.
Elle renvoie la ligne qui à été tapée pour lancer l'appli (Chemin d'accès plus nom généralement, mais parfois il y a des paramètres.

PCPT · Answer

salut

ouai je vois, un truc du genre...







Private Sub UserControl_ReadProperties(PropBag As PropertyBag)

    Dim F As Object

    Set F = UserControl.Parent

    MsgBox F.App.EXEName

End Sub



le probl&#232;me est que le App n'est pas li&#233; &#224; la Form par elle-m&#234;me. je doute que cela soit r&#233;alisable... 

mais si tu trouves, je suis preneur &#233;galement ;)

cs_wsixpo · Answer

ça marche bien chez moi aussi.

Bravos et merci de votre aide a tous les deux.

Wsixpo

PCPT · Answer

ok en compil&#233;,

merci rt15, &#231;&#224; me servira sans doute^^

Nom de l'application parente ?

5 réponses

Discussions similaires