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
Vous devez vous connecter pour publier un commentaire.
LittleBobbyTables a expliqué dans son commentaire sur le pourquoi de votre premier exemple ne fonctionne pas.
Comme pour votre deuxième exemple, il ne fonctionne pas parce que vous ne l'insérez pas d'espaces entre le winword.exe chemin d'accès et le chemin d'accès au fichier, de sorte que votre ligne de commande ressemble à ceci:
De toute façon, le codage en dur des winword.exe chemin comme ce n'est pas fiable, que ce chemin est différent en 64 bits et certains localisée versions de Windows ainsi que pour certaines versions de MS Office. Je suggère que vous utilisez Word automation des objets à la place:
OriginalL'auteur Helen
essayer cette version révisée du code, vérifier les modifications dans la dernière ligne 🙂
OriginalL'auteur Rajeev
Merci les copains.....
je l'ai eu à travailler avec ces vbs.
OriginalL'auteur Bijoy K Jose