Access - 3º MODO

'----
'Dim tbLocalizacion As DAO.Recordset
'Dim qdf As QueryDef
'Dim strSQL As String

'strSQL = "SELECT MOLDES.BALDA, MOLDES.ESTADO FROM MOLDES WHERE MOLDES.Molde =" & MOLDE_bus
'Set qdf = CurrentDb.CreateQueryDef(, strSQL)
'Set tbLocalizacion = CurrentDb.OpenRecordset(qdf, dbOpenTable)
'Set tbLocalizacion = CurrentDb.OpenRecordset("MOLDES", dbOpenTable)
'
'tbLocalizacion.Edit
' tbLocalizacion!BALDA = Null
' tbLocalizacion!ESTADO = Estado_Sub
'tbLocalizacion.Update
'tbLocalizacion.Close

MsgBox "Localizacion Eliminada"
*****************************************