Validering mod NT

Jeg bruger følgende til at validere op imod NT grupper, det er et produkt fra SA

<%
  Set ntg = Server.CreateObject(\"SoftArtisans.Groups\")
%>

<%
if ntg.IsMember (request \"LOGON_USER\"), \"TEST\" , false) then
  response.write \"<tr><TD><a href=\"\"hyperlink.asp\"\" >Links</a></TD></tr>\"
end if
%>


Jeg vil nu gerne kunne lave tjekket op imod en sql tabel, men jeg kan ikke få det til at virke. Jeg havde tænkt mig noget i retning af, jeg kan ikke gennemskue hvordan jeg henter gruppen ind i og tjekker med den

<%
  Set ntg = Server.CreateObject(\"SoftArtisans.Groups\")
%>


<%
Dim Conn, List
  Set Conn = Server.CreateObject(\"ADODB.Connection\")
  Testdatabase = \"FILEDSN=testsql.dsn\"
    Conn.Open Testdatabase
  list = \"SELECT * FROM testtabel Where [Gruppe] = \'\" & Request.ServerVariables(\"QUERY_STRING\")& \"\' ORDER BY gruppelevel\"
  Set List = Conn.Execute(List)
%>   
   
<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\">
 
<%
    Do While Not List.EOF
%>

<%
  if ntg.IsMember(request(\"LOGON_USER\"), \"=List(\"gruppesikkerhed\")\" , false) then
%>
<td><a href=\"hyperlink.asp?<%=List(\"ID\")%>\"><%=List(\"links\")%></a></td>
<%
end if
%>

/2001Stausholm