Hi,
I'm fairly new to Access 2000. I have this code, I'm trying to delete a record, once I uncheck the check box. It is deleting fine, but after deleting it is giving this error.

error 3167

Please help
Code:
Option Compare Database
Dim conDatabase As adodb.Connection
    Dim numRecordsAffected As Long
    Dim rstImpactApp As adodb.Recordset
    
Private Sub Check12_Click()
Set conDatabase = CurrentProject.Connection
    Set rstImpactApp = New adodb.Recordset

 If (Check12.Value = -1) Then
    Dim strSQL As String
    Me![1619IDRequirementDocumentation] = [Forms]![f04RequirementDocument]![tb19IDRequirementDocumentation]
    Me![tb1609IDApplication] = Me![09IDApplication]
    
        
 ElseIf (Check12.Value = 0) Then
    Dim strSQL As String
       
       
    DoCmd.SetWarnings False
  

    strSQL = "DELETE t16ImpactedApplication19x09.*" & _
             "FROM t16ImpactedApplication19x09 " & _
             "WHERE t16ImpactedApplication19x09.[1619IDRequirementDocumentation]=" & _
             Me![tb19IDRequirementDocumentation].Value & _
             " and t16ImpactedApplication19x09.[1609IDApplication]=" & _
             tb1609IDApplication.Value & " ;"
    'MsgBox strSQL
    
   ' DoCmd.RunSQL strSQL
    
  'Set rstImpactApp = conDatabase.Execute(strSQL, numRecordsAffected, adExecuteNoRecords)
  conDatabase.Execute strSQL, numRecordsAffected, adExecuteNoRecords
 ' rstImpactApp.MoveNext
  
      Set conDatabase = Nothing
  
    
    
End If
End Sub