La Web del Programador: Comunidad de Programadores
 
    Pregunta:  56632 - COMO ABRIR CAJA RESGISTRADORA CONECTADA A RS232 EN VFP
Autor:  MArco Martinez
Tengo una caja registradora conectada al puerto rs232 y quiero poder abrirla con un programa hecho en visual foxpro 6, gracias por su ayuda

  Respuesta:  Bigle Brizuela
Tienes que agregar a tu formulario el contros MSCOMM32.OCX en este este caso se llamara MSCOMM2, y usas el siguiente codigo
IF THISFORM.MSCOMM2.PORTOPEN = .F. THEN
THISFORM.MSCOMM2.COMMPORT = 1 && Depende del puerto que estés usando
THISFORM.MSCOMM2.Settings = '300,n,8,1'
THISFORM.MSCOMM2.PORTOPEN = .T. Thisform.MSComm2.Output = '7'
IF THISFORM.MSCOMM2.PORTOPEN = .T. THEN
THISFORM.MSCOMM2.PORTOPEN = .F.
ENDIF
ELSE
Thisform.MSComm2.Output = '7'
IF THISFORM.MSCOMM2.PORTOPEN = .T. THEN
THISFORM.MSCOMM2.PORTOPEN = .F.
ENDIF
ENDIF