TIMER/MSCOMM E BALANCA FILIZOLA

UNIAO 12/12/2006 13:39:18
#189514
Amigos, estou precisando pegar o peso da balança, isso até que consegui fazer usando o mscomm, mas o que esta acontecendo que é que coloquei essa operação dentro de um timer para ficar executando, só que ele não consegue pegar em modo de execução... só funciona quando debugo o projeto. alguém pode me ajudar
SILVIO.GARCIA 13/12/2006 10:50:35
#189668
eu tb leio informações da serial de um equipamento e esta dentro de um timer
com tempo de leitura de +- 1000ms. eu uso assim

Private Sub Timer1_Timer()

If Flag = 1 Then
   If Auto.Caption = 1 Then 
     Ler_Encerrado 'Se tiver alguma string na serial recebe
     Else
     If Auto.Caption = 2 Then
       'ler_enc_cbc03 'encerrados da cbc03/cbc04
     End If
   End If
   
   ElseIf Flag = 2 Or Flag = 3 Or Flag = 4 Or Flag = 5 Then
          If Auto.Caption = 1 Then
             Ler_Visualizacao 'ler abas ims
             Else
             If Auto.Caption = 2 Then
               'ler_visu_cbc03 'visualização cbc03
             End If
          End If
End If

'loop no flag
Flag = Flag + 1
     If Flag = 6 Then
        Flag = 1
        MSComm.InBufferCount = 0
        MSComm.Output = "(&A)"
        Else
           MSComm.InBufferCount = 0
           MSComm.Output = "(&V)"
     End If
 End Sub



t+
HELIO.COSTA 13/12/2006 17:52:05
#189810
Tive um problema assim, e fiz da seguinte forma.
For i = 1 To 1000
DoEvents
instring = instring & MSComm1.Input
i = i + 1
Next i
UNIAO 13/12/2006 20:14:07
#189825
obrigado amigos, mas achei uma dll que é show de bola para fazer a comunicação com a balança, peguei no site da filizola.... obrigado.
Tópico encerrado , respostas não são mais permitidas
Voltar