Writing to a device on the Parallel Port

Home Page
 
 

Dim Result As Integer
Dim Str As String

Result = IO1.Open("LPT1:", "") 'Open a parallel Port.

Result = IO1.WriteString("Hello World" + Chr(13) + Chr(10))

Result = IO1.WriteString(Chr(5)) 'Device specific data request
Str = IO1.ReadString(30) 'Read result

Result = IO1.Close() 'Close the port now that we are done
 
 
 

The following are helpful links to other sites with information on the PC's Parallel Port.
(you may want to bookmark this list):
http://www.ai.sri.com/~connolly/neuroscience/printer/draft.html
http://www.doc.ic.ac.uk/~ih/doc/par/doc/regpins.html
http://www.doc.ic.ac.uk/~ih/doc/par/
http://www.fapo.com/ieee1284.htm
http://www.fapo.com/files/ecp_reg.pdf
 
 

Home Page | Site Map | Copyright (c) 1998 by JSPayne of Cortland NY