|
|
Postada em 08/12/2004 18:35 hs
Uma duvida, tenho dois formularios identicos abertos um ao lado do outro utilizo este controle para verificar a entrada de dados iguais no banco de dados:
Case "Incluir" Dim Criterio As String Criterio = "Nome = '" & cmbnome.Text & "'and Equipe='" & Equipe.Text & "' and Matricula = '" & cmbmatricula.Text & "' and Data = #" & Format(txtdatacompetição, "mm/dd/yy") & "# "
TBSaldo.FindMin Criterio If TBSaldo.NoMatch = False Then MsgBox "Já consta na Súmula a Participação do Atleta." & Chr(13) & "Verifique se foi selecionado os campos corretos.", 48, "Aviso de Duplicidade LimpaFormulário cmbnome.SetFocus Else TBSaldo.AddNew AtualizaPontos End If Mas constatei que quando estou com o outro formulario aberto e for dentar incluir o mesmo registro ele aceita, pergunta aos amigos tenho como contornar este problema estando com os dois formularios abertos, tipo um refresh ou algo parecido sem ter que fechar e abrir o outro formulario para o mesmo voltar atualizado.
"O pior inimigo que você poderá encontrar será sempre você mesmo."
|
|
|
|
|
|
|
|
Postada em 08/12/2004 23:17 hs
Parece que você está usando a DAO para acesso aos dados. O que provavelmente está acontecendo é que a TBSaldo foi aberta com uma cláusula SQL (Select ...From...). Assim, ela não "conhece" o novo registro que você incluiu, e aí, permite a nova inclusão. Ao invés de usar o SQL, abra o recordset usando apenas o nome da tabela; destaforma, o novo registro poderá ser localizado pelo segundo formulário.
|
|
|
|
|