Alberto
06 de Septiembre del 2005

Alguien sabe como puedo abrir un cajon portamondedas conectado a una impresora de ticket samsung o como se envia una secuencia de escape
si no lo entendeis o quereis hacerme alguna pregunta mandarme un e-mail a [email protected]

Mauri
06 de Septiembre del 2005

Pone este codigo en cualquier click que quiere que abra el cajon.
Yo tambié, trabaje con un cajon Samsung.

Dim prnprinter As Printer
For Each prnprinter In Printers
If prnprinter.DeviceName = "SAMSUNG SRP-270" Then
Set Printer = prnprinter
Exit For
End If
Next
Printer.Font.Size = 9
Printer.FontName = "FontControl"
Printer.Print "A"
Printer.EndDoc

QUINO
06 de Septiembre del 2005

YO SIMPLEMENTE ABRO EL PUERTO Y LA MANDO CUALQUIER COMANDO DE ESCAPE Y LO ABRE.

palomovic
06 de Septiembre del 2005

Yo tambien estoy haciendo un TPV, para consumo propio, y la verdad es que me gustaria que se me abriera el cajon por eso me gustaria que me mandases el codigo de escape. GRACIAS.

luisguzboni
06 de Septiembre del 2005

Yo tambien estoy haciendo lo mismo, me gustaria que se me abriera el cajon por eso me gustaria que me mandases el codigo de escape. GRACIAS

KALIN
06 de Septiembre del 2005

Hola:
Prueba con esto:
Agregas a tu project el MSComm32.ocx . Lo agregas al form y donde necesites abrir el cajón pones esto:
MSComm1.PortOpen = True
MSComm1.Output = "Abrete"
MSComm1.PortOpen = False
Un saludo, y suerte

webJose
06 de Septiembre del 2005

Pues yo no sé de eso, pero sí sé que esa información debe haberla proporcionado el fabricante del cajón o el dispositivo electrónico encargado de abrir dicho cajón. Normalmente, ese tipo de tareas la realizan los drivers del hardware, si aplica. En ese caso, solamente es de encontrar la función o procedimiento encargada(o) de realizar la tarea.

Nuevamente, eso debe haberlo documentado el fabricante.

En otras palabras, no creo que exista un estándar en VB para ello.