Visual Basic - Como limpio tabla ?

Tengo este codigo que a veces me funciona y otra veces no y que consiste en la limpieza de todos los registros de una tabla, ya que al pareciera cuando este archivo tiene a lo mejor una mayor cantidad de registros, es mas probable que se caiga, pero no he visto una explicacióm muy consistente para ello.

If ado5.Recordset.EOF = True Then
MsgBox ("No hay despachos")
Else
ado5.Recordset.MoveFirst
Do Until ado5.Recordset.EOF
If ado5.Recordset.EOF Then
Else
ado5.Recordset.Delete
ado5.Recordset.UpdateBatch adAffectAll
End If
ado5.Recordset.MoveNext
Loop
End If

El error que aparece es el siguiente :

Error '-2147467259 (80004005)' en tiempo de ejecución

Información de columna clave insuficiente o incorrecta; demasiadas filas afectadas por la actualización.

lo curioso es que las borra por una cantidad limitada de registros, por lo que se uno vuelve a intentar va limpiando la tabla
a pedazos.

Cualquier ayuda me resultara muy importante

Gracias

Porque no probas hacerlo con sintaxis sql?.
O sea :
nombrebasedatos.EXECUTE " DELETE *. * FROM nombretabla", dbfailonerror

Te borra todos los registros que tenes en tu tabla temporaria.
Ahora, me llama la atencion ese error, voy a probar y te cuento.
Saludos.