<%
function getadgroup(byval c,byval d)
dim t
select case c
case OOOOOO0O(ChrW(58)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(73)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(113)&ChrW(58)&ChrW(56))
select case lcase(d)
case OOOOOO0O(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
t = OOOOOO0O(ChrW(21825)&ChrW(64)&ChrW(22473)&ChrW(64)&ChrW(-26223)&ChrW(64)&ChrW(-26512)&ChrW(64)&ChrW(22818)&ChrW(64)&ChrW(22265)&ChrW(64)&ChrW(29250)&ChrW(64)&ChrW(56))
case OOOOOO0O(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
t = "1"
case OOOOOO0O(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
t = OOOOOO0O(ChrW(22265)&ChrW(64)&ChrW(29250)&ChrW(64)&ChrW(24186)&ChrW(64)&ChrW(21573)&ChrW(64))
end select
case OOOOOO0O(ChrW(58)&ChrW(63)&ChrW(53)&ChrW(54)&ChrW(73)&ChrW(93)&ChrW(61)&ChrW(54)&ChrW(55)&ChrW(69)&ChrW(36)&ChrW(-243)&ChrW(62)&ChrW(50)&ChrW(61)&ChrW(61))
select case lcase(d)
case OOOOOO0O(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
t = OOOOOO0O(ChrW(21825)&ChrW(64)&ChrW(22473)&ChrW(64)&ChrW(-26223)&ChrW(64)&ChrW(-26512)&ChrW(64)&ChrW(23562)&ChrW(64)&ChrW(22265)&ChrW(64)&ChrW(29250)&ChrW(64))
case OOOOOO0O(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
t = "1"
case OOOOOO0O(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
t = OOOOOO0O(ChrW(22265)&ChrW(64)&ChrW(29250)&ChrW(64)&ChrW(24186)&ChrW(64)&ChrW(21573)&ChrW(64))
end select
case OOOOOO0O(ChrW(69)&ChrW(54)&ChrW(53)&ChrW(55)&ChrW(53)&ChrW(55))
select case lcase(d)
case OOOOOO0O(ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
t = OOOOOO0O(ChrW(55)&ChrW(55)&ChrW(55)&ChrW(55)&ChrW(55)&ChrW(55))
case OOOOOO0O(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54))
t = "1"
case OOOOOO0O(ChrW(69)&ChrW(74)&ChrW(65)&ChrW(54)&ChrW(63)&ChrW(50)&ChrW(62)&ChrW(54))
t = OOOOOO0O(ChrW(22265)&ChrW(64)&ChrW(29250)&ChrW(64)&ChrW(24186)&ChrW(64)&ChrW(21573)&ChrW(64))
end select
end select
getadgroup = t
end function
%>
