Puerto parlelo en vb2005

10/02/2006 - 14:47 por Lubi | Informe spam
Como puedo manejar el puerto paralelo con vb2005

Tengo una impresora de ticket y no puedo cortar el papel, mandandole la
cadena de corte por puerto paralelo

Utilizo este codigo:
Try
RS232 = My.Computer.Ports.OpenSerialPort(My.Settings.PuertoCajon,
9600, IO.Ports.Parity.None)
Dim strCadena As String

If RS232.IsOpen Then
For i As Integer = 0 To 7
strCadena = ""
RS232.WriteLine(strCadena)
Next

strCadena = Chr(27) + Chr(109)


RS232.NewLine = vbCrLf
RS232.WriteLine(strCadena)
End If
Catch ex As Exception
MessageBox.Show(ex.Message)

Finally
If RS232.IsOpen Then
RS232.Close()
End If
End Try

Pero me da error de puerto


Gracias y un saludo
 

Leer las respuestas

#1 Jose
10/02/2006 - 16:25 | Informe spam
Disculpa... que tienes asignado en My.Settings.PuertoCajon ?
Pep,


"Lubi" escribió:

Como puedo manejar el puerto paralelo con vb2005

Tengo una impresora de ticket y no puedo cortar el papel, mandandole la
cadena de corte por puerto paralelo

Utilizo este codigo:
Try
RS232 = My.Computer.Ports.OpenSerialPort(My.Settings.PuertoCajon,
9600, IO.Ports.Parity.None)
Dim strCadena As String

If RS232.IsOpen Then
For i As Integer = 0 To 7
strCadena = ""
RS232.WriteLine(strCadena)
Next

strCadena = Chr(27) + Chr(109)


RS232.NewLine = vbCrLf
RS232.WriteLine(strCadena)
End If
Catch ex As Exception
MessageBox.Show(ex.Message)

Finally
If RS232.IsOpen Then
RS232.Close()
End If
End Try

Pero me da error de puerto


Gracias y un saludo


Preguntas similares