pessoal eu estou usando conexao ado e tenho tres ado's, um adoTarefas, um adoFuncionarios e um adopessoal, no mesmo formulario(tarefas) para fazer tres datacombos,usando rowsource,listfiel,datasource e datafield. porem o recordset do meu if não esta funcionando, q acontece????
strg = InputBox$("Digite o código da tarefa: ", "Localizar Codigo")
crit = CVar(strg)
If strg = Empty Then
MsgBox "Código não digitado!", vbCritical
End If
adoTarefas.Recordset.Find "codigo = '" & crit & "'"
If adoTarefas.Recordset.EOF = False Then
MsgBox "Código já existe !", vbCritical
adoTarefas.Recordset.MoveMin
Else
adoTarefas.Recordset.AddNew
txtNome.SetFocus
End If