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 2452...referencia invalida...Parent

    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5112
    Registrado : 20/04/2011

    [Resolvido]Erro 2452...referencia invalida...Parent Empty [Resolvido]Erro 2452...referencia invalida...Parent

    Mensagem  Silvio 5/2/2014, 13:46

    Prezados, visando aprimorar mais ainda um sistema de busca para meu cliente, estou tendo um pequeno problema no código descrito  abaixo, o mais interessante é que se eu clicar em fim na mensagem de aviso, o sistema carrega a foto.
    Poderia eu contornar esse erro usando o : On error resume next, mas não ficaria correto.
    Estou anexando um print screen da tela

    Private Sub lstvei_Click()
    Dim intrecord As Integer
       intrecord = Me!lstvei.Column(0)
       Forms![frmblococliente].SetFocus
       DoCmd.GoToControl "idblocomotor"
       DoCmd.FindRecord intrecord
       
       Dim f As String
    f = "[idblocomotor]=" & Me![lstvei].Column(0)
    DoCmd.ApplyFilter , f

       If IsNull(Parent!localfoto) = False Then --> o erro ocorre nessa linha.

           Parent!foto.Picture = CurrentProject.Path & "\bloco\" & Parent.localfoto.Value
       Else
           Parent!foto.Picture = CurrentProject.Path & "\bloco\" & "SemFoto.gif"
       End If
     
    Exit Sub

    End Sub

    Conto com a ajuda dos colegas.

    Abraços a todos.


    Última edição por Silvio em 5/2/2014, 13:58, editado 1 vez(es) (Motivo da edição : acréscimo)


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Erro 2452...referencia invalida...Parent Empty Re: [Resolvido]Erro 2452...referencia invalida...Parent

    Mensagem  JPaulo 5/2/2014, 14:07

    Utilize a instrução completa;

    Em vez de:

    If IsNull(Parent!localfoto) = False Then

    Utilize:

    If IsNull(Forms!SeuForm!SeuSubForm.Form!localfoto) = False Then


    Até porque quando se utiliza o "Parent", utiliza-se com o Me.Parent

    Veja as várias formas de invocar o caminho;

    http://access.mvps.org/access/forms/frm0031.htm


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Erro 2452...referencia invalida...Parent Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Erro 2452...referencia invalida...Parent Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Erro 2452...referencia invalida...Parent Folder_announce_new Instruções SQL como utilizar...
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5112
    Registrado : 20/04/2011

    [Resolvido]Erro 2452...referencia invalida...Parent Empty Re: [Resolvido]Erro 2452...referencia invalida...Parent

    Mensagem  Silvio 5/2/2014, 15:23

    Matou a pau de novo...resolvido.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Erro 2452...referencia invalida...Parent Empty Re: [Resolvido]Erro 2452...referencia invalida...Parent

    Mensagem  JPaulo 5/2/2014, 15:32

    Obrigado pelo retorno o forum agradece.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Erro 2452...referencia invalida...Parent Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Erro 2452...referencia invalida...Parent Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Erro 2452...referencia invalida...Parent Folder_announce_new Instruções SQL como utilizar...

    Conteúdo patrocinado


    [Resolvido]Erro 2452...referencia invalida...Parent Empty Re: [Resolvido]Erro 2452...referencia invalida...Parent

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 23/10/2024, 04:25