MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]Salvar Banco de Dados em dois lugares com um clique

    avatar
    ARGONZALE
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 175
    Registrado : 21/05/2015

    [Resolvido]Salvar Banco de Dados em dois lugares com um clique Empty [Resolvido]Salvar Banco de Dados em dois lugares com um clique

    Mensagem  ARGONZALE em 26/9/2019, 15:54

    Prezados, bom dia.

    Posta abaixo parte do código que tirei de um exemplo do mestre Avelino.

    Trata-se de realizar um Backup do Bando de Dados e salvar em outra pasta.

    Porém, esta código salva somente em uma pasta e gostaria que salvasse duas pastas pastas sendo uma no meu PC e outra no Servidor.

    Como ficaria a alteração?

    Segue parte do código:

    Private Function fncDestinoBackup(Optional Destino As String = "local") As String
    Dim strNomeBackEnd As String
    Dim strDestino As String
    On Error Resume Next
    strDestino = Replace(Destino, "local", "C:\Users\alexandre\Desktop\clientes" & "\" & strPrefix & "Backup") 'Trocar o nome da pasta Backup caso queira
    If Len(Dir(strDestino, vbDirectory) & "") = 0 Then FileSystem.MkDir (strDestino)
    strNomeBackEnd = fncNomeBackEnd
    strNomeBackEnd = left(strNomeBackEnd, InStrRev(strNomeBackEnd, ".accdb") - 1)
    strNomeBackEnd = strNomeBackEnd & Format(Date, "dd-mm-yy") & " as " & Format(Time, "hh.mm.ss") & ".accdb"
    fncDestinoBackup = strDestino & "\" & strNomeBackEnd
    End Function


    .................................................................................
    Obrigado.

    Att.

    Alexandre Gonzales
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 75%

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

    [Resolvido]Salvar Banco de Dados em dois lugares com um clique Empty Re: [Resolvido]Salvar Banco de Dados em dois lugares com um clique

    Mensagem  crysostomo em 26/9/2019, 19:41

    Faz uma nova função para salvar em outro lugar .
    Ao clicar no botão chama as 2 call


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

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1017
    Registrado : 22/11/2016

    [Resolvido]Salvar Banco de Dados em dois lugares com um clique Empty Re: [Resolvido]Salvar Banco de Dados em dois lugares com um clique

    Mensagem  IvanJr. em 26/9/2019, 20:18

    Se não me engano, no formulário que contém este código de backup existe a opção para clicar e selecionar uma nova pasta. Basta fazer isso para apontar um novo caminho e fazer uma nova cópia.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    ARGONZALE
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 175
    Registrado : 21/05/2015

    [Resolvido]Salvar Banco de Dados em dois lugares com um clique Empty Re: [Resolvido]Salvar Banco de Dados em dois lugares com um clique

    Mensagem  ARGONZALE em 30/9/2019, 18:53

    Boa tarde,

    crysostomo,

    Consegui fazer o backup em duas pastas, uma no Servidor e outra no "C:" conforme sua instrução de criar uma nova função.

    Ivan,

    Realmente existe esta opção para selecionar a pasta de destino mas minha intenção era evitar o clique do mouse e fazer uma rotina automática.

    Obrigado pelo retorno senhores.


    .................................................................................
    Obrigado.

    Att.

    Alexandre Gonzales
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 75%

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

    [Resolvido]Salvar Banco de Dados em dois lugares com um clique Empty Re: [Resolvido]Salvar Banco de Dados em dois lugares com um clique

    Mensagem  crysostomo em 1/10/2019, 00:59

    Agradecemos. Estamos aí!
    Sucesso


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

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 12/01/2014

    [Resolvido]Salvar Banco de Dados em dois lugares com um clique Empty arquivo de

    Mensagem  cesaralvesemail em 8/10/2019, 04:27

    um arquivo de exemplo pode ser?

    Conteúdo patrocinado

    [Resolvido]Salvar Banco de Dados em dois lugares com um clique Empty Re: [Resolvido]Salvar Banco de Dados em dois lugares com um clique

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2019, 20:04