Spam and Ham Training for MailEnable

@echo off
SET FOLDER=C:\Program Files (x86)\Mail Enable\Postoffices
FOR /D %%I in ("%FOLDER%\*") DO CALL :PostOffice %%I
goto END

:PostOffice
FOR /D %%I IN ("%*\MAILROOT\*") DO CALL :InboxParse %%I
goto END

:InboxParse
FOR /D %%I IN ("%*\*") DO CALL :Logic %%I
goto END

:Logic
echo "%*"|findstr /C:"Junk" >nul 2>&1
if not errorlevel 1 (
   set TRAINTYPE=spam
) else (
   echo "%*"|findstr /C:"Delete" >nul 2>&1
   if not errorlevel 1 (
     goto END
   ) else (
      set TRAINTYPE=ham
   )
)

echo Checking if SpamAssassin daemon (spamd) is available on local host...
spamc -K > nul
echo.
if %errorlevel%==0 (
    echo Spamd is available. Using spamc for training.
    set METHOD=spamc
) else (
    echo Spamd is not available. Using sa-learn for training.
    set METHOD=sa-learn
)

if %METHOD% == spamc (
    goto spamc
) else (
    goto sa-learn
)

goto END

:spamc
echo "%*"
for %%X in ("%*\*") do spamc -L %TRAINTYPE% < "%%X"
if %errorlevel%==74 (
    echo Learning is not allowed by spamd, please start spamd with --allow-tell switch.
    goto end
)
goto end

:sa-learn:
echo "%*"
for %%X in ("%*\*") do sa-learn --%TRAINTYPE% < "%%X"
goto end


:END