Problème ouverture fichier

Signaler
Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
-
Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
-
Bonjour,

En VBS, je veux ouvrir/éditer/fermer des fichiers.
Ma proc marche si je n'ai pas d'espace dans le nom du répertoire et dans le nom du fichier.

Quelqu'un peut-il me proposer une solution.

Dim Shell
Set Shell = WScript.CreateObject("WScript.Shell")

Shell.Run "c:\Partage-Jean-Marc\test jean marc.doc" 'ne s'ouvre pas car il y a des espaces
Shell.Run "c:\Partage Jean Marc\test jean marc.doc" 'ne s'ouvre pas car il y a des espaces
Shell.Run "c:\Partage-Jean-Marc\test-jean-marc.doc" 's'ouvre car il n'y a pas d' espaces

Shell.SendKeys "^p" 'Raccourci clavier de l'impression
Shell.SendKeys "{ENTER}" 'Réponse OK pour fenêtre imprimer
WScript.Sleep(5000)
Shell.SendKeys "%(ff)" 'fermeture du document
WScript.Sleep(1500)
Shell.SendKeys "%n" 'non enregistrement du document
Shell.SendKeys "%{F4}",true 'fermeture de Word

3 réponses

Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
26
En cherchant dans le Forum, je pense qu'il faut utiliser les chemins DOS du répertoire (+sous-répertoires) et le DOS du fichier....
.........Comment fait-on !!!!!!!!.........
0
Messages postés
360
Date d'inscription
vendredi 24 août 2001
Statut
Membre
Dernière intervention
9 juillet 2008
3
API GetShortPathName()

Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long

Lien AllApi.net : http://www.allapi.net/apilist/GetShortPathName.shtml

Par contre, je sais pas si on peut en VBS...

==============
Site Web de JDPROG
Présentation de MP3 Index
Logiciel d'indexation de fichier MP3

http://jdprog.fr.st
0
Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
26
Merci,

En VBS, je devrais peut-être utiliser GetAbsolutePathName pour le chemin et GetFileName pour le fichier.
Je fais des essais, mais je me plante à chaque fois
0