home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
High Voltage Shareware
/
high1.zip
/
high1
/
DIR9
/
AN210X.ZIP
/
GLOBAL.BAS
< prev
next >
Wrap
BASIC Source File
|
1993-03-19
|
1KB
|
34 lines
' Bindery object type definitions
Global Const OT_WILD = -1
Global Const OT_UNKNOWN = 0
Global Const OT_USER = 1
Global Const OT_USER_GROUP = 2
Global Const OT_PRINT_QUEUE = 3
Global Const OT_FILE_SERVER = 4
Global Const OT_JOB_SERVER = 5
Global Const OT_GATEWAY = 6
Global Const OT_PRINT_SERVER = 7
Global Const OT_ARCHIVE_QUEUE = 8
Global Const OT_ARCHIVE_SERVER = 9
Global Const OT_JOB_QUEUE = 10
Global Const OT_ADMINISTRATION = 11
Global Const OT_NAS_SNA_GATEWAY = 33
Global Const OT_REMOTE_BRIDGE_SERVER = 36
Global Const OT_TIME_SYNCHRONIZATION_SERVER = 45
Global Const OT_ARCHIVE_SERVER_DYNAMIC_SAP = 46
Global Const OT_ADVERTISING_PRINT_SERVER = 71
Global Const OT_BTRIEVE_VAP = 75
Global Const OT_PRINT_QUEUE_USER = 83
Global Const True = -1
Global Const False = 0
'NetWare DLL calls
Declare Function GetDLLVersion Lib "NWCore.DLL" (ByVal DLLName$, MajorVer%, MinorVer%, RevLevel%, BetaLevel%) As Integer
Declare Function GetDefaultConnectionID Lib "NWWrkstn.DLL" () As Long
Declare Function GetConnectionID Lib "NWWrkstn.DLL" (ByVal serverName$, connID%) As Integer
Declare Sub SetPreferredConnectionID Lib "NWWrkstn.DLL" (ByVal ConnectID%)
Declare Sub GetFileServerName Lib "NWServer.DLL" (ByVal Conn%, ByVal serverName$)
Declare Function ScanBinderyObject Lib "NWBind.DLL" (ByVal SearchObjName$, ByVal SearchObjectType%, ObjectID&, ByVal ObjectName$, ObjectType%, HasProperties%, ObjectFlag%, ObjectSec%) As Integer