• Viernes 8 de Noviembre de 2024, 16:44

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - dason

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Re: Consultas con fechas no captura
« en: Jueves 9 de Junio de 2011, 21:06 »
Hola, prueba con esto
"select * from CON_AL_GAS where fecha between #" & Format(fechainicial, "dd/mm/yyyy hh:mm:ss") & "# and #" & Format(fechafinal, "dd/mm/yyyy hh:mm:ss") & "#"
Un saludo

2
Visual Basic 6.0 e inferiores / Re: Capturar Peso de Bascula Toledo Mettler
« en: Jueves 9 de Junio de 2011, 20:43 »
Cambia las propiedades del puerto serie a 4800 paridad par y bit de datos=7  y dime como te va
Un saludo

3
Visual Basic 6.0 e inferiores / Re: Capturar Peso de Bascula Toledo Mettler
« en: Domingo 22 de Mayo de 2011, 12:20 »
La configuración del mscomm1 en el proyecto es la siguiente:
    With MSComm1
        .Settings = "4800,e,7,1"
        .InputLen = 0
        .InputMode = comInputModeText
        .RThreshold = 17
        .NullDiscard = False
        .Handshaking = 0
    End With

El envío de datos es continuo, a no ser que se haya cambiado el valor de fábrica desde el lector digital.

en el evento MSComm1_OnComm()
Select Case MSComm1.CommEvent
        Case comEvReceive      
            buffer = MSComm1.Input
            codlectura = Mid(lectura, 2, 1)    
            txtpesada.Text = Mid(buffer, 6, 5)
        End Select
codlectura sirve para saber cuando el peso está oscilando (creo que era x)
cuando está estable =q
puedes utilizarlos para leer el peso correcto.
a partir de aquí es ya lo que necesites.

Con esto he hecho un programa que lleva ya funcionando mucho tiempo sin problemas.
Un saludo.

4
Visual Basic 6.0 e inferiores / Re: Capturar Peso de Bascula Toledo Mettler
« en: Miércoles 27 de Abril de 2011, 11:33 »
Hola, no sé si ya has resuelto este tema, pero te puedo ayudar, hace ya tiempo hice un programa para la lectura de una báscula igual, 8530 Cougar.
Si todavía necesitas ayuda, coméntalo y busco el código del programa.
Un saludo.

Páginas: [1]