除了这一行,我的代码工作正常
.FindFirst "[DONOR_CONTACT_ID] = strTemp2"
我希望我的代码检查是否有记录,其中存在特定的DONOR_CONTACT_ID,因为有多个记录具有相同的DONOR_CONTACT_ID.如果该记录不存在,那么我想将DONOR_CONTACT_ID和RECIPIENT_CONTACT_ID添加到RECIPIENT_1.如果该记录确实存在,我想将RECIPIENT_CONTACT_ID添加到RECIPIENT_2以获取该特定的DONOR_CONTACT_ID.为此,我使用.FindFirst,查看是否有记录,然后使用.NoMatch.如果没有匹配,我想添加一条新记录,但如果有,那么我想检查它是否必须进入RECIPIENT_2.
我得到的错误是"无法识别'strTemp2'作为有效的字段名称或表达式".我想看看记录是否等于strTemp2,但我认为我的语法是错误的.谢谢你的帮助!!
这是我的代码:
Option Compare Database
Option Explicit
Function UsingTemps()
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Dim rstOutput As DAO.Recordset
'Defines DAO objects
Dim strTemp1 As String
Dim strTemp2 As String
Dim strVal As String
Dim strRecip As String
DoCmd.SetWarnings False
DoCmd.OpenQuery ("Q_RECIPIENT_SORT")
DoCmd.OpenQuery ("Q_DELETE_T_OUTPUT")
DoCmd.SetWarnings True
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("T_RECIPIENT_SORT", dbOpenDynaset)
'rst refers to the table T_RECIPIENT_SORT
Set rstOutput = dbs.OpenRecordset("T_OUTPUT", dbOpenDynaset)
'rstOutput refers to the table T_OUTPUT …我有一个表格,其中一个字段PATRN NAME被设置为First_Name, Last_Name M.I.
例子:
史密斯,詹姆斯M.
琼斯,克里斯J.
安德森,温迪L.
如何将此字段拆分为3个名为FIRST_NAME,LAST_NAME和MI的字段？我尝试运行查询LAST_NAME: [PATRN NAME]" & ", "以获取姓氏但它没有得到任何结果.我没有设计这个表,所以我意识到在没有单独的字段名称的情况下创建一个完整的字段名称并不聪明; 我只是负责修理它.