Give this a whirl. Don't have AD here so it's untested. Just put in the OU and Group CN in that first line.

 Code:
$RC = DelGroup("OU", "GroupCN Path")

If $RC = 0
   ? "Group was been deleted successfully."
Else
   ? "Group was Not been deleted.  Error: "+$RC
Endif

get $

Function DelGroup($strOU, $strGroupCN)
   Dim $objOU
   $objOU = GetObject($strOU)
   $objOU.Delete("Group","cn="+$strGroupCN)
   $DelGroup = @Error
   $objOU = ""
EndFunction

Edited by ShaneEP (2013-07-15 04:27 PM)