USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Busca com findMin, findnext, etc...?
vilmarbr
Pontos: 2843
SAO PAULO
SP - BRASIL
Postada em 24/05/2005 00:30 hs         
Olá,
 
O que está errado no código abaixo, pois não encontra nada!
E como eu faço para amarrar a busca com a exibição nas caixas de textos, etc.. e grid?
 
Private Sub Command1_Click()
    a = Text1.Text
    Data1.Recordset.FindMin nome = a
   
    If Data1.Recordset.NoMatch Then
        MsgBox "Não encontrado"  ' só cai aqui!
    Else
        MsgBox "Achei"
    End If
End Sub

http://www.vilmarbro.com.br
     
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
Postada em 24/05/2005 02:10 hs            
Duas consideraçoes:
 
1) Não use o = pra conparar strings... so pra numeros... pra strings usa o LIKE... nao vou te explicar a diferença aqui, se vc quizer detalhes, pergunta depois... o importante é vc usar o LIKE para comparar strings...
 
2) o parametro do metodo Find ("criteria") é uma string no formato SQL... vc deve preenchela assim:
 
->supondo q vc procura nomes começados com "A"
Data1.Recordset.FindNext "nome LIKE 'A%'"
Observe os apostrofos em torno do valor, bem como q a linha toda esta entre aspas
 
-> supondo q o valor q vc deseja comparar esta em uma string (chamada valor):
Data1.Recordset.FindNext "nome LIKE '" & valor & "'"
Observe q os apostrofos continuam, se vc esquecer deles, nao vai funcionar...
 
Ah, mais uma coisa, se for usar curingas, lembre-se disso: Se vc usa ADO, o curinga é o sinal de porcentagem (%), ja se usa DAO ou DATA (seu caso) o curinga é o asterisco (*)... se vc inverter, talvez nao funcione.. eu nunca inverti pra saber o q acontece...
 
Espero ter te ajudado...
 


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

     
vilmarbr
Pontos: 2843
SAO PAULO
SP - BRASIL
Postada em 24/05/2005 11:37 hs         
ok, grato

http://www.vilmarbro.com.br
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página