comment ouvrir un fichier word à l'aide de vb script

quelqu'un pourrait-il svp me dire comment ouvrir des fichiers word à l'aide de windows scripting vbs.

J'ai essayé ces deux vbs, mais windows script Host erreur ("The system cannot find the file specified", errorcode: 80070002) s'affiche même si le fichier existe à l'emplacement spécifié.

la première vbs que j'ai essayé:

Dim sAppPath
Dim sPrgFolder
sPrgFolder=CreateObject("WScript.Shell").ExpandEnvironmentStrings("%ProgramFiles%") 
sAppPath =sPrgFolder + "c:\UserGuide.doc"
WScript.CreateObject("WScript.Shell").Run sAppPath)

deuxième vbs, j'ai essayé:

OPTION EXPLICIT
dim fso, ws, file_to_open, OFFICE_PATH
Set ws = WScript.CreateObject("WScript.Shell")
OFFICE_PATH = "C:\Program Files\Microsoft Office\Office"
file_to_open = CHR(34) & "C:\UserGuide.doc" & CHR(34)
ws.Run CHR(34)& OFFICE_PATH & "\winword.exe" & CHR(34) & file_to_open, 0, "FALSE"
Votre premier code ne fonctionne pas becaues vous obtenez le programme chemin d'accès au dossier dans sPrgFolder, qui sera probablement contenir quelque chose de similaire à C:\Program Files\Microsoft Office\OFFICE11. Vous pouvez ensuite ajouter C:\UserGuide.doc` to the variable, so you'll end up with: C:\Program Files\Microsoft Office\OFFICE11\C:\UserGuide.doc " qui ne fonctionnerait tout simplement pas. J'ai plus le temps de regarder le deuxième vbs, cependant.

OriginalL'auteur Bijoy K Jose | 2010-10-05