Problème ouverture fichier

Question

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	est jean marc.doc"  'ne s'ouvre pas car il y a des espaces
Shell.Run "c:\Partage Jean Marc	est jean marc.doc"  'ne s'ouvre pas car il y a des espaces
Shell.Run "c:\Partage-Jean-Marc	est-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

cs_JMO · Answer

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 !!!!!!!!.........

cs_processus · Answer

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

cs_JMO · Answer

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

Problème ouverture fichier

3 réponses

Discussions similaires