Displaying 1 result from an estimated 1 matches for "ncb_retcode".
2007 Aug 21
1
[NetBIOS] Registering new name?
...net send" to it fails:
======
Private Sub Command1_Click()
Dim ncbInfo As NCB
Dim sMachine As String * NCBNAMSZ
Dim bRet As Byte
'===========1. Send RESET
With ncbInfo
.ncb_command = NCBRESET
End With
bRet = Netbios(ncbInfo)
MsgBox ncbInfo.ncb_retcode, , ncbInfo.ncb_num
'===========2. Register name
sMachine = SERVER_NAME & Chr(3)
With ncbInfo
.ncb_command = NCBADDNAME
.ncb_name = sMachine
'.ncb_lana_num = &H0
End With
bRet = Netbios(ncbInfo)
MsgBox ncbInfo.ncb_retcode, ,...