Slt,
je crois qu'il va y avoir débat !
Sous windows 8 et Jaws 15 ce qui suit fonctionne bien...

run ( "\"D:\\Le joli dossier avec des espaces\\MonProgramme.exe\"" )



Le 03/04/2015 23:31, Yannick Youalé a écrit :
Resalut à tous !
Nouvelle version de la fonction qui du coup change de nom.
Au départ nommée GetFileShortPath, elle devient GetShortPath tout court.
Principalement parce que la nouvelle version prend effectivement en compte à la fois les chemins vers des fichier et ceux vers des dossiers. La précédente je m'en suis rendu compte ne se limitait qu'au fichiers.
Pour rappel, elle renvoi le chemin court.
Voici le code:
Début de code jawsscript

String Function GetShortPath (string sPath)

; renvoi le chemin court du fichier ou dossier

var

string s,

object oFSO,

object oFil,

object oFld

let oFSO = CreateObject("Scripting.FileSystemObject")

; s'agit-il d'un fichier ou d'un dossier ?

if oFSO.FileExists(sPath) == 0 then ; c'est un dossier

let oFld = oFSO.GetFolder(sPath)

let s = oFld.ShortPath()

else ; c'est un fichier

let oFil = oFSO.GetFile(sPath)

let s = oFil.ShortPath()

EndIf

; renvoi

return "" + s + ""

EndFunction

Fin du code jawsscript

Puisse cela être... blablabla, blablabla...

Yannick Daniel Youalé
La programmation est une religion. Aimez-la, ou quittez-la.
Mon site: www.visuweb.net <http://www.visuweb.net>

    ----- Original Message -----
    *From:* QuentinC [email protected] [jawsscript]
    <mailto:[email protected]%20[jawsscript]>
    *To:* [email protected] <mailto:[email protected]>
    *Sent:* Friday, April 03, 2015 9:44 PM
    *Subject:* Re: [JawsScript] JawsScript- fonction GetFileShortPath
    pour renvoyer le chemin court vers un fichier

    Oups désolé je me suis planté dans la citation. Désolé.

    __._,_.___
    ------------------------------------------------------------------------
    Envoyé par : QuentinC <[email protected]
    <mailto:[email protected]>>
    ------------------------------------------------------------------------
    Répondre en mode Web
    
<https://fr.groups.yahoo.com/neo/groups/jawsscript/conversations/messages/3054;_ylc=X3oDMTJxcWV0a2NhBF9TAzk3NDkwNDY4BGdycElkAzczOTMwODgyBGdycHNwSWQDMjEyMzgwMDE5OQRtc2dJZAMzMDU0BHNlYwNmdHIEc2xrA3JwbHkEc3RpbWUDMTQyODA5Mzg4Mg--?act=reply&messageNum=3054>
        •       Répondre à expéditeur
    
<mailto:[email protected]?subject=Re%A0%3A%20Re%3A%20%5BJawsScript%5D%20JawsScript-%20fonction%20GetFileShortPath%20pour%20renvoyer%20le%20chemin%20court%20vers%20un%20fichier>
        •       Répondre à groupe
    
<mailto:[email protected]?subject=Re%A0%3A%20Re%3A%20%5BJawsScript%5D%20JawsScript-%20fonction%20GetFileShortPath%20pour%20renvoyer%20le%20chemin%20court%20vers%20un%20fichier>
        •       Nouvelle discussion
    
<https://fr.groups.yahoo.com/neo/groups/jawsscript/conversations/newtopic;_ylc=X3oDMTJmY25kNnNnBF9TAzk3NDkwNDY4BGdycElkAzczOTMwODgyBGdycHNwSWQDMjEyMzgwMDE5OQRzZWMDZnRyBHNsawNudHBjBHN0aW1lAzE0MjgwOTM4ODI->
        •       Toute la discussion
    
<https://fr.groups.yahoo.com/neo/groups/jawsscript/conversations/topics/3048;_ylc=X3oDMTM1MDRqYXFpBF9TAzk3NDkwNDY4BGdycElkAzczOTMwODgyBGdycHNwSWQDMjEyMzgwMDE5OQRtc2dJZAMzMDU0BHNlYwNmdHIEc2xrA3Z0cGMEc3RpbWUDMTQyODA5Mzg4MgR0cGNJZAMzMDQ4>
    (7)

    L'espace pratique du groupe : http://jawsscript.net

    Les archives du groupe :
    http://fr.groups.yahoo.com/group/jawsscript/messages

    se mettre en nomail : [email protected]

    réactiver l'envoi de mail : [email protected]

    écrire au modérateur : [email protected]
    Aller sur votre groupe
    
<https://fr.groups.yahoo.com/neo/groups/jawsscript/info;_ylc=X3oDMTJmM2ZkZmc1BF9TAzk3NDkwNDY4BGdycElkAzczOTMwODgyBGdycHNwSWQDMjEyMzgwMDE5OQRzZWMDdnRsBHNsawN2Z2hwBHN0aW1lAzE0MjgwOTM4ODI->

    Yahoo! Groupes
    
<https://fr.groups.yahoo.com/neo;_ylc=X3oDMTJldnEwdWpxBF9TAzk3NDkwNDY4BGdycElkAzczOTMwODgyBGdycHNwSWQDMjEyMzgwMDE5OQRzZWMDZnRyBHNsawNnZnAEc3RpbWUDMTQyODA5Mzg4Mg-->

    • Confidentialité
    <https://info.yahoo.com/privacy/fr/yahoo/groups/details.html> •
    Désinscription
    
<mailto:[email protected]?subject=D%C3%A9sinscription>
    • Conditions d’utilisation
    <https://info.yahoo.com/legal/fr/yahoo/utos/terms/>

    .

    __,_._,___


--
LavaChri

Répondre à