函数
STDMETHOD(com_pt_query_tagid)(
BSTRszTagName,
VARIANT* pnTagID,
LONG* nRetErr
);
参数
[in] BSTR szTagName, 普通点名
[out] VARIANT* pnTagID, 普通点TagID,pRecNum ->vt = VT_I4
[out,retval]LONG* nRetErr,返回值
返回值
成功,返回RD_SUCCESS。失败返回其它错误码,见error_code.h
说明
通过普通点的名字查询ID。
举例
|
|
Set objArray= CreateObject("hdCOMInterface.hdCOMClass.1") Dim ip,port,bakip,bakport,timeout ip= "127.0.0.1" port= 5678 bakip = "1.2.3.4" bakport = 1234 timeout= 3
Dim ret objArray.com_nt_connect ip,port,bakip,bakport,timeout
Dim name,id,result name= "hdsys_mem" result = CLng(objArray.com_pt_query_tagid (name,id)) Msgbox "com_pt_query_tagid错误码是:" &result if result=0 then Msgbox name &" TagID is:" &id end if objArray.com_nt_disconnect Set objArray= nothing
|
©2015. All Rights Reserved.