| |
 TransTech
Systems provides a full line of Identification, Access Control and
associated security products to help you create a winning integrated
solution.
<%
SubRec.Open "select ID,Name from Categories where IsActive=1 and Catlevel=1 and ShowInDirectory=1 " & _
"and Name <> '' order by SortOrder, Name", RSC, adOpenStatic, adLockReadOnly, adCmdText
Do While Not SubRec.EOF
Response.Write "- " & SubRec("Name") & "
"
SubRec.MoveNext
Loop
SubRec.Close
%>
|
