Advertisement
calfred2808

vb6.0

Sep 28th, 2012
119
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.82 KB | None | 0 0
  1. Later Windows op systems have moved the printer port into the window
  2. control. Even Dos type programs now run in a window. This problem can be
  3. easily overcome through the use of third party ActiveX software. The
  4. following is an example from the instruction sheet of the software that I
  5. use. This software makes parallel and serial ports available.
  6.  
  7. Dim Result As Integer
  8. Dim Str As String
  9. Result = IO1.Open("LPT1:", "") 'Open a parallel Port.
  10. Result = IO1.WriteString("Hello World" + Chr(13) + Chr(10))
  11. Result = IO1.WriteString(Chr(5)) 'Device specific data request
  12. Str = IO1.ReadString(30) 'Read result
  13. Result = IO1.Close() 'Close the port now that we are done
  14.  
  15. The software is io.ocx. The one that I use (I think it is version 2.07) is
  16. done by J.S. Payne of Cortland, New York.
  17.  
  18. His site is http://www.jspayne.com/
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement