[Resolvido]Trocas de lubrificantes

Boa Tarde
              Senhores estou desenvolvendo um sistema de controle de frota e tenho a alguns meses pesquisado nesse forum, mas ainda não encontrei e venho pedir a ajuda de voces. Como estou fazendo por partes vou disponibilizar esse modulo que é o controle de  troca dos lubrificantes, já que tenho máquinas que trabalham por horas e veiculos por kilometragem então pairou o seguinte:

- ao selecionar hodometro a kilometragem tem que ficar ativa;
- ao selecionar horimetro as horas devem ficar ativa


Quando selecionar uma das alternativas ou mais, as outras não podem receber dados, por exemplo se selecionar "motor" seja por km ou horas, então só o campo motor recebe dados os outros não


Todo mes se recebe o diario de bordo onde é extraido a última kilometragem ou hora anotada pelo motorista/operador e lança-se no sistema que ao confrontar com a última troca, avisa se já está no tempo de trocar.

Mais ou menos isso, alguma idéia?

Bom dia.
Simples.
Ao receber foco no campo inclua este código:

Para Horímetro:

Código:


Me.kilometragem.Enabled = False
Me.Horas.Enabled = True


Para Kilometragem:

Código:


Me.kilometragem.Enabled = true
Me.Horas.Enabled = false


Abraço

Tão simples e tão cego valeu por essa parceiro!

Só ainda estou encrencado na outra opção pois acontece que por exemplo o óleo do motor é uma quilometragem ou tempo e o óleo de transmissão, câmbio, freio, etc.. são cada um outras quilometragens ou tempos, é nesses problemas que estou me batendo, veja ´so:

Imagine um veículo que chega para fazer a troca do óleo do motor e da transmissão o do motor é trocado a cada 12000 Km e da transmissão -e de 35000 Km, acontece que se escolher o de 12000 vai também para o campo transmissão e vice -versa. Não sei se ficou claro minha colocação.

E um abraço!

Não entendi muito bem, faça simulações por favor.
No aguardo.

Prezado Claudio.
O que eu estava tentando explicar é o seguinte:

O veiculo chega no setor de manutenção para fazer a troca do óleo do motor que tem um período de troca a cada 12000 Kms rodados ou 06 meses. Mas também tem a transmissão que leva outro tipo de óleo e que tem um periodo de troca maior a cada 35000 Kms ou 01 ano. Acontece que se voce perceber sempre que eu escolho por exemplo óleo de motor e óleo de transmissão não estou conseguindo colocar periodos diferentes pois os campos estão preenchendo com a primeira escolha ou seja se escolher 12000 ele vai fazer a soma de 12000 tanto no motor como na transmissão. agradeço a paciencia

Agora entendi.

Veja se é isso que precisa.
Fiz algumas alterações.
Agora é só adaptar ao seu sistema.

Abraço

Claudio meus parabens, é isso mesmo.

Só uma dúvida, faço um registro tudo beleza escolho o tipo e preenche tudo ok, mas ao fazer um novo registro com nova placa, ao escolher o tipo volta as anotações do primeiro registro e não importa se estiver no décimo registro sempre volta ao primeiro o que pode estar causando isso? no mais um abraço!

Obrigado.

No controle Tipo, substitua o código existente por este:

Código:



Private Sub Tipo_AfterUpdate()
If Me.Tipo = "Motor" Then
    Me.Motor = True
ElseIf Me.Tipo = "Transmissão" Then
    Me.Transmissao = True
ElseIf Me.Tipo = "Câmbio" Then
    Me.Cambio = True
ElseIf Me.Tipo = "Torque" Then
    Me.Torque = True
ElseIf Me.Tipo = "Diferencial" Then
    Me.Diferencial = True
ElseIf Me.Tipo = "Hidráulico" Then
    Me.Hidraulico = True
ElseIf Me.Tipo = "Freio" Then
    Me.Freio = True
End If

Call Hidraulico_Click
Call torque_Click
Call transmissao_Click
Call cambio_Click
Call diferencial_Click
Call freio_Click
Call Motor_Click


End Sub


Em No Atual do form, substitua o existente por esse.

Código:



If Me.Tipo = "Motor" Then
    Me.Motor.Enabled = True
ElseIf Me.Tipo = "Transmissão" Then
    Me.Transmissao = True
ElseIf Me.Tipo = "Câmbio" Then
    Me.Cambio = True
ElseIf Me.Tipo = "Torque" Then
    Me.Torque = True
ElseIf Me.Tipo = "Diferencial" Then
    Me.Diferencial = True
ElseIf Me.Tipo = "Hidráulico" Then
    Me.Hidraulico = True
ElseIf Me.Tipo = "Freio" Then
    Me.Freio = True
End If


Call Hidraulico_Click
Call torque_Click
Call transmissao_Click
Call cambio_Click
Call diferencial_Click
Call freio_Click
Call Motor_Click



Isso já resolve.
O problema é que o form estava recarregando após escolher o tipo e assim voltava para o primeiro registro.

No aguardo

Bom Dia!

Muito obrigado Claudio, resolvido o problema só de um jeito um pouco diferente mas o seu é mais simples, vou continuar no desenvolvimento e depois eu coloco ele inteiro para que outros colegas possam aproveitar, é um sistema completo de manutenção para frota municipal inclusive com ordem de serviço e todo o tipo de acessório colocado nos veículos, onde até a disposição dos pneus no veículo é inclusa.

Mais uma vez obrigado e um abraço a todos vcs!

Boa tarde.
Que bom que resolveu amigo.
O fórum agradece o retorno.
Abraço