DAO

USUARIO.EXCLUIDOS 27/09/2004 19:02:38
#43678
1-Alguém pode me dizer como usar o seek? Para busca algo?
2- Para deletar um registro em SQL, eu devo abrir a tabela de que maneira(dbopensanpshot ou dbopendynaset?)
ALEXANDRE.SANTO 28/09/2004 00:18:25
#43697 Resposta escolhida
Olha o seek vc usa + ou - assim:

tbprodutos.Index = "indcodigo"
tbprodutos.Seek "=", txtcodigo.Text

' NoMatch ira dizer se foi encontrada alguma ocorrencia na pesquisa com o seek

If tbprodutos.NoMatch = False Then
MsgBox "Código já Cadastrado", vbExclamation, "Cadastro"
txtcodigo.Text = ""
txtcodigo.SetFocus
Exit Sub
Else
tbprodutos.AddNew
carrega_campos
tbprodutos.update
End If
Tópico encerrado , respostas não são mais permitidas
Voltar