在 excel vba 中控制不了 AS400

在excel vba 裡，

sub abcde()
Set autECLPS = CreateObject("PCOMM.autECLPS")
Set autECLConnlist = CreateObject("PCOMM.autECLConnlist")
Set autECLOIA = CreateObject("PCOMM.autECLOIA")
autECLConnlist.Refresh
autECLPS.setconnectionbyname ("a")
autECLOIA.setconnectionbyname ("a")
....
...
..
.
.
end sub


我在舊公司用as400 是可行的。但在新公司嘗試控制AS400，但出現了以下錯誤

「執行階段錯誤 '-2147024714 (8007006)':
automation 錯誤
作業系統無法執行 %1。」

偵錯指示 第一句
Set autECLPS = CreateObject("PCOMM.autECLPS")


不知是否我現在的公司AS400是意大利語，所以執行上有問題

請問問題在那裡?? 應該怎樣改正??