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

    Insert into para campos verdadeiros

    claudior9
    claudior9
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 15/07/2015

    Insert into para campos verdadeiros Empty Insert into para campos verdadeiros

    Mensagem  claudior9 Seg 9 Nov - 9:50

    Ola Pessoal, estou com uma dúvida e não estou conseguindo resolver, alguém pode me ajudar?

    fiz uma instrução de Inserto into como abaixo

    Public Sub RECORD()
    Dim QDF As QueryDef
    Dim SQ As String

    SQ = " INSERT INTO tblPGroup (groupCode, changedcountryCode)"
    SQ = SQ & " SELECT '" & Me.groupCode& "' AS groupCode, '" & Me.changedcountryCode& "' AS changedcountryCode"
    Set QDF = CurrentDb.CreateQueryDef("", SQ)

    QDF.Execute
    QDF.Close
    Set QDF = Nothing
    End Sub

    Lembrando que os campos do meu form são iguais aos campos da tabela, porém para os casos de que tenho texto, número tudo funciona certinho, e o campo changedcountryCode é Verdadeiro/Falso, e ele não marca na tabela se estiver verdadeiro.

    Alguém sabe o que pode ter acontecido?

    Poderiam me ajudar?


    Abços
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1314
    Registrado : 21/01/2012

    Insert into para campos verdadeiros Empty Re: Insert into para campos verdadeiros

    Mensagem  Cláudio Más Ter 10 Nov - 11:25

    No meu teste funcionou, com algumas alterações na instrução:

    SQ = SQ & " SELECT '" & Me.groupCode & "' AS groupCode, " & Me.changedcountryCode & " AS changedcountryCode"

    E tem a alternativa:

    SQ = SQ & " Values ('" & Me.groupCode & "', " & Me.changedcountryCode & ")"

      Data/hora atual: Qui 28 Mar - 5:35