Learn about Edgartown's quest to ensure the safety and security of the entire town's employee and citizen data. Read the case study!
private sub cmb_task_beforeupdate(cancel as integer) dim rst recordset dim sql as string dim ind as integer sql = select taskxxx.[employeeid] from task where (((taskxxx.[employeeid])=" &parent![employeeid] & ") and (( taskxxx.[taskid]) ='" & me.cmb_task & "'));" set rst = currentdb.openrecordset(sql,dbopensnapshot) ind = rst.recordCount if ind > 0 then msgbox "duplicate" cancel = 1 end if
sql = select task.employeeid,task.id from task where task.employeeid = " & parent![parent_id] & ") and (( task.id)='" & me.cmb_task & "'));"
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Formating on a docmd.output to from Access subform Query to an excel spread sheet.||2||47|
|MS Access Error - specified field could refer to more than one table listed||10||35|
|Combining Multiple Access Reports that Have Different Criteria Sources||1||10|
|Set a variable value in SQL Procedure||3||26|
Join the community of 500,000 technology professionals and ask your questions.