<%@ Language=VBScript %>

ENGR 019/301 - Ethics in Technology

Instructor: Dr. Neil R. Quinn Jr.

Student Link Projects

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

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