<%@ Language=VBScript %>

ENGR 019/301 - Ethics in Technology

Instructor: Dr. Neil R. Quinn Jr.

Student Research Projects


<% Set DB = Server.CreateObject("ADODB.connection") DB.Open "ENGR019StudentsFall2003", "ENGR019Students", "ENGR019Students" SearchString = "SELECT * FROM q_AllStudentData ORDER BY LastName" ' response.write SearchString & "
" Set DB_Results = DB.Execute(SearchString) %>

Research Paper Outlines

<% while not DB_Results.eof %> /<% =DB_Results("LogName") %>_Outline.htm"><% =DB_Results("LogName") %> || <% DB_Results.MoveNext wend %>

Research Papers

<% DB_Results.MoveFirst while not DB_Results.eof %> /<% =DB_Results("LogName") %>_ResearchPaper.htm"><% =DB_Results("LogName") %> || <% DB_Results.MoveNext wend %>