<%
Function GetClassChildID(ClassID)
set GetClassChildIDRs=server.CreateObject("adodb.recordset")
GetClassChildIDSql="select arrChildID from PE_Class where ClassID="&ClassID
GetClassChildIDRs.open GetClassChildIDSql,conn,3,1
GetClassChildID=GetClassChildIDRs("arrChildID")
GetClassChildIDRs.close
set GetClassChildIDRs=nothing
End Function
%>