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]Erro no exemplo de Backup 2

    Compartilhe

    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Dom 30 Nov 2014, 00:01

    Olá amigos,

    Se o amigo Harysohn estiver por aí é sobre o tópico [Você precisa estar registrado e conectado para ver este link.]

    No meu windows 7 32bits, access 2007 32 bits o backup e o restore com winrar funciona perfeitamente.

    Adquiri um novo pc e coloquei windows 7 64 bits, access 2007 32 bits e o backup e restore com winrar parou de funcionar.
    Já tentei mudar o caminho do winrar mas não adiantou. TEntei deixar a marcação da caixa de compactar ou descompactar com winrar
    mas também não deu certo.
    Pelo que estou deduzindo é como se ele não encontrasse o winrar no meu PC porém eles está instalado de forma padrão.

    Se puder me dar uma mão fico muito agradecido pois a adaptação do seu exemplo que fiz é que tem resolvido alguns problemas por aqui.

    Grato
    Marcelo


    Última edição por Buscador em Ter 02 Dez 2014, 20:52, editado 1 vez(es)
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Dom 30 Nov 2014, 01:33

    Faça uma pesquisa no fórum por "64 bits". Há algumas dicas de adaptação que talvez lhe ajude.

    Ali ↓abaixo↓ na minha assinatura tem um vídeo com dicas para pesquisas mais eficientes no fórum.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Dom 30 Nov 2014, 22:03

    Já procurei no fórum mas só encontro posts sobre 64 bits para o Access 64bits
    No meu caso só o windows é 64 bits e no exemplo citado tanto o backup quanto o restore
    sem compactação continuam funcionando normalmente, tanto na basta backup quanto
    no Dropbox.
    Somente o backup e restore "compactado com winrar" é que não funciona mais.
    Grato

    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Seg 01 Dez 2014, 17:20

    Olá, pessoal
    Boa tarde

    Estava dando uma olhada aqui e descobri que na verdade o exemplo citado funcionava no meu win64 sim eu é que
    não estava me dando contra de que a caixa de seleção para o backup (ou restore) com winrar começou a ficar bloqueada.
    Ele simplesmente parou de uma hora para outra.
    Como no aplicativo tem um código que verifica a existência do WinRAR e libera a caixa de seleção "desconfio" que ele
    não está fazendo esta verificação, pois em outro PC (com win32) funciona normalmente.
    Tentei colocar o caminho do WinRAR completo mas também não deu.
    Então fiquei realmente de pés e mãos amarradas.
    Se alguém puder me dar uma luz fico muito grato.
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Seg 01 Dez 2014, 23:11

    Isso aí que tu disse é no aplicativo Access? Se for, as funções tem tratamento de erro? Se sim, já tentou desabilitá-los e rodar para ver se dá mensagem de erro e marca a linha do problema?


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Seg 01 Dez 2014, 23:57

    Olá Criquio, boa noite

    Sim, é no access e parou de funcionar de uma hora para outra.
    O aplicativo de backup tem um código que quando não encontra o WinRAR no sistema
    desabilita uma caixa de seleção:

    If Len(Dir("C:\Arquivos de programas\Winrar\WinRAR.EXE") & "") = 0 Then
    If Len(Dir(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE") & "") > 0 Then
    strLocalWinRar = Environ("programFiles")
    Else
    Me!selWinrar.Enabled = False
    End If

    Se eu tornar esta caixa de seleção habilitada dá o erro:

    53 - O arquivo não foi localizado

    Tenho várias cópias deste aplicativo access justamente por segurança e em todas começou a dar o mesmo erro.
    Em outro PC meu, mais antigo, funciona normalmente mas no PC novo "funcionava" e parou sem nem mesmo eu perceber.

    A única diferença é que no PC atual "o WinRAR é 64 bits.

    Grato
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Ter 02 Dez 2014, 00:03

    Tente tirar o & "" no final:

    Código:
    Len(Dir(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE"))

    E também exiba o caminho em uma MsgBox para ver se está retornando o caminho correto do winrar.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Ter 02 Dez 2014, 00:34

    Olá,
    Obrigado por ajudar.
    Tentei colocando
    If Len(Dir(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE")) > 0 Then
    Não resolveu (se eu habilitar a caixa dá o mesmo erro 53- O arquivo não foi localizado).

    Já exibir o caminho em uma Msgbox eu sinceramente não sei como fazer
    Se puder dar uma dica farei e posto aqui.
    Grato
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Ter 02 Dez 2014, 00:36

    Código:
    MsgBox Len(Dir(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE"))


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Ter 02 Dez 2014, 00:42

    O código completo ficaria assim?


    If Len(Dir("C:\Arquivos de programas\Winrar\WinRAR.EXE") & "") = 0 Then
    If Len(Dir(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE")) > 0 Then

       
           strLocalWinRar = Environ("programFiles")
           MsgBox Len(Dir(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE"))
       Else
           Me!selWinrar.Enabled = False
       End If
    Else
       strLocalWinRar = "c:\Arquivos de programas"
    End If
    strCaminho = strCaminhoBd
    Me!txOrigem = strCaminhoBd
    Me!txDestino = fncDestinoBackup
    CaminhoTemp = Me.txDestino
    End Sub
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Ter 02 Dez 2014, 00:48

    Coloque o MsgBox antes de tudo apenas para exibir a mensagem e um Exit Sub logo após para parar o código. É apenas para exigir a mensagem:

    Código:
    MsgBox Len(Dir(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE"))
    Exit Sub

    If Len(Dir("C:\Arquivos de programas\Winrar\WinRAR.EXE")) = 0 Then
    ....


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Ter 02 Dez 2014, 00:50

    A mensagem retorna 0 (número zero).
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Ter 02 Dez 2014, 00:53

    Então não existe o WinRar nesse caminho. Agora teste o caminho em si para ver o que retorna:

    Código:
    MsgBox Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE"


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Ter 02 Dez 2014, 00:55

    Retorna:

    C:\Program Files(x86)\Winrar\WinRAR.EXE

    Não entendi isto porque o meu winrar está em:

    "C:\Program Files\WinRAR\WinRAR.exe"

    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Ter 02 Dez 2014, 11:46

    Olá, bom dia.

    Fiz um monte de testes aqui trocando o código para ver se mostra o winrar na pasta de arquivos de programas 64 bits mas não deu certo.
    Acho que só trocando o winrar para um de 32 bits mas pelo que entendi do código deveria funcionar porque o winrar está na pasta
    C:\Program Files\WinRAR\WinRAR.exe
    Mas o que me encuca é que estava funcionando.
    Grato
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Ter 02 Dez 2014, 13:22

    Talvez se passar o caminho assim:

    Código:
    Replace(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE", "(x86)", "")

    ou talvez trocando "Program Files(X86)" por "Arquivos de Programas":

    Código:
    Replace(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE", "Program Files(x86)", "Arquivos de Programas")


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Ter 02 Dez 2014, 19:49

    Olá, boa tarde.
    Mas onde eu colocaria esta linha dentro deste código:

    If Len(Dir("C:\Arquivos de programas\Winrar\WinRAR.EXE") & "") = 0 Then
    If Len(Dir(Environ("PROGRAMFILES") & "\Winrar\WinRAR.EXE") & "") > 0 Then

    strLocalWinRar = Environ("programFiles")
    Else
    Me!selWinrar.Enabled = False
    End If

    Porque pelo que entendi deste código a primeira linha verifica se o WinRAR está na pasta
    C:\Program Files (que são os programas em 64 bit) e realmente ele está lá.

    Se eu usar C:\Program Files (x86) que são os programas 32 bits não vai encontrar o WinRAR

    Estou bem confuso com isto pois eu pensava que estas linhas de código acima procurava nas 2 pastas
    mas percebo que não é assim.

    Como eu poderia colocar para procurar nas 2 pastas?

    Grato
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Ter 02 Dez 2014, 20:26

    Da sua mensagem n° 14:

    Retorna:

    C:\Program Files(x86)\Winrar\WinRAR.EXE

    Não entendi isto porque o meu winrar está em:

    "C:\Program Files\WinRAR\WinRAR.exe"

    Você diz que retorna "C:\Program Files(x86)\Winrar\WinRAR.EXE" mas o WinRar está em "C:\Program Files\WinRAR\WinRAR.exe". Por isso sugerir usar o Replace para retirar o (x86) e ficar do jeito que você disse que está o caminho certo. Se digitar o caminho correto "C:\Program Files\WinRAR\WinRAR.exe" não funciona?


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Ter 02 Dez 2014, 20:50

    Olá, boa noite.
    Eu tinha tentado com o endereço completo do winrar e não tinha dado certo.

    Agora consegui de outra forma. Dando uma pesquisada pelo google encontrei no site Usando Access um artigo falando sobre
    "Capturando informações do Windows e do Hardware ". Li o artigo todo e para minha surpresa tinha um comentário de um
    leitor por nome Gustavo (de 25/10/2014) falando justamente sobre o winrar: ... não reconhecia que ele estava instalado na pasta Program Files, somente reconhecia que tinha que estar na pasta Program Files (x86).
    Pensei na hora: é a mesma coisa que está acontecendo com o meu.
    Fiz como ele descreveu para solucionar o problema dele (na verdade copiei e colei).
    O código ficou assim:

    If Len(Dir("C:\Arquivos de programas\Winrar\WinRAR.EXE") & "") = 0 Then
    If Len(Dir(Environ("ProgramW6432") & "\WinRar\WinRAR.EXE") & "") > 0 Then
    strLocalWinRar = Environ("ProgramW6432")
    Else
    Me!selWinrar.Enabled = False
    End If
    Else
    strLocalWinRar = "c:\Arquivos de programas"
    End If
    strCaminho = strCaminhoBd
    Me!txOrigem = strCaminhoBd
    Me!txDestino = fncDestinoBackup
    CaminhoTemp = Me.txDestino

    Note que foram modificadas somente a segunda e terceira linha.

    E prontinho...Funcionando tanto no meu win 64 quanto no 32 bits.

    Fico muito grato pela ajuda

    Só não entendi a diferença do ("ProgramW6432") para ("PROGRAMFILES").

    Obrigado

    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Ter 02 Dez 2014, 20:56

    Algumas pastas do sistema de 64 bits tem outros nomes. A System32 por exemplo é SysWow no 64 bits. É por isso.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


    Buscador
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 243
    Registrado : 26/02/2011

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  Buscador em Ter 02 Dez 2014, 21:30

    Mas SysWow é uma subpasta da pasta Windows então o que tem ela com a pasta arquivos de programa que é onde está o winrar?
    Se o código tem que procurar o winrar fiquei sem entender.
    Mas já fico satisfeito em ter conseguido resolver porque uso muito este aplicativo para backup de um outro aplicativo que fiz para uso em meu trabalho.
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro no exemplo de Backup 2

    Mensagem  criquio em Ter 02 Dez 2014, 21:34

    Eu não quis dizer que esse fosse o caso, apenas citei como exemplo. Como eu citei em um dos primeiros posts, há algumas diferenças na forma de trabalhar com sistemas de 32 e de 64 bits e uma delas é essa da propriedade do Environ que teve que mudar. Cada versão do Office, cada versão do SO e até mesmo para cada aplicativo Office de uma mesma versão, há algumas diferenças entre as propriedades Environ e o retorno delas.

    Bom que resolveu.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique [Você precisa estar registrado e conectado para ver este link.] 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.


      Data/hora atual: Sab 25 Nov 2017, 00:13