用的是Tencent RTX Server v3.3 ，按SDk開發手冊上的代碼，編譯不過去：
OLEObject RTXObj, RTXParams
any RetCode
int iRetObj
int iRetParams
RTXObj = CREATE OLEObject
RTXParams = CREATE OLEObject
iRetObj = RTXObj.ConnectToNewObject("rtxserver.rtxobj")
iRetParams = RTXParams.ConnectToNewObject("rtxserver.collection")
IF iRetObj <> 0 THEN
MessageBox("提示", "應用連接錯誤！")
ELSE
RTXObj.Name = "SMSOBJECT"
RTXParams.Add("SENDER", "900") //'短信發送者
RTXParams.Add("RECEIVER", "1381234567，1381234") //'短信接收者
RTXParams.Add("SMS", "測驗") // '短信內容
RTXParams.Add("CUT",0) // '1:自動切割短信 0:不切割
RetCode = RTXObj.Call2(&H1001, RTXParams)
END IF
把&H1001改為十進制的后，可以編譯，但運行時會報調外用部函式出錯。以上是檔案中的示例代碼，我要做的是發送提醒消，息，我把改成下面那樣，也是報報調外用部函式出錯：
OLEObject RTXObj, RTXParams
any RetCode
int iRetObj
int iRetParams
RTXObj = CREATE OLEObject
RTXParams = CREATE OLEObject
iRetObj = RTXObj.ConnectToNewObject("rtxserver.rtxobj")
iRetParams = RTXParams.ConnectToNewObject("rtxserver.collection")
IF iRetObj <> 0 THEN
MessageBox("提示", "應用連接錯誤！")
ELSE
RTXObj.Name = "EXTTOOLS"
RTXParams.Add("USERNAME", "1010")
RTXParams.Add("MSGINFO", "TEST")
RetCode = RTXObj.call2 (8449, RTXParams)
IF RetCode<> 0 THEN
MessageBox("test", "error")
END IF
END IF
哪位有經驗的幫看下
uj5u.com熱心網友回復：
首先，pb不支持16進制，&H1001要改為4097，不是8449其次，判斷一下iRetParams = RTXParams.ConnectToNewObject("rtxserver.collection")的回傳值是否正確
uj5u.com熱心網友回復：
&H1001的是改為十進制的4097，回傳值也加上判斷了。都還是報呼叫call2出錯。uj5u.com熱心網友回復：
麻煩問下樓主或其他大俠，rtx的dll檔案是怎么注冊成功的？為什么我注冊總是提示找不到輸入點轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/40064.html
標籤：API 調用
上一篇：redis學習