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

    Fazer o arquivo cair na pasta criada

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1714
    Registrado : 23/01/2018

    Fazer o arquivo cair na pasta criada Empty Fazer o arquivo cair na pasta criada

    Mensagem  crysostomo 9/4/2021, 16:00

    Bom dia amigos.
    Estou com código que cria o arquivo txt, mas não estou conseguindo colocar ele na pasta do usuário.
    Tenho um botão que cria a pasta direto ao cadastra-los.
    Queria que esse arquivo txt já caísse na pasta dele

    Código:
    Open "\\ASSISTENTE-SOCI\document$\ServiçoSocial_(EM_TESTE)\ " & Texto1 & ".txt" For Output As #1
     Close #1
    aqui sa caise na pasta dele


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1714
    Registrado : 23/01/2018

    Fazer o arquivo cair na pasta criada Empty Re: Fazer o arquivo cair na pasta criada

    Mensagem  crysostomo 9/4/2021, 22:23

    Eles está caindo fora da pasta.
    Código:
    MkDir "C:\ServiçoSocial\Pastas_do_Usuarios\" & Me.txt_nome_cad_usuario.Value
          Open "C:\ServiçoSocial\Pastas_do_Usuarios\ " & Me.txt_nome_cad_usuario.Value & ".txt" For Output As #1
     Close #1
    '' cair na pasta '''
    Dim cairAPasta As String
        cairAPasta = "C:\ServiçoSocial\Pastas_do_Usuarios\"" & Me.txt_nome_cad_usuario.Value"
    Fazer o arquivo cair na pasta criada Sem_t108


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    Fazer o arquivo cair na pasta criada Empty Re: Fazer o arquivo cair na pasta criada

    Mensagem  Alexandre Neves 10/4/2021, 11:09

    Bom dia
    será
    cairAPasta = "C:\ServiçoSocial\Pastas_do_Usuarios\" & Me.txt_nome_cad_usuario.Value
    ou
    cairAPasta = "C:\ServiçoSocial\Pastas_do_Usuarios\" & Me.txt_nome_cad_usuario.Value &"\"


    .................................................................................
    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
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1714
    Registrado : 23/01/2018

    Fazer o arquivo cair na pasta criada Empty Re: Fazer o arquivo cair na pasta criada

    Mensagem  crysostomo 13/4/2021, 00:09

    Já tentei.
    A intensão é ter uma pasta só onde estará 2 tipos de documentos, pois não há necessidade de criar uma para cada, pois uma só vai especificar os documentos.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    Fazer o arquivo cair na pasta criada Empty Re: Fazer o arquivo cair na pasta criada

    Mensagem  Alexandre Neves 13/4/2021, 15:50

    Boa tarde
    Não entendi. Queria que documento caísse na sua pasta? O que é que não funciona?


    .................................................................................
    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
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1714
    Registrado : 23/01/2018

    Fazer o arquivo cair na pasta criada Empty Re: Fazer o arquivo cair na pasta criada

    Mensagem  crysostomo 13/4/2021, 21:19

    No momento estou no celular.
    Meu sistema de cadastro tem as 3 funções.
    Cadastra,criar a pasta e arquivo txt, a única coisa que não funciona é  o arquivo txt não cai na pasta que foi criada no exato  momento do cadastro.
    O arquivo txt so cai em uma pasta fixa.
    Código:
    Open "C:\ServiçoSocial\Pastas_do_Usuarios\AndamentoDoProcesso" & Me.txt_nome_cad_usuario & ".txt" For Output As #1
     Close #1  
    Nesse código ela vai cair só na pasta AndamentoDoProcesso e não nas pasta que está sendo criada, ou seja, cada pasta tem seu txt.

    No codigo que me passou já tentei mudei e ele continua caindo fora da pasta.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    Fazer o arquivo cair na pasta criada Empty Re: Fazer o arquivo cair na pasta criada

    Mensagem  Alexandre Neves 16/4/2021, 15:37

    Boa tarde
    Provavelmente não será com esse código que o ficheiro cai nessa pasta
    Reveja o código todo e execute passo-a-passo para ver qual instrução funciona incorrectamente


    .................................................................................
    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
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1714
    Registrado : 23/01/2018

    Fazer o arquivo cair na pasta criada Empty Re: Fazer o arquivo cair na pasta criada

    Mensagem  crysostomo 16/4/2021, 23:32

    Boa noite Alexandre. Nenhumas está caindo nas pasta que foram criadas pelo cadastro.
    essa
    Código:
    Open "C:\ServiçoSocial\Pastas_do_Usuarios\andamentoDoProcesso\" & Me.txt_nome_cad_usuario & ".txt" For Output As #1
    Close #1
    cai em uma pasta que não foi criada pelo cadastro.
    Já refiz com outros códigos criados e seus apresentados

    Dê correria vou ter que fazer outra pasta para isso.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

      Data/hora atual: 13/6/2021, 00:36