mscomm32.ocx - Una Verdadera Odisea

10/02/2005 - 02:49 por Juan Tavare | Informe spam
Hola Grupo, Cordial Saludo

A quien me pueda ayudar

Tengo un Pos en un supermercado, el cual no he podido poner a funcionar los
los lectores de barras metrologic 860i, debido a que he intentado por todos
los medios de configurarle a mi formulario el control MsComm32 y no he
podido, quien me pueda ayudar con un ejemplo lo mas completo posible muchas
gracias, de verdad que me saca de muchos problemas, las instrucciones
aplicadas son las siguientes:

en el init del formulario agregue las siguientes instrucciones

*-
* PARAMETROS PARA ACTIVAR LECTOR DE BARRAS
*-
ThisForm.LectorBarras.CommPort = TCONFIG.Commport && 1
ThisForm.LectorBarras.Settings = ALLTRIM(TCONFIG.Settings) &&"9600,n,8,1"
ThisForm.LectorBarras.RThreshold = 13
Thisform.LectorBarras.InBufferSize = 1024
Thisform.LectorBarras.OutBufferSize = 1024
Thisform.LectorBarras.InputLen = 13
ThisForm.LectorBarras.PortOpen = .T.
*-

En el mscom32, en el onComm tengo:

IF ThisForm.LectorBarras.commevent = 2
THISFORM.Operacion.VALUE = ALLTRIM(THISFORM.LECTORBARRAS.INPUT)
ENDIF

pero cuando paso un producto por el lector, el sistema no lee absolutamente
nada


gracias a quien me pueda ayudar


Juan T.

Preguntas similare

Leer las respuestas

#1 Luis María Guayán
10/02/2005 - 12:40 | Informe spam
Mira esta clase, tiene un formulario de ejemplo con lectura de una pistola.

http://www.portalfox.com/modules.ph...ls&lid6&ttitle=ViewComm

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos

"Juan Tavare" escribió en el mensaje
news:
Hola Grupo, Cordial Saludo

A quien me pueda ayudar

Tengo un Pos en un supermercado, el cual no he podido poner a funcionar


los
los lectores de barras metrologic 860i, debido a que he intentado por


todos
los medios de configurarle a mi formulario el control MsComm32 y no he
podido, quien me pueda ayudar con un ejemplo lo mas completo posible


muchas
gracias, de verdad que me saca de muchos problemas, las instrucciones
aplicadas son las siguientes:

en el init del formulario agregue las siguientes instrucciones

*-
* PARAMETROS PARA ACTIVAR LECTOR DE BARRAS
*-
ThisForm.LectorBarras.CommPort = TCONFIG.Commport && 1
ThisForm.LectorBarras.Settings = ALLTRIM(TCONFIG.Settings) &&"9600,n,8,1"
ThisForm.LectorBarras.RThreshold = 13
Thisform.LectorBarras.InBufferSize = 1024
Thisform.LectorBarras.OutBufferSize = 1024
Thisform.LectorBarras.InputLen = 13
ThisForm.LectorBarras.PortOpen = .T.
*-

En el mscom32, en el onComm tengo:

IF ThisForm.LectorBarras.commevent = 2
THISFORM.Operacion.VALUE = ALLTRIM(THISFORM.LECTORBARRAS.INPUT)
ENDIF

pero cuando paso un producto por el lector, el sistema no lee


absolutamente
nada


gracias a quien me pueda ayudar


Juan T.
Respuesta Responder a este mensaje
#2 Juan Tavare
11/02/2005 - 00:57 | Informe spam
Gracias Luis, por ayudarme

probe -- ViewComm -- que me sugirio y no logre resultados positivos, intente
con 3 lectores de barras diferentes y tampoco funciono, ahora bien, creo que
necesito es buscar documentacion completa para aprender capturar informacion
por los puertos com mediante el MsComm32.ocx

Gracias por tu ayuda


Juan T.


"Luis María Guayán" wrote:

Mira esta clase, tiene un formulario de ejemplo con lectura de una pistola.

http://www.portalfox.com/modules.ph...ls&lid6&ttitle=ViewComm

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos

