关于ppt比较简单的问题

Question

var ppt,dc:variant;
begin
if opendialog1.Execute then
  begin
 try
    ppt:= CreateOleObject('PowerPoint.Application');
    ppt.Visible:=true;
    Dc:=ppt.Presentations.Open(opendialog1.FileName,msoFalse, msoFalse, msoTrue);          //msoFalse, msoFalse, msoFalse
    Dc.SaveAs('d:\w1.htm',ppSaveAsHTMLv3,msoTrue);      //ppSaveAsHTML
  //ppt.ActivePresentation.SaveAs('d:\w.htm',ppSaveAsHTMLv3,msoTrue);      //ppSaveAsHTML
   
  finally
    ppt.quit;
  end;
  end;
以上代码中的ppsaveasHTMLv3所在的单元文件是什么或者其对应的数值是多少？？？谢谢

Answer 1

应该在：
msppt8
或者在：
msppt9 
中吧？

Answer 2

对了，ppSaveAsHTMLv3 对应的数值是 13 （十进制的）