TODOPIC
Lenguajes de programación para PC => Visual Basic => Mensaje iniciado por: fcm5241e en 25 de Mayo de 2006, 13:37:06
-
necesito leer de una balanza el peso ....
-
Esto es lo que detesto de muchos usuario, SU COMODIDAD....
almenos describe mejor tu problema.
-
Necesito que me cante la luna... :D
Es una broma.
-
Hola fcm5241e, yo tambien una ves necesite leer de una balanza de peso, como tenia conocimientos básicos de lectura opte por terminar la primaria de buena manera y ya pude leer la balanza.
Tambien aprendí otra cosa, que si qeria aclarar una duda respecta a algun tema tenia que hacer una pregunta clara y concisa sobre la duda.
Un saludo y realmente espera a terminar la primaria para postear en el foro.
Atte. CARLOS.
-
necesito leer de una balanza el peso ....
:?: :?: :?: :?:
ok, ¿cual es tu duda?, ya que el asunto de tu mensaje es Comunicacion COM1, :| supongo que quieres saber como comunicarte a traves de ese puerto con visual basic, en la discucion de RS232 donde tienes el otro mensaje Todopic ha dejado un link donde esta un programa para esto, revisalo.
si tienes dudas concretas postealas
saludos
-
necesito leer de una balanza el peso ....
:?: :?: :?: :?:
ok, ¿cual es tu duda?, ya que el asunto de tu mensaje es Comunicacion COM1, :| supongo que quieres saber como comunicarte a traves de ese puerto con visual basic, en la discucion de RS232 donde tienes el otro mensaje Todopic ha dejado un link donde esta un programa para esto, revisalo.
si tienes dudas concretas postealas
saludos
hey amigos bueno mi duda es la siguiente tengo una balanza xk3190-a7 precix-weight quiero comunicarlo con mi pc en rs232 y ya hecho la pequeña conexion pero agarra los valores diferentes cada vez que habro el programita en visual basic
Private Sub Form_Load()
MSComm1.InputLen = 0
MSComm1.RThreshold = 1
MSComm1.SThreshold = 1
MSComm1.CommPort = 1
MSComm1.Settings = Str$(1200) + ",N,8,1"
MSComm1.PortOpen = True
End Sub
Private Sub MSComm1_OnComm()
If MSComm1.CommEvent = comEvReceive Then
CONEXION.Text = MSComm1.Input
End If
End Sub
como les decia me salen valores que concuerdan con la balanza pero salen como por ejemplo en vez de decir 142 kg dice (4100=0.2) (24100=0.) y haci varios valores haber si porfavor me sacan la solucion porque ya me canse pero sigo intentando lo hice solo con un text1 y el mscomm bueno muchas gracias y porfavor si tienen tiempo un correito a neo_carnal@hotmail.com bye
-
bueno primero que todo ¿porque pones esto?
MSComm1.Settings = Str$(1200) + ",N,8,1" por lo menos ¿porque de esa forma? quieres una comunicacion a una verlocidad de 1200 bits por segundo pon simplemente: MSComm1.Settings = "1200,n,8,1" y asegurate de que el otro extremo esta a la misma velocidad
otra cosa verifica que esta propiedad de MScomm este de esta forma:
MSComm1.InputMode = comInputModeText
verifica esto, si sigues teniendo el problema veremos que otra cosa puede estar provocando ese error
saludos :-/