<%@ Language=VBScript %> <% Dim DataConn 'connection name Dim db 'recordset Dim SQLString 'sql statement string Set DataConn = Server.CreateObject("ADODB.Connection") Set db = Server.CreateObject("ADODB.Recordset") DataConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= "& Server.MapPath("sinharticles.mdb")&";" SQLString = "SELECT DISTINCT Title FROM courses" Set db = DataConn.Execute(SQLString) %> Sports Database Search

Articles published in Sport in History

Title Listing  <% response.write("") %>

Scroll list by clicking on box and using mouse wheel

Richard William Cox
Last updated: 11th of January, 2005