功能明细 > 数据接口 > COM接口 > VB 接口 > 断开服务器com_nt

函数

断开服务器连接

STDMETHOD(com_nt_disconnect)(

LONG* nRetErr

);

参数

[out,retval]LONG* nRetErr，返回值

返回值

成功，返回RD_SUCCESS。失败返回其它错误码，见error_code.h

说明

断开服务器函数。com_nt_connect和com_nt_disconnect采用引用计算，需要确保成对使用。

举例

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 usrname,password,result

usrname= "test"

password="test"

result = CLng(objArray.com_sc_login (usrname,password))

objArray.com_nt_disconnect

Msgbox "login result is:" &result

Set objArray= nothing

断开服务器com_nt_disconnect