<%@ LANGUAGE="VBSCRIPT" %> <%'this script will display all committe members, the appointing authority... this scripts expects 'to get a cal_id parameter that is the database id of the particular committe %> Committees On InfoNet <% cmte_id = Request.QueryString("cal_id") sqlselect = "select * from cmte_members where cmte_id=" & cmte_id & " order by name" set rs=db.execute(sqlselect) sqlselect1 = "select name,userid_chair,userid_cochair from cmte_name where id=" & cmte_id set rs1=db.execute(sqlselect1) name=TRIM(rs1("name")) userid_chair=TRIM(rs1("userid_chair")) userid_cochair=TRIM(rs1("userid_cochair")) rs1.close set rs1=nothing %>

Membership of

<%=name%>

Chair : <%=userid_chair%>
Co-Chair :
<%=userid_cochair%>

  <%Do while NOT rs.eof%> <% rs.movenext loop rs.close db.close set rs=nothing set db=nothing %>
Name Appointing
Authority
Status
<%=rs("name") %>   <%=rs("appointed_by") %>   <%=rs("Type") %>  
©