OVH Cloud OVH Cloud

chemin de l'exe

2 réponses
Avatar
Drakkhen
bonjour,

Je ne suis pas fichu de trouver le chemin d'une petit appli ecrite en VB 6
au runtime.
Comment faut-il faire svp ?

Merci.

--
Drakkhen

http://michael.moreno.free.fr/

2 réponses

Avatar
Stéphane Maillard
Bonjour,

Dim MonChemin As String
Dim CheminComplet As String

MonChemin = App.Path
CheminComplet = App/Path & "" & App.EXEName
--

Cordialement

Stéphane Maillard
Rixy Software
Port.: 06.15.49.63.92
Tél/Fax : 02.99.20.17.37

L'intégrité de ce message n'étant pas assurée sur Internet, Rixy Software ne peut être tenu responsable de son contenu.
Si vous n'êtes pas destinataire de ce message confidentiel, merci de le détruire et d'avertir immédiatement l'expéditeur.

The integrity of this message cannot be guaranteed on the Internet. Rixy Software can not therefore be considered responsible for
the contents.
If you are not the intended recipient of this confidential message, then please delete it and notify immediatly the sender.

"Drakkhen" a écrit dans le message de news: #
bonjour,

Je ne suis pas fichu de trouver le chemin d'une petit appli ecrite en VB 6
au runtime.
Comment faut-il faire svp ?

Merci.

--
Drakkhen

http://michael.moreno.free.fr/







---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.514 / Virus Database: 312 - Release Date: 28/08/2003
Avatar
ng
SAlut,
Utilise plutot ceci :

Dim sAppChe As String
If Right$(App.Path, 1) = "" Then sAppChe = App.Path Else sAppChe = App.Path
& ""

MsgBox sAppChe

Nicolas.
"Drakkhen" a écrit dans le message de news:
#
bonjour,

Je ne suis pas fichu de trouver le chemin d'une petit appli ecrite en VB 6
au runtime.
Comment faut-il faire svp ?

Merci.

--
Drakkhen

http://michael.moreno.free.fr/