使用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...