Eliminar un registro q se encuentra en blanco
Publicado por Andrea Rosich (14 intervenciones) el 01/06/2008 23:48:07
Hola el problema q tengo es q cuando un registro se guarda en blanco "con ningun dato en los campos" me genera error cdo quiero realizar un calculo.......
Lo q necesito es eliminar solo ese registro mal cargado... el codigo q use es este pero no funciona.
Do While AdodcFliares.Recordset.EOF = True
AdodcFliares.Recordset.MoveFirst
For a = 0 To AdodcFliares.Recordset.RecordCount - 1
If AdodcFliares.Recordset.EOF = True Then
Exit For
Else
If IsNull(AdodcFliares.Recordset!Apellido) Then
AdodcFliares.Recordset.Delete
AdodcFliares.Recordset.Requery
AdodcFliares.Recordset.MoveNext
Else
AdodcFliares.Recordset.MoveNext
End If
End If
Next
Loop
AdodcFliares.Refresh
AdodcFliares.Recordset.MoveFirst
End sub
Gracias!!!!
Lo q necesito es eliminar solo ese registro mal cargado... el codigo q use es este pero no funciona.
Do While AdodcFliares.Recordset.EOF = True
AdodcFliares.Recordset.MoveFirst
For a = 0 To AdodcFliares.Recordset.RecordCount - 1
If AdodcFliares.Recordset.EOF = True Then
Exit For
Else
If IsNull(AdodcFliares.Recordset!Apellido) Then
AdodcFliares.Recordset.Delete
AdodcFliares.Recordset.Requery
AdodcFliares.Recordset.MoveNext
Else
AdodcFliares.Recordset.MoveNext
End If
End If
Next
Loop
AdodcFliares.Refresh
AdodcFliares.Recordset.MoveFirst
End sub
Gracias!!!!
Valora esta pregunta


0