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 dutilisation
<https://info.yahoo.com/legal/fr/yahoo/utos/terms/>
.
__,_._,___
--
LavaChri