Bonjour,

Thiebaut Jean-Luc a écrit :
Merci Didier,

c'est à quelque chose comme cela que je pensais...

Bonne année à Tous,
   Jean-Luc

Didier Retter a écrit :
Thiebaut Jean-Luc a écrit :
Bonjour,

existe-t-il une méthode simple et élégante (via l'API ?) pour déterminer
si on travaille sous Windows, Linux ou Mac ?
Bonjour Jean-Luc,

Voilà une fonction que j'utilise

Sub TestSys(CheminFichier as String)
   Dim MaVariable As Variant
   MaVariable = GetGuiType()

Remarque 1:

GetGuiType() retourne un numérique (entier), donc à minima user d'un typage integer plutôt que variant. De plus, on peut faire l'économie d'une transition par variable puisqu'il suffit de tester directement le retour de la fonction GetGuiType()


   Select Case MaVariable
       Case = 1
       CheminFichier = "G:\OoCalc\Gestion\StockAtel\FichArt"
       Case = 4
       CheminFichier = "/mnt/usb/OoCalc/Gestion/StockAtel/FichArt"
       Case Else
       MsgBox "Ca c'est pas bon !"
   End Select
End Sub


Remarque 2:

Penser à user de convertToUrl(chemin+fichier) et de convertFromUrl() pour assurer une meilleure portabilité.

Enfin, on pourra également utiliser la fonction getPathSeparator().


mon appli est sur une clef usb et je travaille soit sous linux :-) soit sous Window$

espérant avoir répondu à ton problème

Bonne année à tous


Bonne année à tous également.

Didier

François


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Répondre à