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


2 participantes

    [Resolvido]Erro ao converter em ACCDB ou ACCDE

    avatar
    EltonCosta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 65
    Registrado : 02/02/2012

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Erro ao converter em ACCDB ou ACCDE

    Mensagem  EltonCosta 16/3/2012, 11:50

    olá, tenho um bd com backend e frontend ambos com extensão .mdb, qdo converto o frontend para accdb ou accde ele dá um erro, o erro fica exatamente nessa linha vermelha:

    ERRO EM TEMPO DE EXECUÇÃO: TIPOS INCOMPATÍVEIS:


    Private Sub Form_Open(Cancel As Integer)
    Dim db As Database, t1 As Recordset

    Set db = CurrentDb

    Set t1 = db.OpenRecordset("DataExpirar", dbOpenDynaset)

    If t1.BOF = True Then

    t1.AddNew

    t1![DataExp] = Date + 30 'Esta linha soma a data atual mais 30 dias

    t1.Update

    Else

    If t1![DataExp] < Date Then

    Beep

    MsgBox "O prazo de utilização deste aplicativo se esgotou!!! Entre em Contato 99 8801-0102 - Elton Costa", vbCritical

    Application.Quit acPrompt

    End If

    End If

    t1.Close
    End Sub
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  criquio 16/3/2012, 11:56

    Olá! Tente mudar Dynaset para Table.


    .................................................................................
    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
    EltonCosta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 65
    Registrado : 02/02/2012

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  EltonCosta 16/3/2012, 12:13

    desculpa a ignorância mais onde faço isso, já q esse código peguei e adaptei no meu bd para limitar os dias do user para usar o programa:::
    avatar
    Convidad
    Convidado


    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  Convidad 16/3/2012, 12:23

    Elton

    O Criquio disse para mudar essa linha:

    Set t1 = db.OpenRecordset("DataExpirar", dbOpenDynaset)

    para:

    Set t1 = db.OpenRecordset("DataExpirar", dbOpenTable)

    Abraços

    avatar
    EltonCosta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 65
    Registrado : 02/02/2012

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  EltonCosta 16/3/2012, 12:27

    agora deu

    ERRO EM TEMPO DE EXECUÇÃO '3219'

    OPERAÇÃO INVÁLIDA
    avatar
    Convidad
    Convidado


    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  Convidad 16/3/2012, 12:32

    Em que linha deu o erro?

    Mostra?

    Sabe depurar o código linha a linha?

    Aguardando...
    avatar
    EltonCosta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 65
    Registrado : 02/02/2012

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  EltonCosta 16/3/2012, 12:48

    Deu erro na linha vermelha...

    Private Sub Form_Open(Cancel As Integer)
    Dim db As Database, t1 As Recordset

    Set db = CurrentDb

    Set t1 = db.OpenRecordset("DataExpirar", dbOpenDynaset)

    If t1.BOF = True Then

    t1.AddNew

    t1![DataExp] = Date + 30 'Esta linha soma a data atual mais 30 dias

    t1.Update

    Else

    If t1![DataExp] < Date Then

    Beep

    MsgBox "O prazo de utilização deste aplicativo se esgotou!!! Entre em Contato 99 8801-0102 - Elton Costa", vbCritical

    Application.Quit acPrompt

    End If

    End If

    t1.Close
    End Sub
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  criquio 16/3/2012, 13:00

    Verifique nas referências se tem alguma escrito AUSENTE. Talvez tenha que mudar alguma referência.


    .................................................................................
    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
    Convidad
    Convidado


    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  Convidad 16/3/2012, 13:06

    Elton

    Para desencargo de consciência, vá em qualquer módulo, clique e referencias.

    Verifique se existe essa DLL e se está clicada:

    Microsoft 12.0 Object Library.

    Meu Access é 2007 então é 12.0.

    Se teu Access for numa versão menor, esse número também será.

    Obs.: Mestre Criquio, tive que esperar tua postagem para postar!! Laughing Laughing

    Aguardando...
    avatar
    EltonCosta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 65
    Registrado : 02/02/2012

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  EltonCosta 16/3/2012, 13:07

    Ele com extensão .mdb não tem erro nenhum, só quando converto pra outra extensão tipo accdb ou accde que dá o erro...
    avatar
    EltonCosta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 65
    Registrado : 02/02/2012

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  EltonCosta 16/3/2012, 13:13

    o meu é:

    Microsoft 14.0 Object Library.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  criquio 16/3/2012, 13:39

    Você verificou o que falamos acima? Tem alguma referência escrita AUSENTE? Tem alguma referência da versão anterior?


    .................................................................................
    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
    EltonCosta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 65
    Registrado : 02/02/2012

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  EltonCosta 16/3/2012, 13:54

    olha, só tem 1 opção marcada a mais no ACCDB que não tem no outro, tirei e mesmo assim deu o mesmo erro...
    avatar
    Convidad
    Convidado


    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  Convidad 16/3/2012, 14:05

    Elton

    Então você usa o Access 2010

    Existem chamadas API no aplicativo?

    Se sim, seria bom verificar sobre as API's no Access 2010.

    Veja como seria no Access 2010:
    Código:

    #If VBA7 Then
      Declare PtrSafe Function GetProfileString Lib "kernel32" Alias "GetProfileStringA" (ByVal lpAppName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long) As Long
    #Else
      Declare Function GetProfileString Lib "kernel32" Alias "GetProfileStringA" (ByVal lpAppName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long) As Long
    #End If

    Mas isso ainda é uma especulação de minha parte.
    Veja mais sobre isso no site do Avelino

    Como uso o Access 2007, não posso opinar mais.

    Abraços
    avatar
    EltonCosta
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 65
    Registrado : 02/02/2012

    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  EltonCosta 16/3/2012, 14:34

    posto o BD aqui com versão mdb ou accdb para vcs darem uma olhada ?
    avatar
    Convidad
    Convidado


    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  Convidad 16/3/2012, 15:54

    Elton

    Pode postar, talvez alguém que tenha o Access 2010, verifique o que está ocorrendo.

    Abraços
    avatar
    Convidad
    Convidado


    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  Convidad 27/3/2012, 04:30


    ... Sem retorno do usuário ...
    avatar
    Convidad
    Convidado


    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  Convidad 12/4/2012, 03:06


    Considerado como resolvido.

    Conteúdo patrocinado


    [Resolvido]Erro ao converter em ACCDB ou ACCDE Empty Re: [Resolvido]Erro ao converter em ACCDB ou ACCDE

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 15:37