TID100659 (vbcap) - VB capture sample code

From Developer Community

Sample code for Visual Basic 16 bit. This is a sample application that captures to various servers, display printer queues, display LPT port status, and allow user to capture to the display queue's.

[edit]

DETAILED DESCRIPTION

'This program uses the following Novell API functions defined as Visual Basic Prototypes:

Declare Function NWGetConnectionHandle Lib "NWCALLS.DLL" (ByVal serverName As 
String, ByVal mode As Integer, Conn As Integer, ByVal connScope As Long) As Integer
Declare Function NWScanObject Lib "NWCALLS.DLL" (ByVal Conn As Integer, ByVal searchName As String, ByVal searchType As Integer, objectID As Long, ByVal objectName As String, objectType As Integer, hasPropertiesFlag As Integer, objectFlags As Integer, objectSecurity As Integer) As Integer
Declare Function NWGetObjectName Lib "NWCALLS.DLL" (ByVal Conn As Integer, ByVal objectID As Long, ByVal objectName As String, objectType As Integer) As Integer
Declare Function NWGetCaptureStatus Lib "NWCALLS.DLL" (ByVal LPTDevice As Integer) As Integer
Declare Function NWGetMaxPrinters Lib "NWCALLS.DLL" (numPrinters As Integer) As Integer
Declare Function NWFlushCapture Lib "NWCALLS.DLL" (ByVal LPTDevice As Integer) As Integer
Declare Function NWEndCapture Lib "NWCALLS.DLL" (ByVal LPTDevice As Integer) As Integer
Declare Function NWStartQueueCapture Lib "NWCALLS.DLL" (ByVal Conn As Integer, ByVal LPTDevice As Integer, ByVal QueueID As Long, ByVal QueueName As String) As Integer
Declare Function NWDSCreateContext Lib "NWNET.DLL" () As Long
Declare Function NWDSFreeContext Lib "NWNET.DLL" (ByVal Context As Long) As Integer

[edit]