MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    Retornando números

    avatar
    wdemelo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 15/07/2013

    Retornando números Empty Retornando números

    Mensagem  wdemelo 7/5/2023, 13:24

    No evento após atualizar, tenho o seguinte código:
    A dúvida é a seguinte, quando digitado no campo txtCodigoProcesso esta me retornando numeros ao inves de texto, alguêm poderia me ajudar?
    As tabelas já estão definidas como texto curto.
    Abaixo imagem




    Private Sub txtCodigoProcesso_AfterUpdate()

       Dim db As DAO.Database
       Dim rs As DAO.Recordset
       Dim strSQL As String
       
       Set db = CurrentDb()
       strSQL = "SELECT Data, TemaTreinamento, Duracao, Instrutor, Projeto FROM Consulta_Processos WHERE idCodigoProcesso = '" & Me.txtCodigoProcesso.Value & "'"
       Set rs = db.OpenRecordset(strSQL)
       
       If Not rs.EOF Then
           Me.txtData.Value = rs("Data").Value
           Me.txtTemaTreinamento.Value = rs("TemaTreinamento").Value
           Me.txtDuração.Value = rs("Duracao").Value
           Me.txtInstrutor.Value = rs("Instrutor").Value
           Me.txtProjeto.Value = rs("Projeto").Value
       Else
           'Caso o código não seja encontrado, limpa os campos do formulário
           Me.txtData.Value = ""
           Me.txtTemaTreinamento.Value = ""
           Me.txtDuração.Value = ""
           Me.txtInstrutor.Value = ""
           Me.txtProjeto.Value = ""
           MsgBox "O número do processo não foi encontrada na Base de Dados."
       End If
       
       rs.Close
       Set rs = Nothing
       Set db = Nothing
       
    End Sub
    Anexos
    Retornando números AttachmentImagem1_resized.png
    Você não tem permissão para fazer download dos arquivos anexados.
    (84 Kb) Baixado 4 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3209
    Registrado : 13/12/2016

    Retornando números Empty Re: Retornando números

    Mensagem  Alexandre Fim 7/5/2023, 23:52

    Olá Wagner,
    A instrução SQL para carregar o recordset foi feita baseada em uma consulta, que deve tem algumas tabelas relacionadas.
    Provavelmente, vc está selecionando campos códigos e não a descrição dos respectivos campos.
    Por gentileza, nos envie uma cópia do seu bd para análise e solução do problema.

    Att,

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Retornando números Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    wdemelo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 15/07/2013

    Retornando números Empty Retornando números

    Mensagem  wdemelo 8/5/2023, 00:28

    Alexandre, Boa noite

    segue BD para analise!
    Anexos
    Retornando números AttachmentControle de Treinamentos_New.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (254 Kb) Baixado 4 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3209
    Registrado : 13/12/2016

    Retornando números Empty Re: Retornando números

    Mensagem  Alexandre Fim 8/5/2023, 01:44

    Wagner,

    A tabela "tblCad_Processos", o campo Duracao estava com o tipo "Texto Curto" e alterei para Data/Hora, com formato de "Hora Normal", pois no "frmHistorico", o respectivo campo estava formatado como Hora Normal...ia dar erro também.

    Fiz os devidos ajustes e está funcionando. Veja o código.

    OBS: compile seu bd e procure por erros, pois o campo Duração do frmHistorico, tem o nome de "txtDuracao" e no código (em alguma parte..) está como "txtDuração".

    Um assunto muito abordado aqui no fórum é sobre a nomenclatura de objetos de banco de dados. Procure evitar acentuação, espaços entre as palavras e palavras reservadas do Access, inclusive, na tabela tblCad_Processos existe o campo "Data", que é uma palavra reservada. Mude para DataProcesso ou
    Data_processo ou da forma que vc achar melhor.

    Evite usar palavras "Data", "Valor", "Total" para nome de campos de tabelas, pois vc terá problemas em criar empressões/funções.

    Veja também campos que deveriam ser do tipo numérico e estão como Texto. Se em algum momento vc utilizar este campo para fazer alguma somatória ou totalizador em alguma consulta, vai dar erro pq ele está como texto.

    É isso.

    Segue versão do sistema.

    Espero ter ajudado

    Att,

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Retornando números Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    wdemelo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 15/07/2013

    Retornando números Empty Re: Retornando números

    Mensagem  wdemelo 8/5/2023, 02:09

    Alexandre Fim,


    Gostaria de expressar minha sincera gratidão pela sua valiosa ajuda em resolver o problema com o código. Sua assistência foi fundamental para que eu pudesse encontrar a solução e avançar com o meu projeto.

    Sua disposição em ajudar e compartilhar seus conhecimentos é verdadeiramente admirável.

    Seu suporte fez toda a diferença, e sou muito grato por ter contado com sua expertise e assistência.


    Obrigado!

    wdemelo gosta desta mensagem

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3209
    Registrado : 13/12/2016

    Retornando números Empty Re: Retornando números

    Mensagem  Alexandre Fim 8/5/2023, 13:04

    Valeu Wagner,

    O fórum agradece.
    Sempre que precisar, estaremos aqui pra te ajudar.

    Boa sorte e sucesso!!


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Retornando números Setinf11
    Sistemas e Tecnologia Ltda

    Vitor Cirillo gosta desta mensagem

    avatar
    wdemelo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 15/07/2013

    Retornando números Empty Re: Retornando números

    Mensagem  wdemelo 14/5/2023, 16:06

    Alexandre, Boa Tarde!


    Estou enfrentando um problema em minhas aplicações no Access e gostaria de pedir a ajuda de vocês. Estou desenvolvendo um formulário chamado frmCad_Trabalhador e outro chamado frmHistorico, e em ambos os formulários, tenho uma caixa de listagem que deveria exibir a descrição do cargo, mas está exibindo o código do cargo em vez disso.

    Gostaria de mencionar que nas respectivas tabelas do banco de dados, os dados estão sendo salvos corretamente, ou seja, tanto o código quanto a descrição do cargo estão corretamente registrados.

    Já verifiquei a configuração da origem de dados da caixa de listagem e confirmei que está corretamente vinculada à tabela que contém as informações dos cargos. Também tenho certeza de que a coluna que contém a descrição do cargo está definida como a coluna que deveria ser exibida na caixa de listagem.

    Além disso, verifiquei a propriedade "Bound Column" (Coluna Vinculada) da caixa de listagem e confirmei que está configurada corretamente para o número da coluna que contém o código do cargo. A propriedade "Column Widths" (Larguras das Colunas) também está configurada para exibir a descrição do cargo de forma adequada.

    Considerando todas essas verificações, ainda estou enfrentando o problema de exibir o código do cargo em vez da descrição na caixa de listagem.

    Gostaria de saber se alguém já enfrentou esse tipo de problema ou se tem alguma sugestão de como posso resolver essa questão. Seria muito útil receber orientações sobre outras possíveis configurações ou ajustes que possam ser necessários no meu formulário ou tabela.
    Anexos
    Retornando números AttachmentControle de Treinamentos_V1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (228 Kb) Baixado 1 vez(es)

    Conteúdo patrocinado


    Retornando números Empty Re: Retornando números

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 13/4/2024, 11:34