壹佰网|ERP100 - 企业信息化知识门户

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 614|回复: 0

[FI] excel中连接SAP数据表的写法

[复制链接]
发表于 2012/7/23 16:35:13 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ: 83569622  。

您需要 登录 才可以下载或查看,没有帐号?注册

x
现在我们想在excel里连接SAP然后把数据下载到excel里(是在excel里执行)我尝试写了一下,但是现在不知道那些对象的方法了属性,没办法做了,大家帮我看看,对了,这里的单引号其实都是双引号,郁闷,还有错别字
Set oFunction = CreateObject("SAP.LogonControl.1")
Set oConnection = oFunction.NewConnection
oConnection.Client = "100"
oConnection.Language = "EN"
oConnection.User = "用户名"
oConnection.Password = "用户密码"
oConnection.ApplicationServer = "系统IP地址"
oConnection.SystemNumber = "00"
result = oConnection.Logon(0, True)
ll = MsgBox(result, vbOKCancel, "connect ok")
Set ofun = CreateObject("SAP.FUNCTIONS")
Set ofun.Connection = oConnection
Set func = ofun.Add("RFC_READ_TABLE")
func.Exports("QUERY_TABLE") = "table名字"
If func.Call = True Then
For i = 2 To 6
  Cells(i, 1).Value = func(i - 1, "MATNR")
Next i
  Else
  MsgBox "FAIL"
End If
提示错误的参数号或无效的属性值


该贴已经同步到 xiaoerp的微博
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|小黑屋|手机版|壹佰网 ERP100 ( 京ICP备19053597号-2 )

Copyright © 2005-2012 北京海之大网络技术有限责任公司 服务器托管由互联互通
手机:13911575376
网站技术点击发送消息给对方83569622   广告&合作 点击发送消息给对方27675401   点击发送消息给对方634043306   咨询及人才点击发送消息给对方138011526

GMT+8, 2025/11/29 10:49 , Processed in 0.015506 second(s), 18 queries , File On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表