Bonjour,
Le code ci-dessous convertit automatiquement un fichier PowerPoint vers HTML.
Mon objectif, c'est que les utilisateurs vont lancer ma page à partir de leur navigateur, et la conversion du document fichier.ppt doit se faire dans mon poste (serveur) ! et non pas dans un poste client.
Comment puis-je dire via la méthode .Open d'aller chercher le fichier dans mon poste ? (j'ai essayé via une adresse local http://192.168.1.14:88/, mais ça n'a pas marché).
J'aurais besoin de votre aide.
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 <html> <body> <script type="text/vbscript"> Dim PptApp Dim PptPres Set PptApp = CreateObject("Powerpoint.Application") Set PptPres = PptApp.Presentations.Open("C:\fichier.ppt",,,0) PptPres.SaveAs "C:\fichier.html", 12, true PptPres.Close Set PptPres = Nothing PptApp.Quit </script> </body> </html>
Partager