<%@ Language=VBScript %>

ENGR 019/299 - Ethics in Technology

Instructor: Dr. Neil R. Quinn Jr.

Student Research Projects

<% Set DB = Server.CreateObject("ADODB.connection") DB.Open "EthicsLinks", "EthicsLinks", "EthicsLinks" SearchString = "SELECT * FROM LinkCreators Where (WhosLinkID > 12) and (WhosLinkID <= 44) ORDER BY LinkCreator" Set DB_Results = DB.Execute(SearchString) %>

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