MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido] Transferir dados entre tabelas

    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Transferir dados entre tabelas

    Mensagem  UMEI em 20/7/2011, 12:09

    Tenho duas tabelas como citado abaixo.
    Preciso que ao clicar no botão OKSAIDA do formulario FSAIDA que mostra o registro obtido por meio de uma consulta, se aplique o cód para transferir esse registro com todos os campos (cod, nome, dt nasc, funcao ) da Tab1ENTRADA para Tab2SAIDA, ou seja, que delete o registro da Tab1ENTRADA e o acrescente na Tab2SAIDA.

    Tab1ENTRADA
    cod
    nome
    dt nasc
    funcao

    Tab2Tab2SAIDA
    cod
    nome
    dt nasc
    funcao

    Obs.: Uso o acces 2000
    chsestrem
    chsestrem
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 463
    Registrado : 01/03/2010

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  chsestrem em 20/7/2011, 13:04

    Dá uma olhada neste exemplo do mestre JPaulo

    Link

    Sds


    .................................................................................
    Charles Sestrem
    http://www.vbabit.com.br
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Tran

    Mensagem  UMEI em 21/7/2011, 16:45

    Entrei no link, baixei o bd, extrai as informações, mas no entanto não consegui aplicar.
    Preciso de um cód que transfira os dados de uma tba para outra.
    Já fiz várias pesquisas mas por nao ter conhecimeto d VBA estou com dificuldades.

    Ainda preciso de ajuda.

    Obs.: Na verdade meu acces é 2003
    criquio
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11228
    Registrado : 30/12/2009

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  criquio em 21/7/2011, 16:59

    Será que precisa mesmo de duas tabelas com os mesmos campos? Não seria melhor adaptar para ficar em uma única tabela? Mas você pode conseguir o que deseja mais ou menos assim:

    CurrentDb.Execute "INSERT INTO Tab2SAIDA(cod,nome,[dt nasc],funcao) VALUES(" & Me.Código & ", '" & Me.Nome & "', #" & Me.Nascimento & #", '" & Me.Função & "')"

    Para não correr o risco de deletar o arquivo da tabela anterior sem tê-lo realmente acrescentado à nova tabela, vamos testar se ele está lá. Se estiver, deleta. Se não estiver, avisa:

    If Not IsNull(DLookup("cod", "Tab1ENTRADA", "cod=" & Me.Código) Then
    MsgBox "Dados copiados com sucesso. A seguir o registro da tabela anterior será excluído", vbOkOnly + vbInformation, "Sucesso"
    CurrentDb.Execute "DELETE * FROM Tab1ENTRADA WHERE cod=" & Me.Código & ""
    Else
    MsgBox "Ocorreu algum erro na cópia do arquivo. O mesmo não foi copiado. Verifique.", vbOkOnly + vbCritical, "Erro"
    End If


    Nem precisa falar para testar isso em uma cópia do aplicativo, para o caso de algo sair errado, não danificar o original né?


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Ainda não consigo aplicar o cód

    Mensagem  UMEI em 25/7/2011, 11:48

    Tentei inserir o cod no BotaoOK do meu formulario. Este formulário mostra o resultado de uma consulta em que eu visualizo o registro a ser transferido.

    Tentativa 01

    - Em modo design, fui em Propriedades do botao
    - Na aba Evento no item Ao pressionar a tecla usei o Construtor de cod.
    - Já no VBA o cod ficou como abaixo:

    Private Sub BotaoOK_KeyPress(KeyAscii As Integer)

    CurrentDb.Execute "INSERT INTO Tab2SAIDA(cod,nome,[dt nasc],funcao) VALUES(" & Me.Codigo & ", '" & Me.Nome & "', #" & Me.Nascimento & #", '" & Me.Função & )"

    End Sub

    Tentativa 02

    - Em modo design, fui em Propriedades do botao
    - Na aba Evento no item Ao pressionar a tecla usei colar o código sugerido.

    Por fim, de nenhuma das tentativas obtive sucesso.
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  vieirasoft em 1/8/2011, 09:06

    Estou a puxar o tópico para cima. se já tiver resolvido, agradeço o seu retorno.
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Moderador Global

    Mensagem  UMEI em 1/8/2011, 16:42

    Eu não resolvi o problema ainda. Não obtive resposta após meu último post.
    criquio
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11228
    Registrado : 30/12/2009

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  criquio em 1/8/2011, 16:47

    O amigo não informou que aconteceu quando fez as tentativas. Apareceu alguma mensagem de erro? De qualquer forma, tente novamente com pequenas alterações e se não der, informe o que se assucedeu:

    CurrentDb.Execute "INSERT INTO Tab2SAIDA(cod,nome,[dt nasc],funcao) VALUES('" & Me.Código & "', '" & Me.Nome & "', '" & Me.Nascimento & '", '" & Me.Função & "')"

    If Not IsNull(DLookup("cod", "Tab1ENTRADA", "cod=" & Me.Código) Then
    MsgBox "Dados copiados com sucesso. A seguir o registro da tabela anterior será excluído", vbOkOnly + vbInformation, "Sucesso"
    CurrentDb.Execute "DELETE * FROM Tab1ENTRADA WHERE cod=" & Me.Código & ""
    Else
    MsgBox "Ocorreu algum erro na cópia do arquivo. O mesmo não foi copiado. Verifique.", vbOkOnly + vbCritical, "Erro"
    End If


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Erro de compilação

    Mensagem  UMEI em 3/8/2011, 15:29

    Ao inserir o cód proposto dá o erro abaixo e faz referencia ao trecho // Me.Código //
    //Erro de compilação!
    Método ou membro de dados não encontrado//

    Private Sub BotaoOK_KeyPress(KeyAscii As Integer)

    CurrentDb.Execute "INSERT INTO Tab2SAIDA(cod,nome,[dt nasc],funcao) VALUES('" & Me.Código & "', '" & Me.Nome & "', '" & Me.Nascimento & '", '" & Me.Função & "')"

    If Not IsNull(DLookup("cod", "Tab1ENTRADA", "cod=" & Me.Código) Then
    MsgBox "Dados copiados com sucesso. A seguir o registro da tabela anterior será excluído", vbOkOnly + vbInformation, "Sucesso"
    CurrentDb.Execute "DELETE * FROM Tab1ENTRADA WHERE cod=" & Me.Código & ""
    Else
    MsgBox "Ocorreu algum erro na cópia do arquivo. O mesmo não foi copiado. Verifique.", vbOkOnly + vbCritical, "Erro"
    End If

    End Sub

    Exite a opção de postar o Bd e o mesmo ser avaliado?

    Agradecido
    criquio
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11228
    Registrado : 30/12/2009

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  criquio em 3/8/2011, 15:33

    Os nomes de campos colocados são exemplos. Você precisa substituir pelos nomes corretos dos seus campos. Esse erro indica que o nome digitado não corresponde a nenhum nome de controle do elemento atual, no caso, de um formulário.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Anexo cópia do bd

    Mensagem  UMEI em 5/8/2011, 16:47

    Lembro que é apenas necessário que a cópia do registro da TabENTRADA p/ TabSAIDA seja feita sem que isso seja comunicado ao usuario, quando o botão OK do formulário SAIDA for clicado.

    E também que em sequencia, seja deletado esse regitro da TabENTRADA, também sem ser avisado ao usuario, pois esse mesmo registro será inserido por várias vezes nessa tabela, assim, apenas na TabSAIDA haverá duplicidade de informações e, na verdade, futuramente eu precisarei da informação desses registros duplicados.

    Aguardo auxilio do colega criquio quanto ao arquivo anexado.

    Agradeço
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  vieirasoft em 5/8/2011, 16:54

    E cadê o arquivo anexado?
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty erro ao anexar

    Mensagem  UMEI em 5/8/2011, 19:40

    Depois de localizar o arquivo de nome Bdteste.rar de 29Kb, e clicar em Enviar consulta, dá o seguinte erro:

    //O arquivo adicionado não é valido: nome do arquivo incorreto.//



    Última edição por UMEI em 5/8/2011, 19:46, editado 1 vez(es)
    criquio
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11228
    Registrado : 30/12/2009

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  criquio em 5/8/2011, 19:41

    FAIL

    Coloque em um servidor público como www.dropbox.com ou www.speedyshare.com


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Postei o arquivo

    Mensagem  UMEI em 5/8/2011, 20:56

    O arquivo está postado.

    Instruçoes para localizar o arquivo:

    Site: www.4shared.com
    Arquivo: Bd para teste

    Grato
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  vieirasoft em 9/8/2011, 11:27

    Assim ninguém vai ver o arquivo. Envie para o meu email que eu coloco ele aqui
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Enviado o bd

    Mensagem  UMEI em 10/8/2011, 11:52

    Ok.
    Arquivo enviado em 09/08/11.
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  vieirasoft em 10/8/2011, 11:59

    Será que poderia enviar de novo, por favor.






    Por favor, leia as regras do Fórum antes de postar. Visite o repositório de exemplos e códigos SQL/BVA
    :::::::::::::::::::::::::::::::::::::::::::::::::::
    sergiovieirasoft@gmail.com
    :::::::::::::::::::::::::::::::::::::::::::::::::::
    Se mandarem os Reis embora, hão-de tornar a chama-los (Alexandre Herculano)
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 10/8/2011, 12:32

    Se ainda não resolveu partamos deste modelo teu que baixei e fiz algumas modificações

    1 - No form principal adicionei uma Cbo e uma caixa texto onde se escolhe o nome da pessoa, a caixa texto recebe o numP, que por sua ver foi inserida na consulta da seguinte forma: Como [FORMS]![F_1PRINC]![txtNumP]

    Assim ao clicar em saida no form principal não precisa digitar mais nada pois a consulta receberá o valor contido na caixa texto em vermelho..

    Ao abrir o form e clicar em sim para confirmar a saída.. está adicionando na tabela 2 normalmente e excluindo da tabela 1

    Qualquer dúvida ou modificações neste exemplo não hesite em postar..

    Saudações


    http://dl.dropbox.com/u/26441349/UMEI_10_08_11.rar
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  vieirasoft em 16/8/2011, 18:20

    Como não retornou, o tópico passa a resolvido. Qualquer coisa reabra, por favor.
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Funcionou em partes, deu msg de erro!!

    Mensagem  UMEI em 16/8/2011, 21:42

    Harysohn
    Antes de mais nada, agradeço a ajuda e peço dsculpas pela demora da postagem, bem, dando sequencia;

    ALTERAÇÕES FEITAS.

    Observação 1 - Criei um novo campo no F_SAIDA ( usuario ) // nesse campo fica registrado o usuario responsável pela saida

    Observação 2 - ( sem inserir informações na caixa de texto "usuario" ) e ( sem alterar o código )
    Ao clicar em "SIM" do F_SAIDA, a msgbox é executada normalmente, a cópia do arquivo é feita, no entanto, quando se clica em "ok" dessa msgbox ela se fecha e
    a janela anterior,F_SAIDA, fica escrito nas caixas de textos " #Excluído " e o formulário continua aberto.
    Daí, caso se clica em "SIM" novamente, aparece uma mensagem de erro:
    Erro em tempo de execução '3075':
    Erro de sintaxe (operador faltando) na expressão de consulta'cod='.

    Observação 3 - ( inserindo informação na caixa de texto "usuario" ) e ( sem alterar o código )
    Para isso criei nas 2 tabelas (imagino que seja necessário) e na consulta o mesmo nome de registro ( usuário )
    Criei esse campo porque preciso registrar o usuario que for dar a saída,assim, quando isso for feito o usuário deverá ser obrigado a colocar o seu nome,
    a partir daí, todas as informações desse formulário deverão ir para a Tab2SAIDA.
    Mas,deu erro.

    Como não consegui mais uma vez postar o link pelo site, deixo o endereço abaixo:

    link http://search.4shared.com/q/1/bd%20alterado

    site: 4shared
    nome: bd alterado
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 16/8/2011, 21:51

    Primeiramente amigão... Observou o exemplo que postei?

    O aproveitou nesse seu teste acima?

    Coloque os problemas que estão a ocorrer na ordem cronológica dos mesmos..

    O exemplo que te enviei não serviu? pois estava a fazer o que queria na origem do topico....
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Harysohn

    Mensagem  UMEI em 19/8/2011, 20:13

    Ok,..

    O cód funcionou sim,o que solicitei, que era copiar da TabENTRADA e transferir para TabSAIDA e deletar da TabENTRADA é executado, no entanto o programa da forma como mandou dá erro no final quando ao clicar em "SIM" do F_SAIDA, o formulario confirmando a copia é executado normalmente,no entanto, quando se clica em "ok" desse formulario ele se fecha e o formulario anterior o,F_SAIDA, fica aberto e escrito nas caixas de textos " #Excluído " .
    Dai ao clicar +1 vez em "SIM" dá a msg de erro abaixo:


    Erro em tempo de execução '3075':
    Erro de sintaxe (operador faltando) na expressão de consulta'cod='.



    Como não sei manipular código, não soube como solucionar.

    O no ultimo post que fiz, não alterei nada do cód sugerido por você, apenas alterei o formulário, tabela e consulta como citei anteriormente.



    Grato +1 vez
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 19/8/2011, 20:20

    Quando clica em sim.. ele copia e exclui o registro ativo no form.. se clicar em sim novamente.. dá erro, pois como o registro foi excluido, o código que faz a copia (no botão sim) não encontra mais o registro gerando o erro.. isso acontece se clicar no botão 2 vezes seguida....

    Mas se clicar apenas uma, não dá erro..

    O que quer que aconteca depois que clica em sim.. fechar o form?

    Seja mais claro...
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 19/8/2011, 20:22

    Para não correr o risco de clicar no botão SIM inadivertidamente por duas vezes seguida...


    Private Sub Comando11_Click()

    CurrentDb.Execute "INSERT INTO Tab2SAIDA(cod,nome,[dt nasc],funcao) VALUES('" & Me.NumP & "', '" & Me.txtNome & "', '" & Me.txtData & "', '" & Me.txtFuncao & "')"

    If Not IsNull(DLookup("cod", "Tab1ENTRADA", "cod=" & Me.NumP)) Then
    MsgBox "Dados copiados com sucesso. A seguir o registro da tabela anterior será excluído", vbOKOnly + vbInformation, "Sucesso"
    CurrentDb.Execute "DELETE * FROM Tab1ENTRADA WHERE cod=" & Me.NumP & ""
    DoCmd.Close
    Else
    MsgBox "Ocorreu algum erro na cópia do arquivo. O mesmo não foi copiado. Verifique.", vbOKOnly + vbCritical, "Erro"
    End If


    End Sub
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Harysohn

    Mensagem  UMEI em 24/8/2011, 16:53

    Tem sido de grande proveito a sua ajuda, muito mesmo.

    Vou testar o cód ainda hoje! Grato!

    Mas ainda quanto ao mesmo Bd,tenho a seguinte dúvida:

    Ao criar um novo campo no F_SAIDA nome do campo: usuario, nesse campo fica registrado o usuario responsável pela saida, deu erro.Por que?

    Penso em além do campo citado, pretendo inserir outro também no F_SAIDA, campo: destino. O que muda no cód?

    Como solucionar esse problema?

    Pode me ajudar +1 vez?
    vieirasoft
    vieirasoft
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  vieirasoft em 29/8/2011, 09:29

    Estou a puxar o tópico para cima. se já tiver resolvido, agradeço o seu retorno.
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 29/8/2011, 12:27

    Envie-nos o BD com os novos campos que criou para vermos o que há de errado..

    Saudações
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Envio do arquivo com a alteração

    Mensagem  UMEI em 30/8/2011, 14:24

    Saudações Harysohn!

    Como não consegui postar o link nem o arquivo segue a forma de localizá-lo.

    site: 4shared.com
    nome: Bd alterado

    Grato



    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 30/8/2011, 14:44

    Envie-me no meu e-mail que posto aqui..

    harysohn@hotmail.com
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Harysohn!

    Mensagem  UMEI em 31/8/2011, 12:46

    Providenciado!

    Enviado para o email indicado
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 31/8/2011, 13:14

    Vamos la... apartir deste exemplo.. explique o que deseja...
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Harysohn

    Mensagem  UMEI em 31/8/2011, 14:57

    Necessito criar mais dois campos!

    Ao criar um novo campo no F_SAIDA nome do campo: usuario, nesse campo fica registrado o usuario responsável pela saida.

    Inserindo outro campo no F_SAIDA, o campo: destino para se localizar o possível doc.

    DÚVIDA:

    Inserindo os dois campos e tentando alterar o cód proposto não consegui fazer com que fossem registrados na TabSAIDA.

    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 31/8/2011, 15:56

    E quem é o usuário?? onde fica esta informação?
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Harysohn

    Mensagem  UMEI em 31/8/2011, 16:58

    O usuario é qualquer um que esteje operando o programa e que necessite dar baixa no registro.

    E o destino também não é definido.

    Os campos usuario e destino serão preenchidos no F_SAIDA e tanto o nome de quem preencheu como o destino descrito deverão ser transferidos juntamente com os dados obtidos pela consulta que já existe no Bd_alterado para a TabSAIDA.


    Grato
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 31/8/2011, 17:00

    Amigão.. para isto voce tem que ter pronto o login do sistema para identificar o usuário...
    primeiro faça isto... ai depois poderemos inserir esta informação...

    Cumprimentos
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 31/8/2011, 17:01

    Se colocar apenas uma caixa texto para o usuario aplicar o nome.. ja pensou que o mesmo podes aplicar outro nome...
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Harysohn

    Mensagem  UMEI em 2/9/2011, 12:24

    Ok! Entendo Harysohn !

    1 - No entanto, esse tipo de situação não é de relevância para na aplicação desse Bd, a rotatividade é grande de usuários que podem vir a usá-lo.

    O destino também pode ser vários, não há uma lista fixa assim como o campo citado acima.


    2 - Uma dúvida, qual seria outra opção de buscar o registro além da que vc sugeriu com a caixa de listagem no F_SAIDA, onde se escolhe o registro a ser transferido de tabela, pois a quantidade de registro será enorme, será acima de 1.000 e da forma como está acredito que com uma quantidade muito grande ficará estranho.





    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 2/9/2011, 12:51

    Se digitar o nome na caixa.. ela ja se auto completa.. não entendi esta forma de buscar... Não queria buscar o registro pelo nome?
    foi o que eu fiz não?
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 2/9/2011, 15:06

    Sobre adicionar usuário...

    http://dl.dropbox.com/u/26441349/UMEI_02_09_11.rar

    Veja e teste..

    Quanto ao que falou sobre a pesquisa.. eu não entendi
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Harysohn

    Mensagem  UMEI em 5/9/2011, 12:51

    Harysohn!!

    Cumprimentos!!

    Conforme o solicitado no tópico após sua grande colaboração, o objetivo foi atingido.

    Quanto aos outros detalhes do Bd que criei postarei novamente em novos topicos.

    Grato Mestre!

    RESOLVIDO!
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  HARYSOHN em 5/9/2011, 16:13

    O Fórum agradece o retorno.. So faltou o resolvido nó tópico..

    Saudações
    avatar
    UMEI
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 50
    Registrado : 18/07/2011

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  UMEI em 6/9/2011, 11:36

    Ok Harysohn!!

    Grato d+.
    XPTOS
    XPTOS
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 565
    Registrado : 20/01/2014

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  XPTOS em 20/1/2014, 15:21

    Prezados, boa tarde,

    Estou com a mesma dúvida do UMEI, ou seja, sobre importação de dados entre tabelas. Alguem poderia me ajudar por gentileza. Pois, tentei fazer o exemplo que HARYSOHN postou mais não deu certo.

    Caso precise, posso anexar o banco no sem problemas...

    Grato,
    avatar
    marcofar07
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 26
    Registrado : 02/04/2019

    [Resolvido] Transferir dados entre tabelas Empty Transferir dados entre tabelas

    Mensagem  marcofar07 em 24/2/2020, 06:34

    Bom dia, estou com um problema parecido, agradeço se alguém puder me ajudar..
    tenho duas tabela (uma Funcionários e outra Usurários), tenho um form com cadastro de Usuário.
    Teria como neste procedimento dos colegas funcionar da seguinte maneira,
    quando colocar os dados no form de Usuários fosse também para a tabela de funcionários?
    ------------------------------------------------------------------------------------------------------------------
    Parte do código inserido no botão salvar do form usuário, o cadastro funciona normal porem só salva na tabela usuário.

    Private Sub BtSalvar_Click()
    'On Error GoTo BtSalvar_Click_Err
    CurrentDb.Execute "INSERT INTO Funcionario(NmVendedor, Senha) VALUES('" & Me.login & "', '" & Me.Senha & "')"
       If IsNull(Trim(Me.login)) Then
           MsgBox "Entre com o nome do usuário...", vbInformation, "Aviso"
           Me.login.SetFocus
           'Exit Sub
        Else
    Finformática
    Finformática
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 602
    Registrado : 23/03/2010

    [Resolvido] Transferir dados entre tabelas Empty Re: [Resolvido] Transferir dados entre tabelas

    Mensagem  Finformática em 7/3/2020, 21:34

    Caros amigos,

    Poderiam postar o BD depois de resolvido para nossos estudos?

    Muito grato.

      Data/hora atual: 2/12/2020, 13:47