var Pres var App App new ActiveXObject PowerPoint Application Pres App

1
2
3
4
5
6
7
var Pres;
var App;
App = new ActiveXObject("PowerPoint.Application");
Pres = App.Presentations.Open("C:\\test.ppt", false, false, false);
Pres.SaveAs("C:\\outbmp", 14, false);
Pres.Close();
App.Quit();