<%
'Get the variable posted by the Request Page....
SelectedHorse = Request("SelectedHorse") & ""
'Response.Write "SelectedHorse=" & SelectedHorse
'Validation of the data....
'opening database connection
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open dnsname
SQL= "Select * FROM [Horses] WHERE horsename = '" & SelectedHorse & "'"
Set RS = Conn.Execute(SQL)
'Use Data Here
%>
Pedigree