"Juan Tavare" escribió en el mensaje
news:
> Hola Grupo, Cordial Saludo
>
> A quien me pueda ayudar
>
> Tengo un Pos en un supermercado, el cual no he podido poner a funcionar
los
> los lectores de barras metrologic 860i, debido a que he intentado por
todos
> los medios de configurarle a mi formulario el control MsComm32 y no he
> podido, quien me pueda ayudar con un ejemplo lo mas completo posible
muchas
> gracias, de verdad que me saca de muchos problemas, las instrucciones
> aplicadas son las siguientes:
>
> en el init del formulario agregue las siguientes instrucciones
>
> *-
> * PARAMETROS PARA ACTIVAR LECTOR DE BARRAS
> *-
> ThisForm.LectorBarras.CommPort = TCONFIG.Commport && 1
> ThisForm.LectorBarras.Settings = ALLTRIM(TCONFIG.Settings) &&"9600,n,8,1"
> ThisForm.LectorBarras.RThreshold = 13
> Thisform.LectorBarras.InBufferSize = 1024
> Thisform.LectorBarras.OutBufferSize = 1024
> Thisform.LectorBarras.InputLen = 13
> ThisForm.LectorBarras.PortOpen = .T.
> *-
>
> En el mscom32, en el onComm tengo:
>
> IF ThisForm.LectorBarras.commevent = 2
> THISFORM.Operacion.VALUE = ALLTRIM(THISFORM.LECTORBARRAS.INPUT)
> ENDIF
>
> pero cuando paso un producto por el lector, el sistema no lee
absolutamente
> nada
>
>
> gracias a quien me pueda ayudar
>
>
> Juan T.



