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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  CONSULTA
João Paulo
ARCOS
MG - BRASIL
Postada em 13/12/2005 21:45 hs            
Pessoal to apanhando novamente.
tenho esta consulta
 
Set fat = db.OpenRecordset("SELECT * FROM tabfaturamento WHERE código Like '" & txtCodigoCliente.Text & "*' ORDER BY código Asc")
 
'até aqui tudo bem, agora
agora quero acrescentar um código que retorne uma MsgBox "Não encontrado" caso não encontre o registro com o código especificado. Alguém sabe como faço isso?

 
     
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
Postada em 14/12/2005 06:17 hs         
Set fat = db.OpenRecordset("SELECT * FROM tabfaturamento WHERE código Like '" & txtCodigoCliente.Text & "*' ORDER BY código Asc")
if fat.recordcount > 0
  'aqui código para mostrar registro
else
  MsgBox "Não encontrado"
end if
     
João Paulo
não registrado
Postada em 14/12/2005 09:29 hs   
valeu Martini!!! muito obrigado.
     
Página(s): 1/1    

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