Addextender("WWWNT34I.DLL")
:TOP
YN = AskYesNo("Group","Are you searching for global group?" )
dir = AskLine("Server","Path and name of Server/Workstation", "")
If YN==@YES then Goto GLOBAL
Else Goto LOCAL
Endif

:LOCAL
localgroups=wntListGroups("%B%",@LOCALGROUP)
B = AskItemList("Local Groups",localgroups,@tab,@sorted,@single)
people = wntMemberList("%dir%","%B%",@LOCALGROUP)
AskItemList("Members of %B% Group",people,@tab,@sorted,@single)
Goto TOP

:GLOBAL
globalgroups=wntListGroups("%dir%",@GLOBALGROUP)
C = AskItemList("Global Groups",globalgroups,@tab,@sorted,@single)
people = wntMemberList("%dir%","%C%",@GLOBALGROUP)
AskItemList("Members of %C% Group",people,@tab,@sorted,@single)
Goto TOP