Ver Mensaje Individual
  #1 (permalink)  
Antiguo 17/01/2012, 14:31
triby25
 
Fecha de Ingreso: enero-2012
Ubicación: Santiago
Mensajes: 19
Antigüedad: 12 años, 6 meses
Puntos: 0
Exclamación Visual Basic .NET 2010 con EpsonFPHostControlX.ocx

Buen dia foro

Estoy trabajando en visual basic 2010 y tengo que hacer un aplicacion que se comunique con una impresora fiscal EPSON TM-T88IV , tengo el EpsonFPHostControlX.ocx que provee epson para manejar este tipo de impresoras. El problemas es que le envio los comandos que dice en el manual y estos dan error y a veces no dan error pero aun asi el printer no hace nada de lo que le indico.

este es el codigo que estoy utilizando:

Dim ok As Boolean <---para saber si el comando se ejecuta correctamente(true=correcto,false=incorrecto)

ok = FPHostControl1.OpenPort()

ok = FPHostControl1.AddDataField(Chr(&H2)) <-----aca da error (retorna false)

ok = FPHostControl1.AddDataField(Chr(&H82))

ok = FPHostControl1.AddDataField(Chr(&H7)) <-----desde aca

ok = FPHostControl1.AddDataField(Chr(&H1B))

ok = FPHostControl1.AddDataField(Chr(&H2))

ok = FPHostControl1.AddDataField(Chr(&H1C))

ok = FPHostControl1.AddDataField(Chr(&H0))

ok = FPHostControl1.AddDataField(Chr(&H0))

ok = FPHostControl1.AddDataField(Chr(&H3)) <-----hasta aca da error

ok = FPHostControl1.SendCommand()

ok = FPHostControl1.ClosePort()

Lo que estoy intentando hacer es que la impresora corte el papel el comandoque se le envia al printer para esto es 07 02 en hexadecimal, tambien he intendado poner todo en un string y enviarlo y aun asi da error.

Si alguien en el foro ha tenido experiencia en este tema y me puede ayudar se lo agradeceria mucho.