訪問 - 通過Access中的表單輸入重複顯示現有記錄

Question

我正在構建一個表單以將新的序列號添加到我的數據庫中。 我們收到一篇論文，掃描2條碼，就是這樣。有時候我們會收到同一篇論文（信息稍多或少一點），如果我們掃描它，我們需要看看第一次掃描是什麼時候，所以我們沒有任何雙打，並可以決定保留哪種形式。

數據庫是這樣構建的。

序列號（條形碼）|規格ID（條形碼）|日期

所以我的問題是：

我可以顯示一條警告消息，掃描代碼，並顯示在當已經存在的形式進行掃描？ 我一直在修補「BeforeUpdate」，但我似乎無法得到它的工作（仍然是一個新手在這個，但慢慢學習。）

在此先感謝！

Answer 1

感謝您的回覆！

我想通了VBA代碼應該如何，對於同樣的問題，任何人檢查出來：

Dim SID As String 
Dim stLinkCriteria As String 
Dim rsc As DAO.Recordset 
Set rsc = Me.RecordsetClone 
SID = Me.BloedeenheidID.Value 
stLinkCriteria = "[BloedeenheidID]=" & "'" & SID & "'" 
'Check ScannedForms table for duplicate BloedeenheidID number 
If DCount("BloedeenheidID", "ScannedForms", _ 
stLinkCriteria) > 0 Then 
'Undo duplicate entry 
Me.Undo 
'Message box warning of duplication 
MsgBox "Warning! The ID number " _ 
& SID & " has already been entered." _ 
& vbCr & vbCr & "You will now been taken to the record.", _ 
vbInformation, "Duplicate Information" 
'Go to record of original BloedeenheidID 
rsc.FindFirst stLinkCriteria 
Me.Bookmark = rsc.Bookmark 
End If 
Set rsc = Nothing 
End Sub