ALGUEM JA USOU A DLL PESO32.DLL

MALA 17/03/2016 15:31:08
#459389
BOA TARDE, DESDE JA AGRADEÇO A ATENÇÃO DE TODAS EM TENTAR ME AJUDAR, ESTOU TENTANDO CAPTURAR PESO DE UMA BALANÇA TOLEDO MODELO 9091, E ME PASSARAM ESSE DLL ,AS NAO CONSIGO USAR ALGUEM PÓDERIA ME DAR UMA AJUDA.
PLUGSOFTSM 17/03/2016 17:29:53
#459397
Nunca estudei essa DLL. Mas andei olhando na internet e vi que ela é bem interessante
Vc poderia disponibilzá-la para download?
Aí vou estudar ela e te passo o que descobrir
KERPLUNK 18/03/2016 01:49:57
#459409 Resposta escolhida
Nossa... tive que garimpar códigos bem antigos aqui, mas achei algo. As declarações para essa DLL são:

[ô]em um módulo
Declare Function ConfiguraRs Lib [Ô]c:\windows\system\peso32.dll[Ô] (ByVal Config As String) As Integer 
Declare Function LePeso Lib [Ô]c:\windows\system\peso32.dll[Ô] (ByVal Param As String) As Integer 
Public Porta As String, ConfigRS As String, Velocidade As String 
Public Paridade As String, BitsdeDados As String, BitsdeParada As String

Com as declarações feitas, basta usar no seu form:

[ô]no evento LOAD do form
Porta = “COM2” [ô]ou qualquer que seja a porta da balança
Velocidade = 9600 
Paridade = “N” 
BitsdeDados = 8 
BitsdeParada = 2 
ConfigRs = Porta & [Ô]:[Ô] & Velocidade & [Ô],[Ô] & Paridade & [Ô],[Ô] & BitsdeDados & [Ô],[Ô] & BitsdeParada 
ConfiguraRs (ConfigRs) 

[ô]para capturar o peso na balança:
[ô]em um timer
Dim str As String, peso As String 
str = String(50, 32) 
If LePeso(str) Then 
    peso = Mid(str, 1, 7) 
Else 
    LbPeso = [Ô]Instável[Ô] 
    LbLiquido = Mid(str, 1, 6) 
End If
PLUGSOFTSM 21/03/2016 11:24:16
#459560
Oi...
Vc aceita disponibilizar uma cópia dessa DLL?
Me interessei pelo assunto.. e acho que é bem o que preciso...
KURTGU 21/03/2016 11:32:28
#459563
Citação:

:
Oi...
Vc aceita disponibilizar uma cópia dessa DLL?
Me interessei pelo assunto.. e acho que é bem o que preciso...



www.google.com.br/search?q=PESO32.DLL&oq=PESO32.DLL&aqs=chrome..69i57j0.455j0j7&sourceid=chrome&ie=UTF-8
JCM0867 21/03/2016 12:10:02
#459570
Sou programador a mais de 20 anos, nunca precisei fazer uma única DLL. Sou [Ô]DLLFóbico[Ô]. Aqui no forum sempre surgem dúvidas sobre DLLs
Tópico encerrado , respostas não são mais permitidas
Voltar