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

    SEEK / FINDFIRST

    Compartilhe

    AKNT
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 09/10/2012

    SEEK / FINDFIRST

    Mensagem  AKNT em Dom 12 Jul 2015, 13:51

    Boa dia.
    Poderiam me ajudar a usar o FINDFIRST no lugar do SEEK em tabelas vinculadas.
    Utilizo o sequinte código:

    Obs: Campo DTE - Tipo data
    Campo RI - tipo texto
    Access 2010

    Private Sub Combinação114_BeforeUpdate(Cancel As Integer)
    Dim rsttab As DAO.Recordset
    Set Db = CurrentDb()
    Set rsttab = Db.OpenRecordset("Tbl Cad_Adol")
    rsttab.Index = "IND"
    rsttab.Seek "=", Me.DTE, Me.RI
    If rsttab.NoMatch Then
    Else
    MsgBox ("DADOS JA CADASTRADOS")
    Me.Undo
    End If
    End Sub

    Agradeço a possível ajuda.
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: SEEK / FINDFIRST

    Mensagem  JPaulo em Seg 13 Jul 2015, 10:02

    Ola;

    Veja a comparação entre esses dois metodos e tente adaptar;

    [Você precisa estar registrado e conectado para ver este link.]



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

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

      Data/hora atual: Sab 19 Ago 2017, 12:13