Access - Problemas con Sentencia SQL

hola a todos

tengo esta sentencia SQL y me esta dando un error

" No existe registro Activo "

Set borr = CurrentDb.OpenRecordset("Select CAMPO1 From NOMBRE_TABLA Where CAMPO2 Like '" & Me.Cuadro_combinado65.Value & "'")
If IsNull(borr!CAMPO1) Then
DoCmd.RunSQL "Delete * FROM NOMBRE_TABLA WHERE CAMPO2 Like '" & Me.Cuadro_combinado65.Value & "'"

End If

tengo declarado el recordset

Private borr as DAO.Recordset

y tengo marcado tambien la biblioteca DAO, la tengo en el tercer nivel de prioridad

EL combox es independiente no pertence a la tabla, toma datos de otra tabla

CAMPO1 es un campo fecha, y tanto CAMPO2 como el Combox son texto.

alguien me puede decir que esta mal, un saludo y muchas gracias

Hola:

Tu código es perfecto, salvo que no cargas el recordset:

borr.movelast
borr.movefirst

Tal vez te de error por eso, a mi no, pero, le encuentro un defecto y es que seleccionas TODOS los registros que tengan el mismo valor en el cuadro combinado.

Yo lo haría de esta forma:

Set borr = CurrentDb.OpenRecordset("SELECT * FROM tabla3 WHERE FECHA1 Is Null AND nombre='" & Me.Cuadro_combinado65 & "'")
If borr.RecordCount > 0 Then
borr.Delete
End If

De esta forma obtines los registros que tienen valor nulo en el campo fecha y el campo igual al cuadro combinado.

Un saludo
Victoria

gracias victoria

como te habras dado cuenta lo que intento hacer con ese codigo es evitar que se grabe los registros en blanco cuando se salga del formulario, o aunque el usuario teclee algun dato y deje algun campo vacio, no grabe , es verdad que se puede hacer de varias formas, como no comprendia porque me daba ese fallo lo intente de esta forma.

Private Sub Salir_Click()
If Me.Cuadro_combinado35.Value <> "" Then
If (Me.TOTAL.Value = 0) Or IsNull(Me.Fecha.Value) Then
DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70
DoCmd.Close: Exit Sub
End If
End If
DoCmd.Close


End Sub

un poco cutre quizas, pero funciona, intentare hacerlo de la forma que me dices y ya te dare respuesta, muchas gracias por tu atencion, un saludo.

Hola:

No es nada cutre lo que has puesto, es perfecto.

El código anterior que ponías, y que yo te escribí, lo que hace es BORRAR el registro si el campo es nulo, y, por lo que dices ahora, pretendes que NO se grabe si se da esa circunstancia

Pero, a mi forma de ver, existe una forma mejor de controlarlo, y es que compruebes si se ha cumplimentado el campo(s) cuando el SIGUIENTE control reciba el foco.

Si es nulo o blanco el control anterior, envia el foco a ese control anterior para que sea rellenado

Un saludo
Victoria