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

Preguntas similare

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


Respuesta Responder a este mensaje
#2 Lubi
16/02/2006 - 16:01 | Informe spam
perdona por e retraso pero es k he estado fuera,

hay coloco el puerto ejem: "LPT1"

Gracias por tu interees
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida