我需要在将值插入表格之前检查重复值,我使用拆分函数批量插入数据,如下所示
Dim VarItm As Variant
Dim i As Integer
Dim strSql As String
VarItm = Split(Me.txtTest, ",")
For i = 0 To UBound(VarItm)
strSql = "insert into tblSplit(Nums,dteDate) values(""" & VarItm(i) & """,#" & Me.txtDateIns & "# )"
'Debug.Print strSql
CurrentDb.Execute strSql, dbFailOnError
Next i
但问题是我们如何为此设置验证,这将是长字符串
超过60或100个逗号分隔值,如P_000001,P_000002,P_000003&所以直到P_000060
Like "P_######"
还要在插入之前检查表中的重复值或存在值吗?
答案 0 :(得分:1)
将(原始)值读入 temp 表。
然后,您可以运行各种验证和查询,以便在将已清理的数据/记录附加到tblSplit之前读取,过滤和验证临时表中的数据。