MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Vba Recordset, virgula não aceita?

    Compartilhe

    clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 519
    Registrado : 29/08/2012

    [Resolvido]Vba Recordset, virgula não aceita?

    Mensagem  clebergyn em Sab 25 Jan 2014, 17:40

    neste recorsset da erro de não aceitar virgula e eu ja sei que são os campos t1 e t1 que vem
    com virgala tipo 8,5 e o certo seria 8.5
    então tem como converter o 8,5 para 8.5 ? ou seja converter o t1 e t2
    troquei 8,5 por 8.5 e ele aceita

    Set Rs = CurrentDb.OpenRecordset("SELECT AluguelCampo.Cliente, AluguelCampo.horainicio FROM AluguelCampo " & _
    "WHERE Not Isnull(AluguelCampo.cliente) And AluguelCampo.data=#" & [Forms]![AluguelCampo]![dia] & "# AND AluguelCampo.campo='" & [Forms]![AluguelCampo]![camp] & "' AND (Left([horainicio],2) + Right([horainicio],2)/60)>=" & CDbl(t1) & "  And (Left([horafim], 2) + Right([horafim], 2)/60)<= " & CInt(t2) & "")

    valeu galera, consegui usando o Replace(t1.",",".") mas é muito estranho o Access nao ter conversão pra isso

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: [Resolvido]Vba Recordset, virgula não aceita?

    Mensagem  Alexandre Neves em Sab 25 Jan 2014, 18:41

    Boa tarde,
    utilize a função Replace


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 519
    Registrado : 29/08/2012

    Re: [Resolvido]Vba Recordset, virgula não aceita?

    Mensagem  clebergyn em Sab 25 Jan 2014, 19:44

    valeu, obrigado!

      Data/hora atual: Qua 07 Dez 2016, 20:13