VBA BEX自动化-SAPBEXinitConnection中的错误代码438

2020-09-22 06:19发布

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

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


我正在使用示例1从SAP使用以下自动登录脚本。

https://wiki.scn.sap.com/wiki/display/BI/使用+ VBA + to + connect + to + BW + server + with + SAPBEXgetConnection

函数LogonToServer()为布尔值
    LogonToServer = False
    将myConnection设置为对象
    设置myConnection = Run(" BExAnalyzer.xla!SAPBEXgetConnection")
    与myConnection
       .client =" 000"
       .user =" myUserName"
       .Password =" myPassword"
       .Language =" EN"
       .systemnumber = 45
       .system =" XXX"
       .ApplicationServer =" ab1234.wdf.sap.corp"
       .SAProuter =""
       .logon 0,是
    结束于
    如果myConnection.IsConnected <> 1然后
       '启动登录对话框进行手动连接
       myConnection.logon 0,否
          如果myConnection.IsConnected <> 1然后
             MsgBox"出问题了……"
             退出功能
          万一
    万一
    如果myConnection.IsConnected = 1,则
       LogonToServer = True
    万一
    运行" BExAnalyzer.xla!SAPBEXinitConnection"
 结束功能
 

我收到438错误

调用pAddin.ExcelInterface.SetConnectionFromHandle(p_connectionObj)

下面的行。 有任何建议可以解决吗?
公共函数initConnection()为布尔值
   initConnection =假
   如果已连接则
     使用p_connectionObj
     结束于
     如果pAddin无效,则调用SetStart
     如果pAddin无效
       initConnection =假
       退出功能
     万一
     调用pAddin.ExcelInterface.SetConnectionFromHandle(p_connectionObj)
     如果Len(pWbid)> 1然后
       调用pAddin.ExcelInterface.runWorkbook(pWbid)
     其他
       如果Len(pQueryid)> 1然后
         调用pAddin.ExcelInterface.runQuery(pQueryid)
       万一
     万一
   万一
   initConnection = isConnected
 结束功能
 

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

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


我正在使用示例1从SAP使用以下自动登录脚本。

https://wiki.scn.sap.com/wiki/display/BI/使用+ VBA + to + connect + to + BW + server + with + SAPBEXgetConnection

函数LogonToServer()为布尔值
    LogonToServer = False
    将myConnection设置为对象
    设置myConnection = Run(" BExAnalyzer.xla!SAPBEXgetConnection")
    与myConnection
       .client =" 000"
       .user =" myUserName"
       .Password =" myPassword"
       .Language =" EN"
       .systemnumber = 45
       .system =" XXX"
       .ApplicationServer =" ab1234.wdf.sap.corp"
       .SAProuter =""
       .logon 0,是
    结束于
    如果myConnection.IsConnected <> 1然后
       '启动登录对话框进行手动连接
       myConnection.logon 0,否
          如果myConnection.IsConnected <> 1然后
             MsgBox"出问题了……"
             退出功能
          万一
    万一
    如果myConnection.IsConnected = 1,则
       LogonToServer = True
    万一
    运行" BExAnalyzer.xla!SAPBEXinitConnection"
 结束功能
 

我收到438错误

调用pAddin.ExcelInterface.SetConnectionFromHandle(p_connectionObj)

下面的行。 有任何建议可以解决吗?
公共函数initConnection()为布尔值
   initConnection =假
   如果已连接则
     使用p_connectionObj
     结束于
     如果pAddin无效,则调用SetStart
     如果pAddin无效
       initConnection =假
       退出功能
     万一
     调用pAddin.ExcelInterface.SetConnectionFromHandle(p_connectionObj)
     如果Len(pWbid)> 1然后
       调用pAddin.ExcelInterface.runWorkbook(pWbid)
     其他
       如果Len(pQueryid)> 1然后
         调用pAddin.ExcelInterface.runQuery(pQueryid)
       万一
     万一
   万一
   initConnection = isConnected
 结束功能
 
付费偷看设置
发送
4条回答
南山jay
1楼-- · 2020-09-22 06:42

嗨,

我有同样的问题...有解决方案吗?

谢谢

Marina

xfwsx85
2楼-- · 2020-09-22 06:59

我正在使用BI Addon 7.4版本支持包8

hengyuye
3楼-- · 2020-09-22 07:07

检查说明2541995-BEx Analyzer:使用VBA通过SAPBEXgetConnection连接到BW服务器

小c菟菟
4楼-- · 2020-09-22 07:05

您好,

我遇到了同样的问题,您对此有任何解决办法吗?


ahmed

一周热门 更多>