SAP 使用VBA呼叫SAP RFC

2021-06-13 11:20:35 字數 1200 閱讀 8796

使用vba呼叫sap rfc和jco 常用的方法基本一致。

大致分為兩步:登入和執行

1、設定登入資訊

set r3 = createobject(」sap.functions」)

r3.connection.system = 「dev」

r3.connection.client = 「160″

r3.connection.systemnumber = 「00″  r3.connection.user = 「daniel_1″

r3.connection.password = 「daniel_1″

r3.connection.language = 「zh」

『有中文漢字或中文字元的話,需要設定**頁,否則可能出現亂碼

r3.connection.codepage = 「8400″

if r3.connection.logon(0, false) <> true then

exit sub

end if

2、呼叫rfc,處理輸入、表、輸出等引數

『新增rfc名稱

set myfunc = r3.add(」zrfc_test01″)

『設定輸入引數

set oparam1 = myfunc.exports(」ebeln」)

oparam1.value = 「230000459″

『執行遠端呼叫

result = myfunc.call

if result = true then

『設定table引數

set ekpo = myfunc.tables(」t_ekpo」)

『設定返回引數

set oparam2 = myfunc.exports(」e_return」)

else

msgbox myfunc.exception

r3.connection.logoff

exit sub

end if

『登出登入

r3.connection.logoff

『使用迴圈處理table引數

for i = 1 to ekpo.rowcount

set row = ekpo.rows(i)

cells(i, 1) = row.value(」ebelp」)

cells(i, 2) = row.value(」matnr」)

next

如何使用VBS呼叫VBA函式

前言 修改同事大神寫的非常好的自動evidence做成工具,新增一些功能 case中的的一些內容,自動截圖,並儲存到evidence中 呼叫vba函式 getcaseinfoaspicture vba的 把置於底層 sub picturetoback selection.shaperange.zor...

VBA 使用陣列

從例子中了解什麼是陣列 在vba裡陣列就是一組變數 這個是從今天0點開始已經過了多少秒的時間 for i 2 to 200000 if range g i range n5 then 每一次取值都要到range n5 裡取值,所以很耽誤時間 k k range j i end if next ran...

SAP程式呼叫函式CUAB DISPLAY CD

在對程式具體跟蹤到沒條資料的時候,發現有少量的意向訂單沒有配置號,而導致傳進函式的配置號引數為空,這個時候函式就一致執行不出來而占用系統記憶體導致。解決方案 在取訂單的配置號 vbap cuobj 的時候,加上非空的判斷即可。摘錄如下 data l cuobj like vbap cuobj ref...