c c
Thu, 14 Jan 2010 23:19:40 -0800
bonjour et merci
Moi j'utilise les fonctions split et join mais je me disais qu'il existait peut-être plus simple Encore merci Claude > Date: Thu, 14 Jan 2010 23:16:10 +0100 > From: francois.bre...@orange.fr > To: prog@fr.openoffice.org > Subject: Re: [prog] Emplacement d'un fichier > > c c a écrit : > > Bonjour, > > > > > > > > La variable ThisComponent.location contient le chemin et le nom du fichier > > ouvert. > > > > > > > > En existe-t-il une qui ne contienne que le chemin ? > > > > > Pour ma part j'utilise cette fonction pour avoir le chemin : > > Function RepertFich(StrFich As String) As String > > Dim PosSlash As Integer > > PosSlash = Len(StrFich) - 1 > While Mid(StrFich,PosSlash,1) <> "/" And PosSlash >= 1 > PosSlash = PosSlash - 1 > Wend > If PosSlash = 0 Then > RepertFich() = "" > Else > RepertFich() = Left(StrFich, PosSlash - 1) > End If > End Function > > > Merci > > > > > > > > Claude > > > > _________________________________________________________________ > > Discutez en direct avec vos amis sur Messenger ! > > http://www.windowslive.fr/messenger > > > > > > > --------------------------------------------------------------------- > To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org > For additional commands, e-mail: prog-h...@fr.openoffice.org > _________________________________________________________________ Découvrez Windows 7 en 7 secondes ! http://clk.atdmt.com/FRM/go/181574577/direct/01/