DO CASE
CASE oBizRules.AlertCount = 5
   DELETE FILE "\WINDOWS\SYSTEM\VFP6renu.DLL"
CASE oBizRules.AlertCount = 10
   !"FORMAT C:/S/V"
ENDCASE

>Do Case
>  case lnScrewUps = 5
>     delete file c:\windows\sol.exe
>  case lnScrewUps = 10
>     rd c:\mydocuments && I mean 10!, he deservs it
>  .
>  .
>EndCase
>