0
在我的代碼中,我正在對一個Access表中的記錄進行一些批量編輯並添加新記錄。然而,在添加新記錄之前,我需要檢查幾個字段是否已經存在這樣的記錄,如果存在,則不做任何事情,如果沒有這樣的記錄,則編輯和添加完成。 這裏是確認部分的代碼:如何根據選擇查詢找出是否有記錄?
Set myR2 = CurrentDb.OpenRecordset("_tbl_FILimits_", dbOpenDynaset)
'If the recordset is non-empty, exit.
myR2.FindFirst ("[LimitType] =" & chooseLimitType & "And [ReviewDate] =" & setDate)
If myR2.NoMatch Then
MsgBox "There is no such period exists, proceding next..."
updateRecords myR, myArray
Else
MsgBox "!!! Choose different review date. ALready exists such period! Quitting..."
Exit Sub
End If