AJUDA COM BOTOES DELETE E BUSCA?

RDPIZA 04/10/2011 20:01:02
#385983
?
Alguem me ajuda ?O que ta faltando aqui para funcionar
Private Sub cmdBusca_Click()
txt1.Enabled = True
txt2.Enabled = True
txt3.Enabled = True
txt4.Enabled = True
txt5.Enabled = True
txt6.Enabled = True
txt7.Enabled = True
txt19.Enabled = True
Adodc1.Recordset.MoveLast
cmdBusca.Enabled = True
MsgBox [Ô]Dados Encontrados[Ô]
End Sub


E Aqui
Private Sub cmdExcluir_Click()
txt1.Enabled = True
txt2.Enabled = True
txt3.Enabled = True
txt4.Enabled = True
txt5.Enabled = True
txt6.Enabled = True
txt7.Enabled = True
txt19.Enabled = True
Adodc1.Recordset.Delete
cmdExcluir.Enabled = True
MsgBox [Ô]Dados Apagados[Ô]
End Sub
Lembrando to usando VB6.
RDPIZA 06/10/2011 14:55:26
#386111
To fazendo uma agenda com banco de dados adodc e preciso criar botão de add , excluir, limpa e procurar ok
RDPIZA 06/10/2011 16:21:59
#386120
só quero ajuda to começando agora c não que ajudar blz...
RDPIZA 06/10/2011 16:23:15
#386121
esse forum é pra ajuda tmbm ou não. é só pra quem sab de tudo?
KERPLUNK 06/10/2011 16:38:14
#386127 Resposta escolhida
Para buscar, primeiro estabelece-se os critérios de pesquisa:
Select * from tabela where campo1 = [ô]valor1[ô]

Para deletar o processo é parecido:
Delete from tabela where campo1 = [ô]valor1[ô]

Para podermos ajudar vc no que vc precisa, vc precisa explicar o que quer fazer...
RDPIZA 06/10/2011 17:03:17
#386134
obrigado era so isso msm.
Tópico encerrado , respostas não são mais permitidas
Voltar