Impedire inserimento dati doppi nel db

17 Risposte - Pagina 2

• 

  fratac

  Molto attivo

  Iscritto da

  lug, 2022

  Messaggi:

  707

  Re: Impedire inserimento dati doppi nel db

  07 set 2024, 17:04

  Usare il Dcount. Se il risultato è minore di 1 non esiste nessun record e continui, altrimenti annulli tutto.

  Private Sub Inserimento_BeforeUpdate(Cancel As Integer)
  
  Dim ContaRecord As Long
  
  Contarecord ='DCount("[Campo_tabella]","[Tabella]","[Campo_tabella]='" & valore_del_campo & "'")
  
  If ContaRecord < 1 Then
  Else
  MsgBox "Attenzione, il dato è già presente in archivio"
  If Me.Dirty Then
          Me.Undo
     End If
  Cancel = 1
  Me.campo_tabella.Undo
  
  End If
  End Sub

• V

  valtere

  Pochi posts

  Iscritto da

  apr, 2023

  Messaggi:

  25

  Re: Impedire inserimento dati doppi nel db

  13 set 2024, 11:12

  Eccomi qui dopo un po..

  vi ringrazio tutti per i suggerimenti, alcuni troppo tecnici e fuori dalla mia portata

  gira e rigira , ho trovato questo, per me semplice, guida su come risolvere il problema: https://www.youtube.com/watch?v=qsLsztDoRdI   

  grazie ancora per il tempo e le informazioni che mi avete concesso 

  Valter

• P

  Philcattivocarattere

  Utente Famoso

  Iscritto da

  giu, 2014

  Messaggi:

  2231

  Re: Impedire inserimento dati doppi nel db

  13 set 2024, 11:43

  13/09/2024 - valtere ha scritto:

  ho trovato questo … su come risolvere il problema

  Consideralo solo un rimedio fino a quando non impari a farlo bene. L'uso di un campo calcolato direttamente in tabella che mette insieme altri due campi non ha senso visto che dopo va con il DLookup che poteva fare lo stesso sui due campi. Bah…

  Quello che ti avevamo detto era fattibile, solo che non l'hai visto fare/fatto su un video, tutto qua.