从VBScript使用EPM插件API - EasySAP

EPM Add-In for Excel SAP Business Planning and Consolidation, version for SAP NetWeaver

从VBScript使用EPM插件API

2020-09-19 15:31发布

站内问答 / BPC

1874 4

点击此处---> 群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流）群内免费提供SAP练习系统（在群公告中）

我正在尝试从UFT中的VBScript使用EPM插件API。以下是我到目前为止编写的代码：

 Dim插件，obj，objwb，vbproj，fpm
 设置obj = CreateObject（" Excel.Application"）
 设置objwb = obj.Workbooks.Open（FileName）
 设置vbproj = objwb.VBProject
 vbproj.References.AddFromFile（" C：\ Program Files（x86）\ SAPBOBJ \ PC \ FPMXLClient.Shim.dll"）
 设置fpm = CreateObject（" FPMXLClient.EPMAddInAutomation"）
 fpm。连接" EPM_http：//服务器名称：8002/sap/bpc/_Environment_Model"，用户名，密码

我要打开EPM报告，然后加载参考库，最后尝试使用EPM API创建连接。在最后一行，它引发错误"对象引用未设置为对象的实例"。我相信问题在于创建对象实例。

由于文档仅在VBA中，有人可以阐明如何使用VBScript中的API

点击此处---> 群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流）群内免费提供SAP练习系统（在群公告中）

我正在尝试从UFT中的VBScript使用EPM插件API。以下是我到目前为止编写的代码：

 Dim插件，obj，objwb，vbproj，fpm
 设置obj = CreateObject（" Excel.Application"）
 设置objwb = obj.Workbooks.Open（FileName）
 设置vbproj = objwb.VBProject
 vbproj.References.AddFromFile（" C：\ Program Files（x86）\ SAPBOBJ \ PC \ FPMXLClient.Shim.dll"）
 设置fpm = CreateObject（" FPMXLClient.EPMAddInAutomation"）
 fpm。连接" EPM_http：//服务器名称：8002/sap/bpc/_Environment_Model"，用户名，密码

我要打开EPM报告，然后加载参考库，最后尝试使用EPM API创建连接。在最后一行，它引发错误"对象引用未设置为对象的实例"。我相信问题在于创建对象实例。

由于文档仅在VBA中，有人可以阐明如何使用VBScript中的API

4条回答

1楼 · 2020-09-19 16:01.采纳回答

经过测试-正常工作！这是一个通用版本-将与独立的EPM加载项以及AO中的EPM（使用后期绑定）一起使用：

 Dim obj，objwb，epmCOm，fpm
 设置obj = CreateObject（" Excel.Application"）
 设置objwb = obj.Workbooks.Open（" C：\ Users \ KalininVE \ Desktop \ TestReport.xlsx"）
 obj.Application.Visible = True

 关于错误继续
 设置fpm = obj.COMAddIns（" FPMXLClient.Connect"）。Object
 如果Err.Number <> 0然后
     设置epmCOm = obj.COMAddIns（" SapExcelAddIn"）。Object
     设置fpm = epmCOm.GetPlugin（" com.sap.epm.FPMXLClient"）
 万一
 出错时转到0

 fpm.Connect" _FPM_BPCNW10_ [http://10.0.60.33:8000/sap/bpc/] _ [SHELLTEST] _ [Planning]"，" KALININV_EXT"，"密码"
 fpm.RefreshActiveSheet
 objwb.Save
 objwb.Close SaveChanges = False
 obj.Quit

2楼-- · 2020-09-19 16:02

很棒！它像魅力一样运作。感谢您花费大量时间并提供有效的代码！

3楼-- · 2020-09-19 15:56

请提供有关您的EPM插件或AO版本以及SP的详细信息！

4楼-- · 2020-09-19 16:09

感谢您的快速响应。

方案是打开EPM报告文件，然后连接到服务器，然后刷新报告。
为简洁起见，我没有提供实际的文件名。打开文件没有问题。抛出的错误在我们实例化EPMAddinAutomation类的行中。

一周热门更多>

点击此处---> 一起学习S4 HANA ...

相关问答