Respuesta Responder a este mensaje
#3 Inquieto
11/02/2005 - 20:01 | Informe spam
Yo he probado con todos los tipos de lectores de barras (conexion con
puertos PS/2, USB y Serial AT-X y me han funcionado, incluso si el objeto
mscomm.

Los Lectores de Barras son lo mismo que tener instalado cualquier teclado,
osea un dispositivo de entrada.

Al tener el focus en un cuadro de texto, el lector te deberá colocar alli la
respectiva lectura del cosigo de barras.

Lo que creo es que no has propbado si los lectores sirven en la PC que estás
probando. Para eso deberás abrir por ejemplo un documento nuenvo en el
notepad y empesar a leer desde el scaner o lector de cod. barras. Si este
mismo te muestra el resultado en pantalla o en el documento, entonces, dicho
lector o scaner está listo para ser utilziado en tu aplicación, de otra
forma, el lector puede estar en las siguientes condiciones:
- Tu computadora no ha detectado o reconocido el dispositivo.
- Tu Scanner o lector de Cod. Barras no estña preparado o configirado
previamente para leer el codigo de barras de la etiqueta que piensas
trabajar.

Bueno, espero esto te sirva de guia.

suerte!

"Juan Tavare" escribió en el mensaje
news:
Hola Grupo, Cordial Saludo

A quien me pueda ayudar

Tengo un Pos en un supermercado, el cual no he podido poner a funcionar
los
los lectores de barras metrologic 860i, debido a que he intentado por
todos
los medios de configurarle a mi formulario el control MsComm32 y no he
podido, quien me pueda ayudar con un ejemplo lo mas completo posible
muchas
gracias, de verdad que me saca de muchos problemas, las instrucciones
aplicadas son las siguientes:

en el init del formulario agregue las siguientes instrucciones

*-
* PARAMETROS PARA ACTIVAR LECTOR DE BARRAS
*-
ThisForm.LectorBarras.CommPort = TCONFIG.Commport && 1
ThisForm.LectorBarras.Settings = ALLTRIM(TCONFIG.Settings) &&"9600,n,8,1"
ThisForm.LectorBarras.RThreshold = 13
Thisform.LectorBarras.InBufferSize = 1024
Thisform.LectorBarras.OutBufferSize = 1024
Thisform.LectorBarras.InputLen = 13
ThisForm.LectorBarras.PortOpen = .T.
*-

En el mscom32, en el onComm tengo:

IF ThisForm.LectorBarras.commevent = 2
THISFORM.Operacion.VALUE = ALLTRIM(THISFORM.LECTORBARRAS.INPUT)
ENDIF

pero cuando paso un producto por el lector, el sistema no lee
absolutamente
nada


gracias a quien me pueda ayudar


Juan T.
Respuesta Responder a este mensaje
#4 Juan Tavare
11/02/2005 - 23:27 | Informe spam
Hola Inquieto, como estas, gracias por tu opinion

sucede que existen tres tipos de lectores, los que tienen una interfas por
teclado que como tu dices el dispositivo es de entrada, lo conectas y no hay
problema, el otro es conectado al puerto serial y es donde debes utilizar
digamos el MSCOMM32.OCX con el fin de controlar el puerto y capturar la
informacion enviada por el lector, y el otro que es el scanner balanza que
tambien es serial pero con mas utilidades que el sencillo, en mi caso tengo
el problema es con un lector METROLOGIC 860i con interfase serial, para lo
cual necesito utilizar correctamente el mscomm32.ocx y no he podido

Si tienes algun codigo, con el que pueda capturar datos por el puerto serial
para escanner (lector) de barras, te agradezco me colabores


Saludos


Juan Tavarez





"Inquieto" wrote:

Yo he probado con todos los tipos de lectores de barras (conexion con
puertos PS/2, USB y Serial AT-X y me han funcionado, incluso si el objeto
mscomm.

Los Lectores de Barras son lo mismo que tener instalado cualquier teclado,
osea un dispositivo de entrada.

Al tener el focus en un cuadro de texto, el lector te deberá colocar alli la
respectiva lectura del cosigo de barras.

Lo que creo es que no has propbado si los lectores sirven en la PC que estás
probando. Para eso deberás abrir por ejemplo un documento nuenvo en el
notepad y empesar a leer desde el scaner o lector de cod. barras. Si este
mismo te muestra el resultado en pantalla o en el documento, entonces, dicho
lector o scaner está listo para ser utilziado en tu aplicación, de otra
forma, el lector puede estar en las siguientes condiciones:
- Tu computadora no ha detectado o reconocido el dispositivo.
- Tu Scanner o lector de Cod. Barras no estña preparado o configirado
previamente para leer el codigo de barras de la etiqueta que piensas
trabajar.

Bueno, espero esto te sirva de guia.

suerte!

"Juan Tavare" escribió en el mensaje
news:
> Hola Grupo, Cordial Saludo
>
> A quien me pueda ayudar
>
> Tengo un Pos en un supermercado, el cual no he podido poner a funcionar
> los
> los lectores de barras metrologic 860i, debido a que he intentado por
> todos
> los medios de configurarle a mi formulario el control MsComm32 y no he
> podido, quien me pueda ayudar con un ejemplo lo mas completo posible
> muchas
> gracias, de verdad que me saca de muchos problemas, las instrucciones
> aplicadas son las siguientes:
>
> en el init del formulario agregue las siguientes instrucciones
>
> *-
> * PARAMETROS PARA ACTIVAR LECTOR DE BARRAS
> *-
> ThisForm.LectorBarras.CommPort = TCONFIG.Commport && 1
> ThisForm.LectorBarras.Settings = ALLTRIM(TCONFIG.Settings) &&"9600,n,8,1"
> ThisForm.LectorBarras.RThreshold = 13
> Thisform.LectorBarras.InBufferSize = 1024
> Thisform.LectorBarras.OutBufferSize = 1024
> Thisform.LectorBarras.InputLen = 13
> ThisForm.LectorBarras.PortOpen = .T.
> *-
>
> En el mscom32, en el onComm tengo:
>
> IF ThisForm.LectorBarras.commevent = 2
> THISFORM.Operacion.VALUE = ALLTRIM(THISFORM.LECTORBARRAS.INPUT)
> ENDIF
>
> pero cuando paso un producto por el lector, el sistema no lee
> absolutamente
> nada
>
>
> gracias a quien me pueda ayudar
>
>
> Juan T.



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