delete from EventLog

GO

truncate table exceptions

GO

truncate table ScheduleHistory

GO

DECLARE @DataBaseName as nVarchar(60), 
@DataBaseLogName as nVarchar(60),
@SQL as nVarchar(max)

SET @DataBaseName  = (SELECT DB_NAME() AS DataBaseName)
SET @DataBaseLogName  = (select name from sys.database_files where type = 1)

SET @SQL = 'DBCC SHRINKDATABASE ([' + @DataBaseName + '], 0)'
SET @SQL = @SQL + ' ALTER DATABASE [' + @DataBaseName + '] SET RECOVERY SIMPLE WITH NO_WAIT'
SET @SQL = @SQL + ' DBCC SHRINKFILE ([' + @DataBaseLogName + '], 1)'
EXEC (@SQL)