borderAndreaVB free resources for Visual Basic developersborder
borderAndreaVB Visual Basic and VB.NET source code resources - Copyright © 1999-2018 Andrea Tincaniborder

AndreaVB Home | Forum | News | Code Database Home | Search Database | View Latest Codes
Submit your Code | Register | HOWTO Submit a File
Code Database » Printing » DOS Printing
File Info
Version : 1.0.0
Support Topic : Click Here (0 comments)
Demo : N/A
Screenshot : N/A
Post Date : Apr 14, 2005
Last Edit Date : Apr 14, 2005
Language Version : VB6
Current Rating : N/A
Author Info
Author Name : nitishprabhu
Author Files Count : 1
% of Files by Author : 0.6803%
Private Msg : Login First!
Email : Login First!
Code Description
Dos printing
Download Info
Download File : Click to Download!
Total Downloads : 4465
FileSize: 0.33 KB
FileType: TXT file
User Feedback
Rate This Code :
VB Code
Private Sub PrintToPort(FName As String, Optional LPT As String = "LPT1")
    Open FName For Input As #1
    Open LPT For Output As #2
    
        StrToPrint = ""
    While Not EOF(1)
        Line Input #1, StrToPrint
' StrToPrint = StrToPrint
        Print #2, StrToPrint

    Wend
    Close #2
    Close #1
End Sub
borderAndreaVB free resources for Visual Basic developersborder
borderAndreaVB Visual Basic and VB.NET source code resources - Copyright © 1999-2018 Andrea Tincaniborder