update sysdatabases set status = 32768 where name = 'accdb'
dbcc rebuild_log (accdb)
update sysdatabases set status =28 where name='accdb'
Go
sp_configure 'allow updates', 0 reconfigure with override
Go
DBCC CHECKDB('Accdb')
ALTER DATABASE Accdb SET SINGLE_USER WITH ROLLBACK IMMEDIATE
GO
DBCC CHECKDB ('Accdb',REPAIR_REBUILD)
GO
ALTER DATABASE Accdb SET MULTI_USER WITH ROLLBACK IMMEDIATE
GO
DBCC CHECKDB ('Accdb',REPAIR_ALLOW_DATA_LOSS )