Salut à tous !
En script jaws, je vous propose aujourd'hui la fonction GetFileShortPath de ma
création qui prend en paramètre le chemin vers un fichier ou un dossier, et
renvoi le chemin court vers cet élément.
Par exemple, si vous lui donnez un chemin de ce genre:
D:\Programmation\logiciels création\interface\compilers\Read-me.txt
Il vous renvera le chemin court comme ceci:
D:\PROGRA~1\LOGICI~1\INTERF~1\COMPIL~1\Read-me.txt
Les avantages sont multiples. Particulièrement en éliminant les espace dans le
chemin, cela vous simplifiera la tache si vous voulez utiliser la fonction Run
pour faire passer à un programme le chemin vers un fichier comme argument de
ligne de commande.
Voici la fonction:
Début du code JawsScript
String Function GetFileShortPath (string sFilePath)
var
string s,
object oFSO,
object oFil
let oFSO = CreateObject("Scripting.FileSystemObject")
let oFil = oFSO.GetFile(sFilePath)
let s = ""
let s = oFil.ShortPath()
; renvoi
return "" + s + ""
EndFunction
Fin du code JawsScript
Puisse cela être utile à quelqu'un.
Yannick Daniel Youalé
La programmation est une religion. Aimez-la, ou quittez-la.
Mon site: www.visuweb.net
