ljhodgett
asked on
print to usb port using vb6
Hi,
I've got a zebra tlp 2844 conected to a usb to parallel converter. to print to a standard ltp port I use the following code: -
Private Sub Command1_Click()
Dim label_String As String
Open "LPT1" For Output As 1
label_String = Chr(10) & "N" & _
Chr(10) & "ZB" & _
Chr(10) & "R310,0" & _
Chr(10) & "A50,2,0,3,1,2,N," & Chr(34) & "STD 512Kb" & Chr(34) & _
Chr(10) & "P1" & Chr(10)
Print #1, label_String
Close #1
End Sub
if I change to lpt to usb001 it does not print anything. What am I doing wrong please?
Many thanks
Lee
I've got a zebra tlp 2844 conected to a usb to parallel converter. to print to a standard ltp port I use the following code: -
Private Sub Command1_Click()
Dim label_String As String
Open "LPT1" For Output As 1
label_String = Chr(10) & "N" & _
Chr(10) & "ZB" & _
Chr(10) & "R310,0" & _
Chr(10) & "A50,2,0,3,1,2,N," & Chr(34) & "STD 512Kb" & Chr(34) & _
Chr(10) & "P1" & Chr(10)
Print #1, label_String
Close #1
End Sub
if I change to lpt to usb001 it does not print anything. What am I doing wrong please?
Many thanks
Lee
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.