<% query = "Select * From website where active_site='Yes' Order by course" Set courseConn = Server.CreateObject("ADODB.Connection") courseConn.open "Driver={microsoft access driver (*.mdb)}; dbq=d:\inetpub\wwwroot\courses\cfdb\courses.mdb" Set RScourse = Server.CreateObject("ADODB.Recordset") RScourse.Open query, courseConn, 1,2 %>

LOGIN HERE: Have an account? Enter login information here and click the Login button below. Username: Password:       <% if RScourse.EOF then 'traps for IF DB empty THEN: Response.Write "there is no such data" Response.End end if Do While Not RScourse.EOF%> <%RScourse.MoveNext Loop%> Course@NICC   <%= RScourse("course") %> COURSE TOOLS Academic Calendar NICC Email Online Learning Readiness