<%sql = "SELECT s.sld_code,s.lname,s.fname " &_ " FROM karen.sld_master s,karen.sld_member m" &_ " WHERE s.sld_code=m.sld_code " &_ " AND s.Involvement='MEMBER' " &_ " and m.active = 'N' " &_ " ORDER BY m.active, s.Lname"%>

<% Session.timeout = 5 If IsObject(Session("Oracle_conn")) Then Set memconn = Session("Oracle_conn") Else Set memconn = Server.CreateObject("ADODB.Connection") memconn.open "SLAC-Unix-Oracle","sldmem","RN9<32#KN" Set Session("Oracle_conn") = memconn End If %>

<%rs.MoveFirst() do until rs.EOF response.write(rs.fields("lname" & ", " & rs.fields("fname")) rs.MoveNext() Loop %>