Netware Super Library/Netware Super Library.iso/vbasic/nivb/nwmisc.bas

BASIC Source File | 1993-05-05 | 1.9 KB | 30 lines

'NWMISC.BAS  NetWare Miscellaneous Services Interface for Visual Basic For Windows
'Version 1.0
'Novell Systems Research Department, Novell, Inc.
'Copyright (c) 1993, Novell, Inc.
'This interface is not supported through Novell's regular
'support channels.  See README.TXT for more information.

'destStr$ must be initialized to the length of srcStr$ (including terminating null)
Declare Function ASCIIZToLenStr Lib "NWNETAPI.DLL" (ByVal destStr$, ByVal srcStr$) As Integer
'fullPath$ must be initialized to 255 bytes
Declare Function ConvertNameToFullPath Lib "NWNETAPI.DLL" (ByVal partialPath$, ByVal fullPath$) As Integer
'path$ must be initialized to 255 bytes
Declare Function ConvertNameToVolumePath Lib "NWNETAPI.DLL" (ByVal fileName$, ByVal path$) As Integer
'path must be initialized to 255 bytes
Declare Function GetFullPath Lib "NWNETAPI.DLL" (ByVal drive%, ByVal path$) As Integer
Declare Function GetNetworkSerialNumber Lib "NWNETAPI.DLL" (serialNumber&, applicationNumber%) As Integer
Declare Function IntSwap Lib "NWNETAPI.DLL" (ByVal unswappedInteger%) As Integer
Declare Function IsV3Supported Lib "NWNETAPI.DLL" (ByVal serverConnID%) As Integer
'destStr$ must be initialized to the length of scrStr$
Declare Function LenToASCIIZStr Lib "NWNETAPI.DLL" (ByVal destStr, ByVal srcStr) As Integer
Declare Function LongSwap Lib "NWNETAPI.DLL" (ByVal unswappedLong&) As Long
'server$ must be initialized to 48 bytes
'volume$ must be initialized to 16 bytes
'directories must be initialized to 255 bytes
Declare Function ParsePath Lib "NWNETAPI.DLL" (ByVal path$, ByVal server$, ByVal volume$, ByVal directories$) As Integer
'server$ must be initialized to 48 bytes
Declare Function StripFileServerFromPath Lib "NWNETAPI.DLL" (ByVal path$, ByVal server$) As Integer
Declare Function VerifyNetworkSerialNumber Lib "NWNETAPI.DLL" (ByVal serialNumber&, applicationNumber%) As Integer