导出文件

IHapp 接口新增自动化方法 .Export,用于导出除 Aspen 存档(.bkp)和 Aspen 文档(.apw)格式之外的其他文件格式。

使用 Export 方法示例 以下代码片段演示如何将模拟导出为报告文件。

Dim MySim As Happ.IHapp

Public Sub Main()
  On Error GoTo MainErrHandler

  MySim = CreateObject("Apwn.Document")
  Call MySim.InitFromArchive2("pfdtut.bkp", 0)

  ' 导出报告文件
  Call MySim.Export(HAPEXP_REPORT, "pfdtut.rep")

  Set MySim = Nothing
  Exit Sub

MainErrHandler:
  Err.Clear
End Sub

【Python 直译版】

import win32com.client as win32

MySim = win32.Dispatch("AspenPlus.Document.34.0")
MySim.InitFromArchive2(r"pfdtut.bkp", 0)

# 导出报告文件(HAPEXP_REPORT = 1)
HAPEXP_REPORT = 1
MySim.Export(HAPEXP_REPORT, r"pfdtut.rep")

# 释放对象
MySim = None

运行后将在同一目录生成 pfdtut.rep 报告文件。