Access - reparaciòn bds access

Tengo una base de datos de tamaño de 1 gb, y quisiera saber con que herramienta la puedo reparar que no sea de la misma utileria de access, ya que el access no la repara.............gracias y que esten bien ¡¡¡

pon esto en un módulo:
Function RepairDatabase(strSource As String, _
strDestination As String) As Boolean

On Error GoTo error_handler


RepairDatabase = _
Application.CompactRepair( _
LogFile:=False, _
SourceFile:=strSource, _
DestinationFile:=strDestination)


On Error GoTo 0
Exit Function

error_handler:
RepairDatabase = False

End Function

y en el evento al salir del formulario que usas para salir de la aplicacion (en el codigo) le pones:
call RepairDatabase