檔案名 InterFace.dll---介面程式安裝完畢后，直接呼叫相應COM組件即可，無需將此DLL嵌入到實際HIS系統中
命名空間 HIS.InterFace.MainProc
執行函式 boolean Execute(Input,OutPut)
引數 入參 Input 輸入字串 UTF-8
出參 Output(1KB) 輸出字串 UTF-8
回傳值 TRUE 執行成功,通過出參獲得服務器回傳的業務資料
FALSE 執行失敗,此時需要檢查錯誤編碼和錯誤資訊以得到詳細錯誤資訊
錯誤資訊 string ErrorMessage()
引數 無
回傳值 (1KB) 初始化或執行失敗的詳細錯誤資訊
錯誤編碼 string ErrorCode()
引數 無
回傳值 0 業務執行正常
-9 業務級錯誤(由于參合狀態之類的例外,而導致交易失敗)
-1 系統級錯誤(網路超時或在執行業務時發生了不可預見的例外)
其它 各業務自定義
以PB為例，有以下程式： （注意：僅為示例說明如何呼叫介面！具體呼叫請根據自身HIS環境進行調整）
oleobject lo_interface
string strErrCode
string strOut
boolean boolExeSucc
integer intConnSucc
//創建介面物件
lo_interface = create oleobject
intConnSucc = lo_interface.ConnectToNewObject ('HIS.InterFace.MainProc')
//檢查是否創建成功
if intConnSucc < 0 then
messagebox("PB","介面初始化失敗")
else
messagebox("PB","介面初始化成功")
end if
以上為PB連接COM組件代碼 ，請高手幫忙，用VB代碼如何實作，COM組件已經參考在VB中了，不知道如何判斷是否連接成功的代碼怎么寫
uj5u.com熱心網友回復：
這么寫即可L_objhis = CreateObject("HIS.InterFace.MainProc")
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/96454.html
標籤：API 調用
上一篇：關于addcategory() 函式的問題 ,急……
下一篇：pb11.5 智能客戶端問題