% ' ' this is what you need to add to each page Julie
dim conn
dim rsdir
dim ssql
' open a connection to the database
set conn = createobject("ADODB.CONNECTION")
conn.ConnectionString = "Provider=SQLOLEDB; Data Source=216.235.170.82; Initial Catalog=ehorsehotline; User Id=eHorseHotlineReader_user; Password=r3ad0nly"
conn.Open
' open a recordset which is used to get the data from the database
set rsdir = createobject("ADODB.RECORDSET")
%>
Crawfords Horses
Website Created and Hosted by Quick Draw Solutions.