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]Arquivo no formato ACCDE X ACCDB

    Compartilhe

    jsouzasites
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 30/08/2013

    [Resolvido]Arquivo no formato ACCDE X ACCDB

    Mensagem  jsouzasites em 13/11/2018, 18:47

    Queria saber se convertendo a aplicação para ACCDE, ganho alguma vantagem além da questão do fechamento do arquivo.

    A minha aplicação em ACCDB cresce constantemente, passando de 15mb para 160mb em alguns casos, sem fazer nenhuma alteração, somente executando.

    Ainda tem o problema de corromper o arquivo.

    Queria saber se resolve esses problemas ou pelo menos melhora.

    Jr.Wano
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 153
    Registrado : 29/01/2010

    Re: [Resolvido]Arquivo no formato ACCDE X ACCDB

    Mensagem  Jr.Wano em 18/11/2018, 16:41

    Ao converter para accde, além do fechamento, você tem uma redução no tamanho da App., tipo uma limpeza como se houvesse sido executado o "decompile"

    Quanto ao aumento no tamanho, quando da execução, isto é próprio do Access e não tem como evitar, mas pode-se contornar ao definir "Compactar ao fechar" nas opções do access.

    Em relação a "corromper o arquivo", não tem nada haver com o tamanho do App., com certeza tal fato está ocorrendo por erros nas configurações, na modelagem do Banco, e por ai vai..., seriam necessárias maiores informações sobre o app. para uma resposta mais objetiva.

    Abraços.
    avatar
    vieirasoft
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Arquivo no formato ACCDE X ACCDB

    Mensagem  vieirasoft em 18/11/2018, 17:10

    para evitar corromper a BD, abra um módulo e cole:

    Sub limpa()
    On Error Resume Next
       Dim ws As Workspace
       Dim Db As Database
       Dim rs As Recordset
       Dim rst As Recordset
       For Each ws In Workspaces
           For Each Db In ws.Databases
               For Each rs In Db.Recordsets
                   rs.Close
                   rst.Clone
                   Set rs = Nothing
                   Set rst = Nothing
               Next
               Db.Close
               Set Db = Nothing
           Next
           ws.Close
           Set ws = Nothing
       Next
    End Sub

    Feche o módulo e dê-lhe um nome qualquer

    Nas propriedades do formulário "Ao Remover da Memória", digite "Limpa" e pronto!

      Data/hora atual: 16/12/2018, 11:19