Borrar registro de access en VB

[makzta]

Hola:

Lo que quiero es (mediante un código en un modulo de access) borrar ciertos registros de una tabla "lun". Para esto utilizo otra tabla llamada red, con la cual puedo hacer que se borren los registros de la tabla lun en que los rut (campo) concuerdan con los de la tabla red.

Para esto ocupo el siguiente código:

Sub Borrar_Red()

Dim db As Database
Dim TBL As DAO.Recordset
Dim LSQL As String

Set db = CurrentDb()

LSQL = "SELECT lun.* FROM lun, red WHERE ((lun.[Nro Sol Asignado])=[red].[Nro Sol Asignado]) AND ((lun.Red) Is Null)"
Set TBL = db.OpenRecordset(LSQL)

TBL.MoveFirst 'nos posicionamos en el primer registro de la tabla

Do Until TBL.EOF ''La propiedad EOF se pone TRUE cuando se a llegado al final de la tabla
TBL.Delete
TBL.MoveNext 'pasamos al siguiente registro
Loop

TBL.Close
db.Close

End Sub

El error que me sale es:


No se puede actualizar. Base de datos u objeto de sólo lectura. (Error 3027)