• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Pedro_07

[VB 6] Botao procurar

3 mensagens neste tópico

Tnh um programa que liga a uma BD com o Data control.

Agr quero fazer o botao procurar, sei que tnh que utilizar data1.recordset.findfirst, mas n tou a coinseguir por isto a dar

Alguem me pode ajudar?

Fikem bem

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

por acaso tb tou a usar um butao para peskiza, mas como o find nao tava a funcionar seker optei por um loop... n ta a 100% mas ja ajuda...

OrigensDE.rsContratos.MoveFirst
    Do Until Sid = Text3.Text
    OrigensDE.rsContratos.MoveNext
    If OrigensDE.rsContratos.EOF Then Exit Do
    Loop

se nao perceberes o codigo diz...

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora